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本 書 は , PL ノ プ I の プロ グラ マー 参照 資料 と し て ど 使 用 いた だ く 
よう , 編さん され た も の で す 。 本 書 は , 初歩 的 を 入門 書 で は な く , 
すでに て P エ L ノ 1 言語 を 習得 され , 参照 の も る と と を る も の を 必要 と さ 
れ て いる 方 を 対象 C し て いま す 。 


本 書 は , 2 部 に わか れ て いま す 。 第 1 部 で は , こと の 言語 の 概念 を 
解説 し ます 。 第 H 部 で は , 細か い 規 則 や 統語 法 に つい て 説明 し ます 。 


実施 面 (C 関 する 情報 も 一 応 は 扱い ます が , 各々 の 実施 環境 に つい 

て , すべ て 網 経 し て ある わけ で は あり ませ ん 。 一 般 的 に 云っ て , 本 
書 に は , DOS PL/ ノ I 最適 化 セ ン ペ イラ ー で 処理 され る 予定 の 
プロ グラ ム を 書く の 必要 を 情報 が 含ま れ て い る だ け で , ブロ グラ 
ム を 実行 する の 必要 を すべ て の 情報 が 含ま れ て いる わけ で は あり 
ませ ん 。 ブロ グラ ム の 実行 に 関す る 詳し いこ と は , こと の コン バイ ラ 
ー の ブロ グラ マー の 手引 を どら ん くだ さい 。 


と の コン パイ ラー で 処理 され た プロ グラ ム を 実行 する た め C は , 
サブ プル ー チ ン ・ ラ イプ ブ ラリー が 必要 で す 。 と れ ら の サ プ ル ー チ ン ・ 
ライ プラ リー は , 次 の よう を IBM シス テム 360 の ブロ グラ ム ・ 
プロ ダク ト C 入 っ て いま す 。 


DOS PL/I 常駐 ライ ブラ リー, 
プロ グラ ム ・ ブ ロダ クト 5736-LM4 


DOS PL ノ 1 非常 駐 ライ プラ リー, 
プロ グラ ム ・ プ ロダ クト 5736- LM5 


本 書 の 用 い 方 


本 書 は , PL ノエ プロ グラ マー が 用 いる 参照 資料 と し て 作ら れ た も 
の で す 。 使用 者 の 必要 性 に 応 し て , 詳細 C て も, また 簡 親 に も , 参照 
する 事項 を 迅速 C 見 つけ る と と が で きる よう , 本 書 は 2 部 (に わけ て , 
資料 を 提示 し て あり ます 。 


第 I 部 「PL ノ 1 の 概念 」 は , PL/1 言 語 の 様々 を 機能 と それ 
ら の 相互 関係 を 解説 する 説明 文 と 例題 か ら 構成 され て いま す 。 恒 い 
参照 し 合う と と を 避け る た め , また , それ ぞ れ の 章 を その 主題 に 
関す る 完全 な 参照 資料 と し て 独立 し た も の (て する た め , ある 章 C 出 
て きた 情報 が 別 の 章 に ゃ 繰返し 出 て くる と と も あり ます 。 し か し , 
第 T 部 は , 全体 を 順 々 (と 読ん で ゆく と と も で きま す 。 


第 H 部 規則 と 構文 法 】 は , 特定 の 情報 を 迅速 に 参照 する た め の 
も の で す 。 と と と は , 相互 の 関係 に つい て の 情報 は どく わずか し か 
含ま れ て いま せん が , 特定 の 疑問 (C 対 す る 回 答 が 早く 得 ら れる よ 29 
(て 構成 し て あ り ま す 。 第 H 部 は , 参照 に 都合 が よい と いう と と を 主 


眼 と し て 構成 し て あり , 順 C 読 む 上 で 都合 の よい 構成 て は を っ て い 
ませ ん 。 


た と えば, プロ グラ マー が , ブロ グラ ム の 中 で 使う 様々 た な ス テー 
トメ ント の 相互 関係 に つい て の 情報 を 知り た いと きせ は , 第 1 部 第 5 
章 の 「 ス テー トメ ント の 分 類 」 を 読め ば よい の で す が , 特定 の ステ 
ー ト メン ト の 使用 法 , その 効果 , 許さ れん る オプ ショ ン , 書き 方 の 形 
式 を ど と 関す る すべ て の 規則 を 知り た いと き は , 第 部 J 節 「 ス テ 
ー ト メン ト 」 を みる 方 が よい の で す 。 


同様 に , デー タ 変 換 の 概念 の 解説 に つい て は , 第 1 部 第 4 章 の 「 
式 と デー タ 変 換 」 を 読み , 特定 の タイ プ の 変換 が 行なわ れ た と き の 
正確 を 結果 を 調べ た いと き は , 第 II 部 FT 節 の 「 デ ー タ の 変換 と 式 の 
値 の 計算 」 を ち ぉ 読み くだ さい 。 


PL/1 の 要素 を 記述 する た め C 本 書 で 使用 し て いる 統語 言語 は , 
第 部 A 節 の 「PL/1 の 構文 表記 法 ] (と 説明 し て あり ます 。 


必読 の 資料 


プロ グラ ム の コン イル, 連係 編集 , おぉ よび 実行 を する 際 (必要 な 
情報 CK つい て , 読者 は , 次 の 資料 を よく 読ん で お か を けれ ば な り ま 
せん 。 


DOS PL Optimizing Oompiler : 
Programmers Guide, SC33-0008 


推 せ ん 資料 


次 に あげ る 資料 の 中 で 取り あげ られ て いる 項目 は , コン バイ ラー の 
能力 , 最適 化 の 機能 , オ ベ レ ー テ ィング ・ シ ステ ム の 環境 , な よび 
DOS PL ノ 1 最 適 化 コ ン バ イ ラー で 実施 され る 言語 と DOS 

PL/T D コ ン ペ パイ ラー で 実施 され る 言語 と の 比較 , を ど で す 。 


DOS PL プ I Optimizing Compiler: 
deneral Information, GC33-0004 


DOS PL Optimizing Compiler : 
氏 xecution Logic, SC33-0019 


資料 の 入手 方 法 


資料 の 入手 方 法 は , ユー ス ・ キ ー ( 注 女 番号 の 最初 の 文字 ) に よっ 
て 表示 され ます 。 本 書 の 中 で 参照 され て いる 資料 の テース ・ キ ー は , 
以下 の 通 り で す 。 


G 一 一 般 向き : IBM シス テム , プロダクト お よび サー ビス 
の 使用 者 は , ど 〈 普 通 の 使用 量 の 範囲 内 で あれ ば 無料 で 入 
手 す る と と が で きま す 。 また , こと の 資料 は , TI BM の 営業 
所 を 通じ し て, どなた で も 購入 する こと と が で きま す 。 


S 一 販売 用 : 1!BM の 営業 所 を 通じ て, ど を た で る も 購入 する 
こと が で きま す 。 
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開始 プロ ッ ク の 終了 ee8 10276ZeYS( の ざい (87 全 な) 
ブ プロシージャー の 終了 
- プロ グラ ム の 終了 OODOPCLEYLCLLLOLPDEEYSYYYYYSOLLLLPY PL 


OKYYEKERIIEEYRKREEYYSEEESE と で その 


記憶 域 割 提 り … パ ドド ドド oo に 
活用 状態 に た ちる プロ シー ジャ ー の 再 活用 化 (回 帰 ) ……… 
プロ ロー グ と エピ ロー グ の 0 で (8: ご 2 0668788P: 


プロ ロー グ CTPYY PKK て て で テア すす イミ アミ アミ ミナミ ミア で すす すす TE きす で で 


名 前 の 認定 PCO て PT を 


スス ミス 計 護 は まき ミ 光 きす きす 信二 まき まさ まき 生き スス きす まま ます きす きま きき) 


明示 宣言 の 有効 範囲 と すす で すす と で で で と す で で です すす ドド す ドド 


CK て PP ナ まで で デミ で すす ドド すす すす ドド と で すす です と 
文脈 宣言 の 有効 館 囲 すす すす で ヤ で で すす すそ で で で まそ 
CPPPPPCPPPPTPP ミ すす と ます と です ド ド すす すす すす すす すす すす すす すす すす 


ee 


外部 構造 の メン バー 名 の 有効 範囲 


多重 宣言 と 不明 確 な 参照 ……… に …… 〇 ①②… で ドド ドド ーー 
省略 時 解釈 の 属性 の 適用 の Da ie るる ささ 


属性 の 適用 の 課程 80828 8183N8Ye26SB560 き 81: 78C8 な 68378 
儲 準 の 省略 時 解釈 の 適用 
問題 デー タ COCCOLPKKY サミ ミイ アド アド で ドナ すす で サド と と と と と と と ます すす すす 
プ ブログ ラム ュ 制御 デ ー タ 


で です すす ミミ すす ミ テー ミ マ すす すす すす 


DBFAULT ス テー トメ ント 


標準 の 省略 時 解 釈 の 復元 
DEEFEAULT ス テー トメ ント の 有効 葛 囲 
省略 時 解釈 指定 の 因数 化 
バラ メー ター の 記述 子 (対す る ブロ グラ マー 
定義 の 省略 時 解釈 
RBTURNS ォ オプ ショ ン K 対 する プロ グラ マー 
定義 の 省略 時 解釈 
DEBFEAULT ス テー トメ ント の 用 法 

て 関 する 制約 の iro 


CK マミ ミミ ミミ で ミミ 0 さす さす ミミ ミミ ミミ ミミ) 
スミ スミ まま ミミ ミミ スミ ミミ メア ミミ メ ミミ まま すす すす さす 


KK スス ま すす まま まま まま は まま すま EESNI 


すす 
スミ トミ ミミ スミ 計 ミ ミミ ミミ ミミ すす すす た ミミ ミス ます さす さす すす で テー テテ で で すす 
KS スミ すま ミミ ミミ で ミミ ミミ ミミ てすと ミミ ミミ すま さす スミ ます すき ミミ テマ さす) 


自動 変数 に お ける 回 帰 の 影響 


被 制御 記憶 域 


基底 付記 境 域 
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プルー チ ジ 


関 数 PP ミミ で で ミミ で すす ナミ で テト す すす ミ テテ です すす です で すす です で で で と す すす です すす です の 


スス ミミ ミミ ミス ミド ミミ ミミ 信光 KEEE まき ます まま す すす お すす きす すき させ ) 


被 制御 変数 に 対す る ALLOOATE ス テー トメ ント 

被 制 御 変数 対す る FREB ス テー トメ ント ………… 
暗示 的 を 解放 PP 

被 制 御 変数 の 複数 個 の 世代 
星 印 の 表記 芝生 人 2 る 

被 制御 構造 en まく 81798 な 8 る era 

組込み 関数 の 割 振り 


PETLI ス EYE を まさ ミミ ミミ すす すす すす 


KK さま きま さす ミミ きま すす きき きす と で 生 すす すす 
スー ミミ ミミ ミミ トミ ミミ ミミ ミミ ミミ テオ すす すま で を すす さす ます すき すす) 


デミ で ミミ テア テア テ ミア で すす ミミ ミミ テテ テー テテ デミ ミミ テオ で オデ すす で すす 1 


基底 付 変数 
ロケ グ ケー ター の 修飾 は PPP で で すそ すす です FFP 
ポイ ンター 変数 PF で すす で で で で テ ドイ で すす で すす すす すす と で すす すす すす 

ポイ ンタ ー 式 ーー バド ドド ドド < ドド し て し て 

ポイ ンタ ー 変 数 6 モット ドー ドド ドー ドド ドド 
ADDR 組 込み 関数 
基底 付 変数 と 入出 力 8: 人 36: 和 3921838I819L818 人 05 の Kei お めき 

SET を 伴 を た う RRBAD ス テー トメ ント … の ii…… 

LOOCA 和 TE ステ ー ト メン ト 
自己 定義 の デー タ (RETF ER オプ ショ ン ) 
リス ト 処理 te きめ * き 79: 信人 い 78r9 92. 
基底 付 変数 に 対す る ALLOOCATE ス テー トメ ント … 
基底 付 変数 に 対す る FRHE ス テー トメ ント 
基底 付 変数 の 複数 個 の 世代 
NULL 組込み 関数 
リス ト の タイ ププ あき atB 3 電 280578: の 8 で ある 8 


CONEKSSES き すす ミミ ミミ ミミ すき ミミ を 生き すす を と 


CK まま ミス まさ 
CK EK きす ES ミスミ ミミ すす きす を] 


ミス ミミ ミミ 0 すま すま さす すす さま スミ きき すき) 


オフ セッ ト 式 たこ Ye ん と に で CK な PO で 
TIN オ プシ ョ ン を も つ ALLOOATE 
ステ ー ト メン ト 
TIN オ プシ ョ ン を も つ F RRB 包 ス テー トメ ント …… 
BMPTY 組 込み 関数 43 の が の の Sie な 72er2:230a es 2 
テリ テ の 割当 
A REA ォ ン 条件 ease 
テリア の 入力 と 出力 で と と に ます と FE 
複数 個 の ロケータ ー 修 飾 
ロケ グ ケー ター 修飾 の レベ ル 


PC スス スス すす まま まさ た きす きす ます 


Cr スス ミミ マミ アミ で コテ テス スミ テー さき 


サブ ルー チン と 関数 の 入口 点 
ENTRY 属 性 の 用 法 生理 0 
サブ ルー チン と 関数 の 出口 点 
RBTURNS 属 性 と RETURNS オプ ショ ン 


KK RESEKSIR ま は ESSSEKWESS EEE ま きる) 


返さ れる 値 の 属性 で で で で で で です すす すす で で で で で で すす すす で すす すす すす で すす 


総称 入口 名 と 参照 PEPPCPPCOP PPTTT す で ドド ドド イド すす すす で ドド すす すす すす すす 
組 込 信 関数 


し K ス メス スス ミス スミ スス トミ ミト ミミ ミミ ミス まま KSSSR ミ スミ ミミ SSSESSEKY ま SS まさ SI 


アス スミ デミ ミミ ミニ ミミ ます で ます すす 


FORTRAN ラ イブ ラリ ー 関 数 


組込み サブ ルー チン DCC エエ ミア ミミ で マサ で で すそ す と で すす で すす すす すそ で すす で すす すす です すす 
引 雪 と パラ メー ター の 関係 ………… ド ドド ドド ooooooroerees 


見 か け 引 数 ポー バー ドド ドド トト 
BRNT RY 属性 
バラ メー ター 記述 子 リ スト eeeoeooeoeeeoento 
引数 と し て の 入口 式 
バラ メー ター の 割 振り 
パラ メー ター 属性 の o…iii ド ドド ドド に 
ズラ メー ター の 限界 と 範囲 


トス トス ミミ ミス スミ ミミ スミ ミス ミ ミミ ま まま まき まき た まぶす] 


OK 江 は た は まま すき ミミ まま すき さす まさ す きす すす] 


スス トス ミミ ます SENSSSS ま SNSS】 


単純 ぺ バラ メー ター の 限界 , 長 さ , お よび サイ ズ … 
被 制 御 バ パラ メータ ー の 限界 と 範囲 …………… 

引数 な よび パラ メー ター の タイ シレ 2ECOECOCLLCSYYTEYYSYPY 
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デー クッ セッ トー ドロ 尼 u パ パ " ヴ " ツ ツ ツヤ im ハ s 


た に と と ミミ そそ ミ と た KERRKAARL し スス まま ミミ まき ミミ スミ ミミ 】 


と ーー ミミ ミミ テテ さす ミミ ミミ ミミ ミ で すす きす] 


PETPEPPEEEEEEKEKREESLEALSASRASSRASLESSEESSSSASSSGSSSEN 


択 一 的 属性 で で を も スス 
STREBAM 属 性 と REOCORD 属 性 
INPUT, OUT PUT, ぉ よび UPDATE 属 性 
SEBQUENT IAL 属 性 と DIREOT 属 性 …… 
BUFEBRED 属 性 と UNBUFFERED 属 性 … 

付加 的 属性 61 の 68C 誠 pt:9.5 JJ ve Tete 
PRINT 属 性 
BAOKWARDS 必 性 
KBYBD 属 性 58 6.8 488 980 NG 
NVIRONMBNT 属 人 性 ee 60 

ファ イル の 開閉 
OPBBN ス テー トメ ント 

遇 示 的 を 開き 方 

デー タ ・ セ ッ ト と ファ イル の 結び つけ 方 
OLOSBB ス テー トメ ント 
標準 
第 1 | 章 : スト リー ム 方 式 の 転送 
リス ト 指示 転送 の の の の ee ei21873.8 を ene0 を Sp mee ei 

デー タ 指示 転送 夫人 3。 矯 人: 全 の 

編集 指示 転送 RT 8073 6787 eeCNG28 

デー タ 転 送 ス テー トメ ント 
転送 ステー トメ ント の オブ ショ ン 
FILB お な お よび STRING オ ォ オプション 
OOPY オ プシ ョ ン 
SKTP ォ オォ プション 
PAGER オ プシ ョ ン 
IN 包 オ プシ ジ ション 
デー タ 指定 


EE ます すす た テテ ミト と と あさ まさ きき する まま まま まえ 】 


EPR KEK スス スミ ミス きま 


EE の PPPPEPLKEELEKKEREEK SEE KSCISRERRRORLRRLKESRKS RE まさる まま 
COCOLOKS RS は スス きま まま きま 
PCPSIRRKKRKARURASR2SSSSKRSSSSELLSSLR 


すま ミミ スス きす すま は 人 ま 


で すす で すす すす で で まま ミミ まま あま まみ 2 
PO スス 方 友 まま 
CK で すさ です さる 
と を と と と た し KEKRRRRRMLRMRL あ まま 
SEE 
SEE 
まそ デミ ミミ ミミ ERLS2ERKGCE ま 人 ス 
た た も も も きろ こ こき る EEESSSSLLSSEESESSLLLELSME 


すす まさ きま スミス スミ ミミ ミス えた あ メス 


繰返し 指定 6: 二 < ee:0: の 0 の 61620 がき いさ る 

デー タ ・ リ スト 要素 の 転送 

リス ト 指 示 の デー タ 指定 
スト リー ム の 中 の リス ト 指 示 デ ー タ 

リス ト 指 示 の 入力 形式 

リュ ト 指 示 の 出力 形式 

デー タ 指 示 の デー タ 指 定 
ストリーム の 中 の デー タ 指 示 デ ー タ 

例 昌和 生 きこ 1 ま で 和 人 す せ R 

デー タ 指 示 の デー タ 指定 (入力 の 場合 ) 

デー タ 指 示 の デー タ 指 定 ( 出力 の 場合 ) 

デー タ 指 示 の 出力 フィ ー ル ド の 長 さ 

編集 指示 の デー タ 指 定 1 ia 
形式 リス トー ドド oo 
PRTINT フ ァイル 
標準 ファ イル SYSPRTINT SS 
ENVI RONMENT 属 性 
装置 の タイプ (MRBD1IUM ) 
装置 の 機能 (FUNCTION ) 
読取 橋 抑 制 (ROB) … ぐ ooo 

ス タッカー 選択 (STAOKBR) 生生 は か 2 
レコ ー ド 形式 オプ ショ ン 
固定 長 レ コー ド 


テテ さす で スミ ます すす まま 


2 


ミミ すす ミス まま ます すま すす きき ミミ きま まえ まあ ええ 


た ミ ミス ミス まさ ミ ミ 】 


まさ スス 】 


と と で で で テ アミ で で で すす ミ ミミ ます ※ え まま 


トト スオミ ミミ ミト テニ スミ すま ます 】 


FE です で すす テテ で すす ミミ すま スス ミミ ミスミ ミス スミ 】 


すま すす EYESESLEELLRSRSSSSSSESSSLS 


111 
111 
112 
112 
112 


不定 長 レコ ー ド PF と PP すす で すす で で で で で です で すす すす で すす ミミ て 1 135 
RECSTZB ォ プション で" 135 
BLKSTZB オ プシ ョ ン PEOPLECCLPELELLEEKEL 136 
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OONSEOUTIVEB デ ー タ ・ セ ッ ト 。 ………… 137 
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LBAVB オ ブダ プション "oeeerrrrnrrrn 137 
UNLOAD オ ォ オプ ション で ドサ イキ サキ すそ 138 
NOTAPBIMK オ ォ オプション PFFF FFP ま て て で で と ミエ すす ミド 138 
NOLABBL ォ プション 0 “で で TE 138 
ASOTT デ ーー タ ・ セ モットー mm 138 
ASO 上 上 エ オジ ピション …ー に で 138 
BUFOFE オプ ショ ン お よび ブロ ッ ク 
反 頭 語 フ ィ ー ル ド 呈 PPPPPPEYYYYYYEPECPYYLLLCKr ま ミル 138 
D - 形式 な よび DB - 形式 レコ ュー ド PPEFKK す PP 138 
省略 時 解釈 の 規則 生生 と た 139 
直接 アク セス 装置 の 用 法 SS20238280 の KaiE 人 SS SNE 139 
VBRIEY オ ォ オプション PEPKPPCECELELCLLLLOLELLERLESM 1 39 
第 1 2 曹 : レコ ー ド 方 式 の 転送 Dee206 が Aa 14 1 
転送 され る デー タ じき で た ん 14 1 
デー タ の 集合 体 rs 14 1 
境界 合せ され を な い ビ ピット ・ ス トリ ング rme 14 1 
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第 [部 : PL /| の 概念 


第 1 部 : PL プ 1 の 概念 1 


第 1 章 PL/ グ | の 基本 的 な 特徴 


PL ノ 1 言語 の 様々 た 機能 を 調べ て みる と , PL/1 が 積木 方 式 K 
な っ て ぉ ぶり, そのため (C, 様々 を 要件 に 合わ せ て サブ モッ ト を 容易 
て 選択 で き る よう C な っ て いる と と が わか る 。 と の よう る 々 積木 方 式 
は , PL{ の 最も 重要 を 特徴 の 1 つ で ある 。 


と の 章 で は , と の 言語 の 全般 的 を 概要 を 知る た め (C, 数 々 の 基本 
的 を 特徴 の ほ ゞ すべ て に つい て , 簡単 に 説明 する 。 各々 の 特徴 の 詳 
細 は , 後 の 章 で 解説 する 。 


機械 か ら の 独立 性 


使用 する 機械 を 全く 考慮 し た いで プロ グラ ム を 書く と と の で きる 言 
語 は を い が , それ で も PL/1 は , 一 般 に よく 使わ れ て いる 他 の 言 
語 C く ら べ れ ば , 機械 Cc 依存 する 度合 が 非常 に た 少 を いと いえ る 。 独 
立 性 を 得る た めし 用 いら れ て いる 方 法 は , 言語 の 中 で は 制約 の 形 と 
な っ て 表 わ れ て いる 。 最も 顕著 を 例 と し て , 異なる 性 質 を も ゃ も つ デ ー 
タ は 通常 同じ 記憶 域 を 共有 する と と が で き な い , と いう と と が あげ 
られ る 。 肖 動 小数 点数 と 所 定 の 格 数 の 英字 を 等 し い ゃ の に する と いう 
と と は , と れ ら の デー タ 項 目 の 表 現に つい て 特別 を 想定 を し て いる 
と と に て なり, と れ は , すべ て の 機械 に つい て 正しい と は いえ な いか 
ら で あ る 。 


機械 か ら の 独立 信 を 得る た め に 払わ れる 代償 が , と き (C は 非常 に 
高価 を な も の (に な る と と も ゃ ある 。 効率 を よく する と い 9 う 観点 か ら , 
UNSPEC 組込み 関数 や レコ ュー トト 方 式 の デー タ 転 送 を どの 特定 の 
機能 で は , ある 程度 機械 て 依存 する こと と を 許し て いる 。 


プロ グラ ム の 構造 


PL プ IT の プロ グラ ム は , ブロ シー ジャ ー と 呼ば れる 1 つま た は 2 
つ 以 上 の ステ ー ト メン ト の ブロ ッ ク か ら な っ て いる 。 ブロ ジー ジ ャ 
ー は , サブ ルー チン と 考え を て も よい 。 プ ブロ シー ジャ ー は 他 の ブロ ン 
ー ジ ャ ー を 呼び 出す と と が で きる が , と の よう な 場合 の プロ シー ジ 
ャ ー ま た は サブ ルー チン は , 別々 <C ヒ コン バイ ル し て も よい し , ある 
い は 呼出 し 側 の ブ プロジ シー ジャ ー の 中 に ネス ト し て お き , いっ し ょ を 
ュ ン バイ ル し て も よい 。 各 プ ロン シ ー ジ ャ ー ど と, 名 前 を 定義 する 
宣言 や 記憶 域 の 割 振り を 制御 する 宣言 を 含め る と と が で きる 。 


どく 初歩 的 段階 を の ぞい て , PL/1 を 正しく 理解 す る 上 で , 
プロ シー ジャ ー の 使い 方 を 定義 する 規則 , プロ ンー ジャ ー 間 の 連絡 , 


名 前 の 意味 , お よび 記憶 域 の 割 振り は , 基本 的 で 重要 を 事項 で ある 。 
と れ ら の 規則 を 応用 する と と に よっ て プロ グラ マー は , サブ ルー チ 
ン 間 の 相互 関係 の 度合 を , か を り 制 御 す る と と が で きる 。 と れ ら の 
規則 は , 柔軟 性 の ある 連絡 や 記憶 域 割 振り を 許し て いる が , それ と 
同時 名 前 の 定義 や 記憶 域 の 割 振り を 1 つの プロ シー ジャ ー 内 で 個 
有 の も の (CC し て ぉ お く と と も 可能 に し て いる 。 


PL/1I で は , サ ブル ー チ ン を 自己 内 蔵 的 に し て お ぉ く 度 合 を 決定 
する 自由 が プロ グラ マー 与え られ て いる の で , プロ グラ マー は , 
他 の 環境 で も 自由 KC 使用 で きる プ ブログ ラム を 書く こと が で きる が , 
一 方 で は , 相互 関係 が 必要 を と き は ブ プロシージャー の 中 相互 作用 
の 要素 を 盛り 込む と と も で きる 。 


デー タ の タイ プ こ と デー タ の 記述 


PL 1 が 広い 範囲 の 適用 業務 C 使 用 で きる 最も 大 き な 理 由 の 1 つ 
は , 表現 , 取り 扱い の 可能 な デー タ の タイ プ が 多い と いう と と で あ 
る 。 PL 1 は , 算術 デー タ , スト リン グ ・ デ ー タ (ピット と 廊 字 ), 
お よび ラベ ル な どの ブロ グラ ュ 制 御 デ ー タ を 取り 扱 2。 算術 デー タ 
の 表現 方 法 に は 様々 な も の が あり , 2 進数 また は 10 進 数 , 固定 小 
数 また は 浮動 小数 , 実数 また は 複素 数 の いずれ で も よく , また , そ 
の 精度 も 指定 する と と が で きる 。 


PL プ I が 行 を ら 演 算 C は , 算術 演算 , 比較 演算 , ビット ・ ス ト 
リン グ の 論理 操作 , 文字 スト リン グ の 組み 立て , 走査 , 分 割 の 操作 
と 機能 が ある 。 


コン バイ ラー は , ブロ グラ ム の 中 で 使用 3 れ て いる すべ て の 名 前 
と , その 名 前 < 関連 する 属性 の セット 全体 を 判定 する と と が で き な 
けれ ば な ら な い 。 とれ ら の 属性 は . プロ グラ マー が DECLARE 
ステ ー ト メン ト を 用 いて 明示 的 指定 する と と も で きる し , コン ズバ 
ィ ラ ー が 六 脈 か ら 属 性 の すべ て また は 一 部 を 決定 する と と も で きる 。 
また , 履 性 の 一 郭 ま た は 全体 が 省略 時 解釈 C よっ て 根 定 され る と と 
も ある 。 プ ログ ラマ ー は , と の 属性 省略 時 解釈 を 適用 する か 指定 
する と と も で きる し , ある い は それ ら を コン バイ ラー 決め させ る 
と と も で きる 。 


省略 時 解釈 


PL ン I の 重要 な 機能 の 1 つ に , 省略 時 解釈 と いう 概念 が ある 。 あ る 1 
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つの 名 前 結び つけ られ る 属性 の すべ て , また は ある 1 つの ステ ー 
トメ ント で 許さ れる オプ ショ ン の すべ て を プロ グラ マー が 指定 し を 
か っ た 場合 は 。 コン バイ ラー が 属性 また は オォ オプション を 割り 当て る 。 
と の 省略 時 解釈 の 働き か ら , 次 の よら な 2 つの 大 き を 結果 が 得 ら れ 
る 。 第 一 c, 宣言 の 数 や その 他 の ブロ グラ ム を 書く 手間 が 滅 る 。 第 
に , プロ グラ マー は , その 中 入っ て いる すべ て の 選択 項目 を 知 
ら な く て $, 場合 に よっ て は 選択 項目 の 存在 さえ も ゃ 知ら なく て も , 

と の 言語 の サ プ セ モッ ト を 教え た り , 使用 し た りす る と と が で きる 。 


ュ ン バイ ラー が 想定 する 省略 時 解 羽 の 属性 は , PL ノ { 言語 の 標 
準 的 を 省略 時 解釈 の 属性 。 その コン バイ ラー で 実施 され る 精度 の 
名 牙 時 解釈 で ある 。 し か し , ブロ グラ マー は , DEFAULT ステ 
ー ト メン ト を 用 いて , と れ ら を 打ち 消す と と も で きる 。 


竜 選 択 C し よっ て , コン パイ ラー は , PL 原始 ブログ ラム の 
中 で 使用 され て いる 識別 名 が 記載 され て いる 属性 の リス ティ ング ク , 
ぉ よび 明示 宣言 また は 文脈 宣言 に よ っ て 指定 され た 属性 , また は 省 
略 時 解釈 が 適用 され た 結果 指定 され た 属性 の 完全 な リス ト を 作成 す 
る 。 ブ プロ グラ マー は , と これら の リス ティ ング を 使用 し て , これ ら の 
属性 が 意図 し た も の と 矛盾 し て いな いか チェ ッ ク す る と と が で きる 。 


記憶 域 の 割 振り 


PL ン 1 は , 記憶 域 の 割 振り の 融通 性 と いう 点 で , 他 の 言語 より は 
る か KC 優れ て いる 。 動 的 記憶 域 を 割 振る と と は , アセ ンプ ラー 
言語 の プロ グラ マー が 自分 自身 で 処理 する と すれ ば 相当 難し い 手 法 
で ある が , PL/1I で は , と れ が 自動 的 CK 行 を われ る 。 記憶 域 ク ラ 
ぇ ュ C は , AUTOMATIC,STATIC,CONTROLLED , 
BASED の 4 種類 が ある 。 通常 , PLI の 記憶 域 ク ラス KC 関す 
る 省略 時 解釈 は 。 AUTOMATTIC で ある 。 と の クラ ス の 記憶 域 は , 
変数 が 宣言 され て いる ブロ ッ ク が 活用 化 さ れ た と き に いつ も ゃ 割り 振 
られ る 。 また , と の 時 点 で , 配列 の 限界 と スト リン グ の 長 さ が 計 
算 さ れる 。 AUTOMAT1IC 記 憶 域 は , その 記憶 域 が 割り 振 られ 
て いる ブロ ッ ク か ら 制 御 が 移 っ た と き は つね (C, 解放 され , 再び 使 
用 する と と が で きる よう な る 。 


記憶 域 は STATIC と 宣言 する と と も で きる が と て の 場合 は , 
プロ グラ ム が ロー ド さ れる と き K 記 憶 域 が 割り 振ら れる 。 
CONTROLLED と 宣言 し た と き は , ブロ ッ ク の 呼出 し と は 無 関 
係 CG, プロ グラ マー が ALLOCATE お よび FREE ス テー トメ ン 
ト を 用 いて 明示 的 (制御 する 。BASED と 宣言 し た 場合 は , プロ 
グラ マー は さら 高度 の 制御 を する と と が で きる 。 


と の よう KC, 幾 種類 も の 記憶 域 ク ラス が ある の で , ブロ グラ マー 
は , それ ぞ れ の 適用 業務 に 応じ て , スピ ー ド , 記憶 域 ス ペー ス , ま 
た は プロ グラ ミン グ の 経済 性 を ど を , 自分 自身 で 判断 する と と が で 
き る 。 特定 の 機能 を 実行 する 上 で か か る コス ト は , 実施 環境 に よっ 
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て 異な た る が , 一 般 C, 記憶 域 の 割 振り が 動 的 に C を る は ほど , 実行 時 間 
が 大 きく を なる, と いう こと が 云え る 。 


式 


PL ン I で は , 計算 は 式 を 使っ て 指定 する 。 PL/T の 式 は , 基本 
的 な 数 式 と 同じ 意味 を も っ て いる 。 た と えん ぱげ , 


A 填 B* ネ C 


上 の 式 は , B の 値 CC の 値 を 掛け , その 結果 (CA の 値 を 加え る と と 
を 指定 し て いる 。 PL/I は , 式 の 中 で 使用 で きる デー タ の 種類 
ほとん ど 制 約 を 加え て いな を な い 。 た と えば , あま りあ り 得 る と と で は 
を な い が , A が 浮動 小数 点数 , B が 固定 小数 点数 , C が 文字 スト リン 
グ と いう と と る 可能 で ある 。 


と の よう な いく つか の タイ プ の デー タ が 混 さ っ て いる 式 を 指定 す 
る と , 意味 の ある 演算 が で きる よう (CC オ ペラ ンド が 変換 され る 。 し 
か し , と の よう な 場合 は , 変換 され た デー タ が 元 の 値 と 同じ < を ら 
な いと と も ある の で , 変換 の 規則 を 充分 考慮 し まけ れ ば ならない 。 
また , 変換 が 行 を われれ ば , それ だ ヴ び 実 行 時 間 が 増す の は 当然 で あ 
る 。 


式 の 計算 結果 は , 割当 て ステ ー ト メン ト に よっ て 変数 < 割 り 当 て 
られ る 。 次 に あげ る の は , 割当 て ステ ー ト メン ト の 例 で ある 。 


双 ー ニ A 十 B 玉 Cs 


と の 意味 は , 右辺 の 式 を 計算 し て , その 計算 結果 を C 貯 える と い 
うら と と で ある 。 又 の 属性 が 式 の 計算 結果 の 属性 と 違っ て いる 場合 は , 
再び 変換 が 行 を われ る 。 


デー タ の 集まり 


PL し 1 に は , デー タ の 集まり , つま り デ ー タ の 集合 体 に つい て 記 
述 し た り , 操作 を 行なっ た りす る た め の 方 法 が いく つか 用 意 さ れ て 
いる 。 配列 は , 全部 が 同じ タイ プ の デー タ 有 要素 を 集め た も の で , 1 
次 元 ま た は 数 次 元 に わた る リス ト ま た は テー ブル の 形 (C を っ て いる 。 
構造 は 。 上 下関 係 を も た せ た デ ー タ の 集まり で , すべ て が 同じ タイ 
プ の も の で ある 必要 は を い 。 上 関係 に ある 各 レ ベル の 中 C, さら 
(て 低い レベ ル を も つ 別 の 構造 が 含ま れ て いて も よい 。 別 の 構造 を そ 
の 中 含ま ない 項 目 は , 基本 デー タ 項 目 ま た は 配列 を 表わし て いな 
けれ ば な らい 。 


配列 の 要素 が 構造 で も っ て も よい 。 同様 CK, どの レベ ル の 構造 も 
配列 で も っ て よい 。 配列 , 構造 , ある いひ は 配列 ま た は 構造 の 一 部 
対し て 演算 を 指定 する こと と も で きる 。 た と え ぱ げ , 


A 三 B 十 Ci 


と の 割当 て ステ ー ト メン ト の 中 で , A, B, お よび C が , 配列 また 
は 構造 で ちっ て よい 。 


入力 と 出力 


入出 力 関 する 機能 が いく つも ゃ も 用意 され て いる の で , ユー ザー は , 

簡便 さ , 機械 へ の 依存 度 , 効率 を ど を 考え 合わ せ て , その 要素 の 中 
か ら 選 択 す る と と が で きる 。 PL/1 の 入出 力 と は, 大 きく わけ て , 
スト リー ょ > 式 と レコ ー ド 式 の 2 種類 が ある 。 


スト リー っ > 式 入出 力 は , ほぼ 完全 (C 機 械 か ら 独 立 し た 形 で 行なわ 
れる 。 入力 の 際 C は , 連続 する 文字 の 流れ と 考え られ る も の か ら , 
デー タ 項 目 が 1 つ ず つ 選 択 され て , 内 部 形式 変換 され リス ト の 
中 で 指定 され た 変数 に 割 り 当 て られ る 。 同様 C, 出力 の 際 C は , デ 
ー タ 項目 は 1 つ ず つ 外 部 文字 形式 変換 され て , 概念 的 に は 連続 す 
る 廊 字 の 流れ と 考え られ る も の CK 加え られ て ゆく 〈。 ブロ グラ マー は , 
デー タ 項 目 の 編集 の 仕方 や , 流れ の 中 か ら そ れ ら を 選択 し た り , 流 
れ に 入れ た りす る 方 法 ' 対し て 加え られ る 制御 の 様々 の レベ ル を , 
スト リー ュ 式 入出 力 の クラ ス の 中 か ら 選 択 す る と と が で きる 。 


印刷 の 場合 , 出力 の 流れ は 行 と ペー ジ C 分 け られ て いる と 考え る 
と と が で きる 。 出力 スト リー ム ・ フ ァイル は , 行 の 大 き さ と ペー ジ 
の 大 き さ を 指定 し て , 印刷 ファ イル と し て 宣言 する と と が で きる 。 
ペー ジ の 終り を 検出 し た り , 行 ま た は ペー ジ の 始ま り を 指定 する 能 
力 が ,。 プロ グラ マー 与え られ て いる 。 と これら の 機能 を サブ プルー チ 
ン の 中 で 使用 し て , 特定 の 客 先 また は 適用 業務 < 適し た 報告 書 作成 
シス テム (まで 発展 させ て ゆく と と も 可能 で ある 。 


レコ ー ド 式 入 出力 は , 機械 に 依存 し て いる 。 と の 方 式 で は , レコ 
ー ド と 呼ば れる デー タ の 集まり を 取り 扱っ て お り , 一 時 点 C 1 レ ュ 
ー ド ずつ デー タ 変 換 を 行 を わ ず K 転送 する 。 外部 で の 表現 が その ま 
ま 内 部 で の 表現 (C た る 。 集 合体 が 1 つの 全体 と し て 取り 扱わ れ , し 
か も 変換 が 行 を われ を い の で , と の 形式 の 入出 力 は , スト リー ム 式 
入出 力 K くら べ て 効率 が よい 。 


スト リー> 式 入出 力 は 通常 , 取扱 い の 容易 さ を 得 る か わり K, 効 
率 を 犠牲 に C し て い る 。 各 デー タ 項 目 は 別々 転送 され , デー タ 変 換 
が 必要 か どうか 調べ られ る 。 そ れ 対 し て , レコ ュー ド 式 入出 力 で は , 
レコ ー ド 全体 が 変換 も る せ ず 転送 され る た め , 転送 の 速度 が 速め 
られ る 。 


互い 関係 の ある いく つか の デー タ ・ セ キット を 含む デー タ ・ ベ バン 
ク K 対 する 入出 力 操作 は , ファ イル 変数 を 使用 する こと (CC よっ て 衛 
単に する と と が で きる 。 す べ て の 入出 力 ス テー トメ ント は , ブログ 
ラム の 実行 中 に ファ イル の 値 を 与え た り , 修正 し た り し て , ファ イ 
ル ん 変数 を 使用 する と と が で きる 。 


コン パイ ル 時 の 操作 


PL プ 1 で は , コン バイル の 自 誠 で の 操作 が 許さ れ て お なり, と の 

時 に , 原始 アロ グラ ム の テキ スト 自体 CK 加 えら れる 操作 を プリ プロ 
セッ サー・ ス テー トメ ント を 用 いて 指定 す る 。 最 も 簡単 で ,。 ま た お 
そら くけ は 最も よく 使わ れる プリ プロ セッ サー・ ス テー トメ ント は, 
究 INCLUDE で あぁ る (一般 CC, プリ プロ モッ サー・ ス テー トメ 
ント の 前 C は % 記 号 が つけ られ る ) 。 と の ステ ー ト メン ト は は, 
% INCLUDE ステ ー ト メン ト 自 体 と 思 き 換え て プロ グラ ム の 中 
(C テ キス ト を 失 入 す る 働き を する 。 と の 手法 の 典型 的 を 使用 例 と し 
て , その 客 先 の 標準 的 を 定義 の セッ ト か ら 宣 言 を ブログ ラム の 中 
複写 する 場合 が あげ られ る 。 


コン バイ ル 時 K 行 を われ る 操作 の も う 5 1 つの 働き と し て , ブロ グ 
ラム ・ テ キス ト を 取捨 選択 的 に コン バイ ル す る とこ と も で きる 。 た と 
えば , デベ バッ ギ ング 用 の ステ ー ト メン ト を 組み 込ん だ り , 削除 し た 
りす る と と を 指定 する こと が で きる 。 


PL/1I の 働き の らち も 簡単 で は ある が 非常 に 強力 を 部 分 を , コン 
バイ ル 時 の 操作 で 使用 する と と が で きる の で , テキ スト の 生成 , ま 
た は 儲 換 え や 削除 は , これ まで の も の よ り 精 巧 で 微妙 を 変形 を 行 な 
ら と と が で きる よら な っ て いる 。 と の よう し て 変形 され た も の 
は , 各 客 先 に < よ っ て 定義 され た PL{ 言語 の 拡張 機能 と 考え る と 
と も で きる 。 


割込み 操作 


最近 の 計算 シス テム C は , 例外 的 を 条件 か 起 っ た と き は いつ で も プ 
ログ ラム の 実行 を 中 断 す る 機能 が 備わっ て いる 。 さら 《C, と れ ら の 
機能 は , ブロ グラ ム K 例 外 的 を 条件 を 処理 させ , 中 断 が 起 っ た 地点 
(C 戻 させ る 働き も する 。 


PL1 は , 様々 を 例外 条件 を 検出 する 機能 を も る っ て いる 。 ブロ 
グラ ャ ー は , 該当 する 条件 が 起 っ た を ら ば 割込み を 起す よう , 条件 
接頭 語 を 使っ て 指定 する と と が で きる 。 ON ステ ー ト メン ト を 使用 
すれ ば , ブロ グラ マー は , 割込み が 起 っ た と き に と る べき 処罰 も 指 
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定 す る と と が で きる 。 


オペ レー ティ ング ・ シ ステ ム の 機能 


PL/I の プロ グラ マー は , シス テム 360 ま を は シス テ ュ 
370 ディ スク ・ オ ペレ ー テ ィング ・ シ ステ ム が も ゃ も つ 数 々 の 機能 を 
呼び 出す と と が で きる 。 そ の 中 で も 特 て 重要 を た もの, た と えば 諸 言 
語 間 の 連絡 機能 , 分 類 ノ 組合 せ 機 能 , な よび チェ ッ ク ポ イン ト グ 再 
始動 機能 C つ いて , 以下 概略 を 述べ る 。 と の コン パイ ラー に 対す 
る プロ グラ マー の 手引 書 の 中 で , と れ ら の 関連 機能 の すべ て が 人 解説 
され て いる 。 


PL プ I ブロ グラ ム は , 実行 時 CCOBOL お よび FORTRAN 
の ルー チン と 連絡 する と と も で きる (た だ し , と れ ら の ルー チン は , 
シス テム グ 36 0 ディ スク ・ オ ペレ ー テ ィング ・ シ ステ ム K 対 し て 
TI BM が 開発 し た コン バイ ラー に よっ て コン バイ ル さ れ た も の で な 
けれ ば た なら な い ) 。PL プ エプロ シー ジャ ー は , CO0BO 工 また は 
FORTRAN の ルー チン を 呼び 出す と と が で きる し , また 
COBOL ま た は FORTRAN の 主 プ ログ ラム また は ルー チン か ら 
呼び 出さ れる と と る ゃ 可能 で ある 。 さ ら 《C, COBOL デー タ ・ セ ッ 
ト を 作成 し た り , プア クセ ス し た りす る た め (C, PL ノエ ブロ グラ ム 
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を 使用 する と と も で きる 。 以上 の 機能 は すべ て PL 言 茜 C 備 わ 
っ て いる も の で あり , 本 書 で も 取 り 上 げ て 解説 する 。 ま た , アセ ン 
プラ ー 言 語 を 間 (C 介 在 さ せれ ば , 上 記 以 外 の 言語 と PL ノ { 言語 と 
の 間 で の 連絡 も 可能 に な る 。 と の よう を イン ター フェ ー ス に つい て 
は , ブロ グラ マー の 手引 書 の 中 で 解説 され て いる 。 


オペ レー ティ ング ・ シ ステ ュ が , 分 類 ン 組合 せ プ ログ ラム を 組み 
込ん で 生成 され て いる 場合 は , PL ノ IT プロ グラ マー は 分 類 ン 組 合 
せ 機 能 を 使用 する と と が で きる 。 と の 機能 は , PLI で 作成 し た 
デー タ ・ セ ッ ト 上 の レ ュ コード, PL エエ 1 ブロ グラ ム か ら 渡 され た デ 
ー タ , お よび PL プ T ブロ グラ ム K 濾 され た デー タ の いずれ 対し 
て も る 使用 する と と が で きる 。 


ある PL/T プロ グラ ム を , 長 時 間 に わ た っ て 実行 する 場合 は , 
オペ レー ティ ング ・ シ ステ ム の チェ ッ ク ポ イン トン ジグ 再 始動 機能 を 利 
用 し て , 機械 また は シス テム の 故障 に よっ て 引き 起 さ れる 損失 を 最 
少 限 C と とどめ る と と が で きる 。 故障 の あと 処理 を 再開 する チェ ッ ク 
ポイ ント を , ブロ グラ マー が , ブロ グラ ムッ ム 内 の 任意 の 位 思 に 選択 す 
る 。 そ の チェ ッ ク ポ イン ト か ら , 故障 が 起き た と と ろ ま で の 間 で 行 
な われ た 処理 だ けが , 無駄 に な る 。 チ ェ ッ ク ポ イン ト の と こと ろ ま で 
C 得 られ た 結果 は , 実行 を 続け る の KC 必 要 を デー タ ( プ ログ ラム の 
コピ ビー お ぉ お よび それ 関連 する 記憶 域 も 含め て ) と いっ し ょ KK, 補助 
記憶 装置 < 保存 さ れる 。 


プロ グラ ム の 庄 要 素 


PL ノ I ステ ー ト メン ト は , 形式 上 の 制約 が ほとん と な を い の で , 
特別 を コー ディ ング 用 紙 を 使っ た り , 各々 の ステ ー ト メン ト が 特定 
の 桁 か ら 始 まっ て いる か どう か チェ ッ ク し た りす る 必要 な し <, ブ 
ログ ラム を 書く と と が で きる 。 各々 の ステ ー ト メン ト は , セミ コロ 
ン で 止め る 点 以外 , 形式 は 全く 自由 で ある 。 前 の ステ ー ト メン ト の 
次 の 桁 キ た は 位置 か ら , 次 の ステ ー ト メン ト を 書き 始め て も よい し , 
間 に プ ラン ク を 何 桁 入 れ て も よい 。 


文字 セッ ト 


原始 プロ グラ ム を 書く 際 C は , 2 種類 の 文字 セット (6 0 文字 モッ 
ト と 48 文 字 セ ッ ト ) の どちら か を 使用 する と と が で きる 。 あ る 外 
部 プロ シー ジャ ー《C,。 2 つの セッ ト の らち と ちら を 使う 2 か と いう と 
と は 任意 選択 で ある が , 実際 に は , と の 選択 は , 使用 し て いる 装置 
て よ っ て 決ま る 。 


60 文 字 セ ッ ト 


6 0 文字 セッ ト は , 数 字 , 特殊 文字 , お よび 英字 か ら 構 成 さ れ て い 
る 。 


英字 と し て 扱わ れる も の (C は 2 9 種類 あり , 通貨 記号 ($ ), ナ 
ン バー 記号 (# ) , 単価 記号 (@ ) と , その 人 後 (英字 の 26 交 字 が , 
拡張 2 進化 10 進 コー ド (EBCDIC ) 形式 で , IT BM シス テム 
3 6 0 C お ける 暴 合 順序 に < し た が っ て つづ いて いる 。 英語 以外 の 言 
語 を 使用 する 場合 は , $ , #, な よび @ を 別 の 文字 C か を る と と も ゃ 
で きる 。 


数 字 は 1 0 個 あ り , 10 進 数 は 0 か ら ? ま で の 数 , 2 進数 は 0 か 
1 で ある 。 


特殊 文字 は , 以下 に あげ る よう (, 全部 で 2 1 個 あ る 。 


プ ブラ ンク 
等 号 ま た は 割当 て 記号 ピコ 
正 符 号 十 
負 符 号 ー 
星 印 また は 乗算 記号 玉 
斜 線 ま た は 除算 記号 と 
左 括 線 ( 
右 括弧 ) 
カン マ ま 
小数 点 ま た は ピリ オド 

単 一 引用 符 
また は け ア ポス トロ フィ 

ベー セン ト 記 号 % 
セミ コロ ン 1 
コロ ン 
WNot『" 
W And『 
MOrW 


如 山 
CU 


如 員 | 如 山 
CU FEH 
dH d⑪ dL 


す て 
NS* 
小 
吉山 昌 間 
CU CH 
dh mh 


" ょ り 小 " 
分 割 女 字 ー 
胡 問 符 1 


特殊 文字 を 組み 合せ て , 別 の 記号 を 作る と と が で きる 。 た と えば , 
ぐ = テ は , “" より 小 , また は 等 し い "と いら 意味 で あり , コー は , 

* 等 し く を ない ” と い 2 意 味 で ある 。 ** の 組合 せ は , べき 乗 を 表 わ 
す (XX*※2 は 双 * と いう 意味 で ある ) 。 と の よう な 合 成 記 号 の 中 
プラ ンク を 入れ て は な ら な い 。 分 割 文字 は , タイ プラ イタ ー の アン 
ダー ライ ン (下線 ) と 同じ で あり , 名 前 の 中 を など で, 読み や すく ぐす 
る た め ICGROSS_PAY と いら よ うら 人 使う こと が で きる 。 


48 文 字 セ ッ ト 


4 8 文字 セ モット は, 60 文字 セッ ト の らち の 48 文字 か ら 構 成 さ れ 
て いる 。 以下 に あげ る 4 つの 文字 を 除い て , 数 が 減ら され た 文字 セ 
ッ ト に ある 文字 を 組み 合わ せ て , 大 き な 文 字 セ モッ ト か ら 抜 か され た 
女 字 を 表現 する と と が で きる 。 た と えば , 48 女 字 セ モッ ト (C バ パー セ モ 
ント 記号 (% ) が 含ま れ て いな を いと すれ ゆ ぱ , 斜線 を 2 つ 使 っ て 

( ノノ ) 表わす と と が で きる 。 と の よう 組み 合せ て 表現 する と と 
の で き な い 文字 は , 通貨 記号 , ナンバ ペー 記号, 分 割 文字 お よび 錠 
問 符 の 4 つ で ある 。 


と の 文字 セッ ト C 関 する 制約 と その 修正 方 法 に つい て は , B 節 「 交 


字 セ モッ ト ぉ お よび その EBCDIC と カード 漏 北 コ ー ド 」 の と と ろ で 
説明 する 。 
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リス ト 内 の 要素 を 区 切る 


2 進数 また は 1 0 進数 の 小数 点 を 表わす 。 修飾 され た 名 前 の 要素 を 連結 する 。 


ステ ー ト メン ト の 終り 


値 の 割当 て を 表わす 。 ! 


ステ ー ト メン ト K《 接 頭 語 を 連結 する 。 配列 の 限界 を 指定 する の 使用 する と と が で きる 。 


ステ ー ト メン ト の 要素 を 区 切る 。 
スト リン グ 定 数 と ビク チャ ー 指 定 を 囲む 。 


リス ト を 囲む な の 用 い られ る 。 様々 た キーワード K 関 連 す る 情報 を 指定 する 。 演算 子 な お よ び オ 
ペラ ンド と 組合 わせ て , 計算 式 の 部 分 を 区 切る 。 


ログ ケー ター 修飾 を 表わす 。 
パー セン ト 記 号 コン ズバ イル 時 に プリ ブロ セッ サー に よっ て 実行 され る ステ ー ト メン ト を 表わす 。 


1 とい 2 文字 は , 等 号 と し て る 割当 て 記号 と し て も 使用 で きる と と 注意 。 


図 2.1 特殊 文字 の 諸 機能 


文字 セッ ト の 用 い 方 ・ 比較 演算 子 は 以下 の 通り で ある 。 


の "より 大 "を 表わす 
コク "より 大 きく な い 『" を 表わす 


PL プ 1 ブロ グラ ム を 構成 する 要素 は すべ て , PL ノ { 交 字 モッ ト >ー 『! より 大 また は 等 し い " を 表わす 

を 使っ て 作り 上 げ ら れる が , 2 つ だ け 例 外 が あり , 文字 スト リン グ 三 "等 し いら "を 表わす 

定数 と 注 釈 は 。 8 ビッ ト ・ コ ー ド で 表わさ れる 2 56 文字 の 中 の ど コー "等 し く な い 『 を 表わす 

の 文字 を 含ん で いて も よい 。 く 三 『! よ り 小 また は 等 し い 『 を 表わす 
に 『 より 小 『" を 表わす 

文字 の 中 に は , PL プ T ブ プログ ラム の 中 で 特殊 を 働き を する も の コー "より 小さ く な い 『 を 表わす 


が ある 。 たとえば, 演算 子 と し て 働く 文字 が いく つか る ぁ る 。 
ビット ・ ス トリ ング 演算 子 は , 以下 の 通り で ある 。 
演算 子 に は , 算術 , 比較 , ビッ ト ・ ス トリ ング , お よび スト リン 


グ の 4 種類 が ある 。 リ "not " を 表わす 
トウ リ "and ! を 表わす 
算術 演算 子 は , 以下 の 通り で ある 。 | ! or " を 表わす 
十 加算 また は 正 の 接頭 語 を 表わす スト リン グ 演 算 子 は 以下 の 通り で ある 。 
ー 項 算 また は 負 の 接頭 語 を 表わす 
洲 乗算 を 表わす || 連結 を 表わす 
グ 除算 を 表わす 
米 来 べき乗 を 表わす 図 2.1 は , 上 記 の 他 の 特殊 文字 の 働き を 示し た も の で ある 。 
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識別 名 


PL プ I ブロ グラ ム の 中 で は , デー タ , ファ イル 。 ステー トメント, 
お よび 別 の プロ グラ ム ュ 域 の 入口 点 C, 名 前 また は ラベ ル を 与え る て 
と が で きる 。 名 前 また は ラベ ル を つけ る 際 C, プロ グラ マー は , 識 
別名 に 関す る 統語 規則 を 守ら を けれ ば な を ならない 。 


識別 名 は , 1 桁 の 英字 , また は 英 数 字 と 分 割 文字 か ら を る スト リ 
ング で , 注釈 また は 定数 の 中 含ま れ て お ら ず , 前 後に プラ ンク ま 
た は 何 か 他 の 区 切 り 記号 か ある も の で ある 。 ス トリ ング の 最初 の 六 
字 は 英字 で を けれ ば を ら を い 。 ま た, 長 さ は 3 1 桁 を 越え て は を なら 


な い 。 


言語 の キー ワー ド も や は り 識 別名 で ある 。 キ ー ワ ー ド は , 該当 す 
る 文脈 の 中 で 使用 し た と き (C, コン バイ ラーK 対 し て 特別 を 意味 を 
も つ 識 別名 で ある 。 キー ワー ド は , と る べき 処置 , デー タ の 性 質 , 
名 前 が も つ 目 的 を ど を 指定 する も の で , READ,DEC IMAL, 
ぉ よび ENDF TI LE を など が その 例 で ある 。 略記 で きる キー ワー ド 
も ある 。 キ ー ワ ー ド と その 略称 の すべ て を リス ト し た も の が か が , C 節 
「 キ ー ワ ー ド ぉ よび その 略称 ]」 記載 され て いる 。 


注 : PL ノ 1 の キー ワー ド は , 予約 語 で は を い 。 と れ ら は , 該当 す 
る 区 脈 の 中 CK 出 て きた と き (C て だけ , キー ワー ド と し て 認め られ る 。 
その 他 の 次 脈 の 中 で は , プロ グラ マー の 定義 し た 識別 名 と し て 使用 
する と と が で きる 。 


次 に あげ る の は , 名 前 また は ラベ ル と し て 使用 で きる 識別 名 の 例 
で ある 。 


A 

FILE2 
LOOP_5 
RATE_OF_PAY 
#32 


と の ュ ン パイ ラー で は , 後 の 章 で 述べ る いく つか の 識別 名 に つい 
て は , 長 さ が 7 桁 を 越え て は を ら ず , 分 割 文字 を 含ん で いて は を ら 
な いと いう 制約 が ある 。 と の よう な 制約 を 受け る の は , 外部 名 と 呼 
ば れる 特定 の 名 前 で , と れ ら は , オペ レー ティ ング ・ シ ステ ム や , 
別個 に コン バイ ル さ れ た 2 つ 以 上 の プロ シー ジャ ー か ら 参 照 す る と 
ょ が で きる も の で ある 。 PL ン 1I プロ シー ジャ ー の 外部 名 が 7 桁 を 
越 を て いる と , コン バイ ラー は , 先頭 の 4 桁 と 末尾 の 3 桁 を 連結 し 
て , 間 の 文字 を 切 り 捨 て る 。COBO し また は FORTRAN ル ー チ 
ン の 入口 名 は , 最高 8 桁 ま で 許さ れ て いる 。 ? 桁 以上 指定 する と , 
左端 の 8 桁 だ な けが 用 いら れる 。 


プラ ンク の 用 (方 


プラ ンク は , PL ンプ I ブロ グラ ム 全 体 C わ た っ て 自由 使用 する と 


と が で きる 。 プ ラン ク は , 演算 子 や 他 の 区 切り 符号 の 前 後に 思 く と 
と が で きる 。 一 般 (C,。 1 桁 で も プラ ンク を 置く と と が で きる と と みろ 
で あれ ば (たとえば, 1 つの ステ ー ト メン ト 内 の 各 語 の 間 を ど ), 
いく つ ブ ラン ク を 思 い て も よい 。 


識別 名 や 定数 が , 何 か 他 の 区 切り 符号 や 注 彼 と よっ て 区 切ら れ て 
いな いと き は , それ ら を 区 切る た め C 1 つま た は 2 つつ 以上 の ブラン 
ク を 使用 し を けれ ば な を ならない 。 し か し , 識別 名 , 定数 ( 女 字 スト リ 
ング 定数 を の ぞ く ) , ぉ よび 合成 演算 子 ( コー を ど ) の 中 に ブラ ン 
ク を 入れ て は な を ならない 。 


上 記 以 外 C, プラ ンク か 必要 な 場合 ある い は プラ ンク を 入れ て 
ょ い 場 合 に つい て は , その 機能 を 解説 する 文 の 中 で 注記 ナ る と と C 
する 。 以下 EE ブラ ンク の 用 計 の 例 を あげ る 。 


AB 十 BC と AB 十 BC は 同じ で ある 。 


TABLE(10) と TABLE (10 ) は 同じ で ある 。 


FIRST ,SECOND と FIRST, SBCOND は 同じ で ある 。 


ATOB と A TO B は 同じ で は を い 。 


注釈 


注釈 は ,。 プロ グラ ム の 中 で プラ ンク を 置く と と が で きる と とろ で あ 
れ ば と と 置い て も よい (た だ し , 文字 スト リン グ を どの デー タ 項 
目 の 中 は の ぞ く < ) 。 注釈 は プラ ンク と し て 扱わ れる の で , 区 切り 用 
の プラ ンク みか 必要 を と と ろ で か わり (《 人 使用 する と と も で きる 。 と れ 
以外 に , 注 秋 は プロ グラ ム の 実行 C は 何 の 影 響 も 及ぼ さ を ない 。 つま 
り , 注釈 は , 文書 記録 上 の 目的 に だ け 用 いら れる も の で ある 。 


注釈 の 一 般 的 な 形式 は , 次 の 通り で ある 。 
ン 玉 廊 字 スト リン グ ※ ブ 


ン ネ と いう 文字 の 組合 せ は , 注釈 の 始ま り を 示し , その 逆 の 組合 せ 
ネン は , 注 息 の 終り を 示す も の で ある 。 どちら の 場合 も 2 つの 交 
字 の 間 (C プラ ンク や 別 の 文字 を 入れ て 区 切っ て は を ら な い 。 つ まり , 
貸 線 と 星 印 が 直接 隣り 合っ て い を けれ ば な を ら な い 。 注 釈 自体 の 中 
は , ネネ ノ の 組合 せ 以 外 の 文字 を ら ば 何で も 入れ る と と が で きる 
(ネン が ある と , 注釈 の 終り と 解釈 され て し ま 2 ) 。 次 に あげ る の 
は , 注釈 の 例 で ある 。 


ノン ** THIS WHOLE SENTENCE COULD 
BE INSERTED AS A COMMENT キネ 


使用 する 機械 構成 で 許さ れる 文字 は 何で も , 注釈 の 中 C 書 く と と が 
で きる 。 
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注 : 注 釈 の 始ま り を 示す ノ ネ と い 2 文字 の 組合 せ は , 入力 レコ ー ド 
の 1 て 2 桁 目 < 入れ る と , 入力 の 流れ の 中 (C あ る デー タ を 区 切る た 
め C 用 いら れる プ ネ ジョ ブ 制 御 ス テー トメ ント と 取り 違え られ る 恐 
れ が ある の で , 1 一 2 桁 目 に 入れ て は な ら な い 。 


プロ グラ ム の 基本 的 な 構造 


PL プ I の プロ グラ ム は , ステ ー ト メン ト と 呼ば れる 基本 的 を プロ 
グラ ム の 要素 か ら 作 り 上 げ ら れ て いる 。 ス テー トメ ント に は , 単純 
ステ ー ト メン ト と 複合 ステ ー ト メン ト の 2 つの タイ ブ が ある 。 とれ 
ら の ステ ー ト メン ト が 集まっ て , グル ー プ お よび プ ブロック と 呼ば れ 
る さら K 大 き を プロ グラ ッ ム 要 素 を 作り 上 げ る 。 


単純 ステ ー ト メン ト と 複合 ステ ー ト メン ト 


単純 ステ ー ト メン ト K は , キー ワー ド , 割当 で お よび ナル , の 3 
種類 の ステ ー ト メン ト が あり , いずれ の 場合 も , モミ コロ ン で 終る 
ステ ー ト メン シト 本 体 を も っ て いる 。 


キー ワー ド ・ ス テー トメ ント は , その ステ ー ト メン ト の 機能 を 表 
わす キー ワー ド を も つも の で , 残り の 部 分 が ステ ー ト メン ト 本 体 
を る 。 


割当 て ステ ー ト メン ト は , 割当 て 記号 ( 三 ) が その 中 KC 含ま れ て 
いる も の で , キー ワー ド を も っ て いな い 。 


ナル ・ ス テー トメ ント は , セミ コロ ン だ け か ら な る ステ ー ト メン 
ト で , 操作 を 何 も 指 示し を い 。 セ ミコ ロン が ステ ー ト メン ト 本 体 で 
ある 。 


次 に 示す の は , 単純 ステ ー ト メン ト の 例 で ある 。 


GO TO LOOP_3』 (GO TO は キー ワー ド で ある 。GO と 
TO の 間 の ブラ ンク は 任意 選択 で ある 。 
ステ ー ト メン ト 本 体 は , LOOP_3} で 
ある 。 ) 

A =B 十 C ( 割当 て ステ ー ト メン ト ) 

合成 ステ ー ト メン ト は , その ステ ー ト メン トト 本体 の 一 部 と し て 1 

つま た は 2 以上 の 他 の ステ ー ト メン ト が 含ま れる も の で ある 。 合 

成 ス テー トメ ント (C て は, IF ステ ー ト メン ト と ON ステ ー ト メン ト 

の 2 つが ある 。 合成 ステ ー ト メン ト の 最後 の ステ ー ト メン ト は , セ 

ミコ ロン で 終る 単純 ステ ー ト メン ト で ある 。 し た が っ て , 合成 ステ 

ー ト メン ト は , この セミ コロ ン で 終了 する わけ で ある 。 以下 の 例 c 

示す よう (て, IF ステ ー ト メン ト C は 2 つの ステ ー ト メン ト (単純 

で る 合成 で も よい ) を 含め る と と が で きる 。 


10 DOS PL ノン 1 最適 化 コ ン パ イラ ー : 言語 解説 書 第 1 部 


IF A > B THEN A = B 十 Ci 
ELSE GO TO LOOP_ 3 


次 に あげ る の は , ON ステ ー ト メン ト の 例 で ある 。 
ON OVERFLOW GO TO OVEIX: 
ステ ー ト メン ト の 接頭 語 


単純 , 合成 , いずれ の ステ ー ト メン ト の 場合 も ,。 1 つま た は 2 つ 
以上 の 接頭 語 を つけ る と と が で きる 。 接頭 語 た は, ラベ ル 接 頭 語 と 
条件 接頭 語 の 2 種類 が ある 。 


ラベ ル 接 頭 語 は , プロ グラ ム 内 の ど と か 他 の 地点 か ら ス テー トメ 
ント を 参照 する と と が で きる よう MC, ステ ー ト メン ト を 識別 する 識 
別名 で , 該当 する ステ ー ト メン ト の 前 CK 書き, コロ ン を つけ て その 
ステ ー ト メン ト 連 結 す る 。 ど の ステ ー ト メン ト (C も , 1 つま た は 
2 つ 以 上 の ラベ ル を つけ る と と が で きる 。 2 以上 指定 し た 場合 は, 
それ ら の どれ を 使っ て も , その ステ ー ト メン ト を 参照 する と と が で 
きる っ 


条件 接頭 語 は , そこ と で 指名 され て いる 条件 が 起 っ た と き K 割 込み 
を 起す か どう か を 指定 する も の で ある 。 条件 名 は 言語 の キー ワー ド 
で あり , それぞれ , ブロ グラ ム の 実行 中 (C 起 り 得 る 例外 的 を 条件 を 
表わし て いる 。 OVERFELOW , SIZE を ど が その 例 で ある 。 
OVERFLOW 条 件 は , 浮動 小数 点数 の 指数 が , 許さ れる 最大 値 ( 約 
107? ) を 越え た と き K 起 と る 。 SIZE 条件 は , ある 値 を 変数 
割り 当て た と き K, 高位 の 数 字 や ビッ ト が 失 を われ て し まっ た 場合 
KC 起 と る 。 


ある 条件 が 起 ら を いと 確信 で きる 場合 は , プロ グラ マー は , その 
条件 接頭 諸 の 名 前 の 前 (Cc NO と いう 語 を 書い て , その 条件 を 禁止 す 
る と と が で きる 。 NO を 使用 する と き , NO と 条件 名 の 間 /C ブ ラ 
ンク を 入れ て は な ら な い 。 


条件 接頭 語 は , 1 つま た は 2 以上 の 条件 名 を カン マ で 区 切 り , 
括弧 で 囲ん だ リス ト か ら 構 成 さ れる 。 1 つの ステ ー ト メン ト (K 1 つ 
また は 2 つつ 以上 の 条件 接頭 語 を つけ る と と が で きる が , 括弧 で 囲ん 
だ リス ト の 後 て に は それ ぞ れ コロ ン を つけ を けれ ば な ら な い 。 条件 接 
頭 請 は , ステ ー ト メン ト 全 体 の 前 (ラベ ル 接 頭 語 が いく つか つい て 
いる と き は , その すべ て より 前 ) KC 書か を けれ ば な ら な い 。 次 に あ 
げ る の は , その 一 例 で ある 。 


(SIZE,NOOVERFELOW) : COMPUTE : 
A 三 BC ネ 六 Dj 


と の 条件 接頭 語 (この 例 で は 1 個 ) は , と の 割当 て ステ ー ト メン ト 
の 実行 中 S { ZE 条件 が 生じ し た と き は 割込み を 起す が , OVER - 
FLOW 条件 生じ し た と きけ は 割込み を 起 さ を いと と を 指示 し て いる 。 
ラベ ル 接 頭 語 COMPUTE より 前 C 条 件 接頭 語 が ある と と し 注意 
し て いた だ きた い 。 


接頭 語 と それ 結び つけ られ る ステ ー ト メン ト の 間 に あ る プラ ン 
ク は 無視 され る の で , カー ドド 入力 を 使用 する と き は , その ステ ー ト 
メン ト を 究 乾 する カー ド の 前 と 別 の カー ド を 入れ , そこ と C《 条 件 接頭 
語 を 宰 孔 する と 便利 で ある 場合 が 多い 。 と の よう (すれ ば , デベ ッ 
ギン グ の 後 で , 接頭 語 を 容易 (Cc 取り 除く と と が で きる 。 たとえ 


(NOCONVERS 1ION) : 

(SIZE,NOOVEREFELOW ) : 

COMPUTE: AB ネネ CD: 
と と で は け は, 条件 接頭 語 が 2 つ あ る と と 注意 し て いた だ きた い 。 最 
初 の 接頭 語 は , デー タ 変 換 の 試行 中 無効 を た 文字 が あっ て る も 割込み 
を 起 さ を いよ ょ よう 指定 し て いる 。 


個々 の 条件 接頭 語 に つい て は , 第 1 4 章 「 例 外 条 件 の 処理 と プロ 
グラ ム ・ チ ェ ッ クア ウト 」 の と と ろ で 説明 する 。 


グル ー プ と ブロ ッ ク 


グル ー プ は , DO ステ ー ト メン ト で 始ま り , 該当 する END ステ ー 


トメ ント で 終る 一 連 の ステ ー ト メン ト で あり , 制御 の 目的 (< 使用 さ 
れる 。 DO グル ー プ と 呼ば れる と と も ある 。 


プ ブロック は , ブロ グラ ム の 領域 を 定義 する 一 連 の ステ ー ト メン ト 
で あぁ あり, 名 前 の 有効 範囲 を 区 切る た め , ぉ よび 制御 の 目的 使用 さ 
れる 。 1 つま た は 2 つつ 以上 の ブロ ッ ク が 集 っ て , ブロ グラ ム を 構成 
する 。 どの よう な を ステー トメ ント も , ブロ ッ ク の 中 CC 入っ て いな け 
れ ば な を ならない 。 ブ ロッ ク K は , 開始 プロ ッ ク と プロ ジー ジャ ー・ ブ 
ロッ ク の 2 種類 が ある 。 開始 ブロ ッ ク は , BEGIN ステ ー ト メン 
ト と END ス テー トメ ント に よっ て 区 切ら れる 。 プ ブロ シー ジャ ー・ 
ブロ ッ ク は , PROCEDURE ス テー トメ ント と END ス テー トメ 
ント C よ っ て 区 切ら れる 。 開始 ブロッ ク は , どの よう な 場合 も , プ 
ロジ シー ジャ ー・ ブ ロッ ク の 中 含ま れ て いな けれ ば な ら な い 。 


開始 ブロ ッ ク の 場合 は , 前 か ら 順 (実行 され て 開始 ブロ ッ ク の 中 
(CC 入り , その まま 再び 外 へ 出 て ゆく 。 し か し , ブロ ンー ジャ ー・ ブ 
ロッ ク の 場合 は , 別 の ブロ ッ ク 内 の ステ ー ト メン ト を 実行 する と と 
と よっ て , 呼び 出さ を けれ ば な を なら を い 。 ブロ グラム で 実行 され る 最 
初 の プロ ンー ジャ ー は , オペ レー ティ ング ・ シ ステ ム C よ っ て 自動 


的 KK 呼び 出さ れる 。 と の 最初 の ブロ ンー ジャ ー は , PROCEDURE 


ステ ー ト メン ト の 中 で OPTTONS (MAIN) を 指定 する と と 
よっ て 識別 し を な けれ ば な ら な い 。 
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第 3 草 * デー タ の 庄 要 素 


デー タ は , 一 般 C, 情報 また は 値 を 表現 する も の と し て 定義 され る 。 


PL/1I で は , デー タ 項 目 ( 算術 また は スト リン グ ) は , 変数 ま 
た は 定数 を 用 いて 参照 され る 。 ( と の 場合 の 変数 定数 と いう と と 
ば は , 普通 の 数 学 で いう と と ば と は 少し 違っ て いる 。 ) 


変数 は 。 プログ ラム の 実行 中 変更 する と と が で きる 値 を も つ 記 
号 名 で ある 。 


定数 (記号 名 の と と も ある ) は , 変更 で き な い 値 を も つも の で あ 
る 。 


次 の ステ ー ト メン ト K け , 変数 と 定数 の 両方 が 含ま れ て いる 。 
AREA = RADIUS* ネ 2 玉 3.14 16j』 


AREA お よび RADIUS は 変数 で ある 。 2 お よび 3 1 4 16 と い 
ヶ 数 は 定数 で ある 。 RADIUS の 値 は デー タ 項 目 で あ り , 計算 結 
果 は AREA の 値 と し て 割り 当て られ る デー タ 項 目 に な る 。 ステ ー 
トメ ント の 中 C あ る 3.14 16 と い 2 う 数 は , それ 自身 が ぶ 1 つ の デー 
タ 項 目 で ある 。 


3.1416 と いう 数 を , プロ グラ ム の 中 で 2 回 以上 使用 する 場合 
は , 31416。 と いら 値 が 割り 当て られ た 変数 と し て 表現 する 方 が 
都合 が よい と と も ある 。 し た が っ て , 上 記 の ステ ー ト メン ト は , 次 
の よう KK 書き か を て ゃ も よい 。 


PT = 3.1416}』 
AREA = RADIUS ネ ネネ 2P1 


最後 の ステ ー ト メン ト の 中 で は , 2 と いら 数 だ けが 定数 で ある 。 


定数 は , 単 K 値 を 記述 する だ け で な く < く , その デー タ 項 目 の 様々 な 
性 質 も 表示 する 。 たとえば, 3.14 16 は , デー タ の タイ プ が 算術 
タイ プ で ある と て と と , と の デー タ 項 目 は 5 桁 の 10 進数 で ,。 その 中 の 
4 桁 が 小数 点 以 下 で ある と と を 示し て いる 。 


記号 名 で 表わさ れる 定数 は ,。 コン パイ ラーK よ っ て 決め られ た 値 
を も っ て いる が , プロ グラ マー は その 内 容 を 知ら を な く て も よい 。 と 
の ょ よう を 定数 は , 通常 , ブロ グラ ム の 制御 に 関す る る の で あり , 計 
算 ( て 使 ろ 値 で は を く 内 部 記憶 域 の アド レス を 表わし て いる 。 たとえ 
ば , 次 に あげ る 例 の 中 に ある " LOOP ! と い 2 識 別名 は , ! A ニ 
2*B "と いう スネ ステー トメ ント か ら 生 成 さ れる 機械 コー ド の アド レ 
ス で ある 定数 を 表わす 記号 名 で ある 。 

GET LIST (B)j 


LOOP: A ニ テク Bs 
C テ B 十 6 3 


変数 また は 記号 定数 の 性 質 は , その 名 前 の 中 で 直接 明らか に は さ 
れ て い を い 。 と これら の 人 性 質 (属性 と 呼ば れる ) を コン バイ ラーK 知 
ら せ な けれ ば を な を ら な い の で , DECLARE ステ ー ト メン ト の 中 で 
特定 の キー ワー ト や 式 を 用 いて 属性 を 指定 する と と が で きる 。 個々 
の デー タ ・ タ イブ を 記述 する た め の 属 性 に つい て , と の 章 で は 簡単 
と 説 明 する 。 個 々 の 属性 C〈 つい て の 詳細 は , 1! 節 「 属 性 ]」 の と と ろ 
を みて いた だ きた い 。 


PL プ IT で ブロ グラ ム を 書く C あ た っ て , ブロ グラ マー は , 許さ 
れ て いる デー タ の タイ プ , デー タ の 編成 方 法 。 な よび デー タ の 参照 
方 法 を ど に つい て よく 知っ て お か な けれ ば な ら な い 。 次 に , これ ら 
の 特徴 に つい て 述べ る 。 


デー ダグ の ダイ アジ 


PL/ プ 1 の プログ ラム で 使用 され る デー タ の タイ ブ は , 問題 デー タ 
と ブロ グラ ュ 制 御 デ ー タ の 2 つの カテ ゴリ ー に わけ られ る 。 問題 デ 
ー タ は , ブロ グラ ム で 処理 され る 値 を 表わす た め K 使 用 され る ゃ の 
で あり , 算術 デー タ と スト リン グ ・ デ ー タ の 2 つの デー タ ・ タ イプ 
が ある 。 デ プロ グラ ム 制 御 デ ー タ は , ブロ グラ ム 実 行 の 制御 を する た 
め (C ブ プロ グラマー が 使用 する も の で あ る 。 ブ ログ ラム 制御 デー タ の 
タイ プ ブ C は , ラベ ル , 事象 , ファ イル , 入口 , ロ ケー ター, エリ ア 
の 6 つが ある 。 


同 題 デー タ 


問題 デー タ の タイ ブ C は , 算術 デー タ と スト リン グ ・ デ ー タ の 2 つ 
が ある 。 


算術 デー タ 


算術 デー タ 項 目 は , その 値 が 数 値 で ある 項目 で ある 。 算術 デー タ 項 
日 は, 基数 , スケ ー ル , 精度 お む および モー ド K 関 する 人 性質 を も っ て い 
る 。 算術 変数 に よっ て 表わさ れる デー タ 項 目 の 性 質 は , その 名 前 
対し て 宣言 され た 属性 に よ っ て 指定 され る か , 省略 時 解釈 が 適用 さ 
れ る 。 
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算術 デー タ 項 目 の 基数 は , 10 進 数 また は 2 進数 の どちら か で ある 。 


算術 デー タ 項 目 の ス ケー ル は , 固定 小数 また は 浮動 小数 の どちら 
か で あぁ る 。 固定 小数 点 デ ー タ 項目 は , 小数 点 の 位置 が 指定 され て い 
る (定数 の 場合 は その 中 で 指定 され て お ぉ おり, 変数 の 場合 せ は ス ケー ル 
因数 (C よっ て 宣言 され る ) 数 で あぁ る 。 浮動 小数 点 デ ー タ 項目 は , 指 
数 ( 待 号 は 任意 選択 ) を 後に つけ た 数 で あぁ る 。 指数 は , 仮想 上 の 小 
数 点 の 位置 を , 現在 の 位置 か ら 相対 的 指定 する も の で ある 。 


算術 デー タ 項 目 の 精度 は , 固定 小数 の 場合 に は その デー タ 項 目 が 
含 な と と の で きる 桁 数 で あり ., 肖 動 小数 の 場合 C は 最小 恨 保 持 し て 
な くべ き 有 効 数 字 の 桁 数 (指数 部 は の ぞ く 〈 ) で ある 。 固定 小数 点 デ 
ー タ 項目 の 場合 は , 精度 を 用 いて , その 数 の 右端 の 桁 か ら 相 対 的 < 
激 を た 仮想 上 の 小数 点 の 位置 を 指定 する と と も で きる 。 


デー タ 項 目 が 固定 小数 点 の 変数 tc 割り 当て られ る と き は つね (, 
宣言 され た 精度 が 維持 され る 。 割り 当て られ る 項目 は , 小数 点 の 位 
置 'C 揃 々 られ る 。 割り 当て られ る 項目 の 整数 部 分 が , 宣言 され た $ 
の より 少な を いと き は , 先行 ど ロ が 挿入 され る 。 小数 部 分 が 少 を いと 
き は , 未 尾 に ゼロ が 挿入 され る 。 割り 当て られ る 項目 の 整数 が 多 す 
ぎる と きけ は , SIZE エラ ー が 起 と る 可能 性 が ある 。 小数 の 桁 数 が 
多 す ぎる と き は , 右端 で 切捨て ( 四 捨 世 入 な し ) られ る 。 


算術 デー タ 項 目 の モ ー ド は , 実数 また は 複素 数 の どちら か で ある 。 

実数 デー タ 項 目 は , 実数 の 値 を 表わす 数 で ある 。 複素 数 デー タ 項 目 
は 。 2 つの 数 (一 方 は 実数 で , も うら 一 方 は 虚数 ) を 組み 合わ せ た ゃ も 
の で ある 。 複素 数 デー タ 項 目 を 表わす 変数 の 場合 は , 2 つの 部 分 の 
基数 , スケ ー ル , ぉ よび 精度 が 同じ で を けれ ば な ら な い 。 


算術 変数 の 基数 , スケ ー ル , お よび モー ド は , キー ワー ド K よ っ 
て 指定 する 。 精度 は , 括弧 < 入れ た 10 進 整 定数 を 用 いて 指定 する 。 
算術 変数 ぉ よび 定数 の 精度 に つい て , 以下 詳し く 説 明 す る 。 


と の あと 説明 する 実数 の 算術 デー タ ・ タ イブ は , 1 0 進 固定 小数 , 
2 准 固 定 小数 . 10 進 浮動 小数 , な よび 2 進 浮動 小数 で ある 。 と れ 
ら は いずれ も , 複素 数 デー タ 項 目 の 実 数 部 分 と し て も 使用 する と と 
が で きる 。 複素 数 の 虚数 部 分 CK つ いて は , と の 章 の 「 複 素数 の 算術 
デー タ 」 の と と ろ で 説明 する 。 


複素 数 の 算術 変数 は , COMPLEX 属性 を つけ て 明示 的 (宣言 
し な けれ ば な ら な い 。 実数 の 算術 変数 は , REAL 属性 を も ゃ つと と 
を 明示 的 (C 宣 言 す る と と が で き る が , と く K 複 素数 で ある と 明示 富 
言 さ れ て いな い 限 り , 算術 変数 は 一 般 (C 実 数 と みた され る の で , 通 
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常 は , わざ わざ 宣言 する 必要 は を い 。 


1 0 進 固定 小数 点 デ ー タ 


1 0 進 固定 小数 点 デ ー タ は , 1 桁 キ また は 2 桁 以 上 の 1 0 進数 (小数 
点 は 任意 選択 ) か ら な っ て いる 。 人 小数点 が な を な いと き は , 右端 の 桁 の 
す ぐ 右 側 に 小数 点 が ある も の と みな され る 。 1 0 進 固定 小数 点 定数 
の 前 , 符号 を つけ て も よい 。 


次 に あげ る 例 は , プロ グラム の 中 書か れる 10 進 固定 小数 点 定 
数 で ある 。 


3.1 416 
455.3 
7 32 
003 
っ > 
.0012 


式 を 評価 する と き , 10 進 固定 小数 点 定 数 は , 精度 (p , q) が 明 
ら か に され る ( p は 定数 の 中 に ある 桁 数 の 合計 で , q は 小数 点 の 右 
側 (< 指定 され て いる 桁 数 で ある ) 。 た と えば , 


3.1 4 の 精度 は , ( 3 , 2 ) で ある 。 


1 0 進 固定 小数 点 変 数 を 宣言 する た め の キ ー ワ リー ド 必 性 は , 
DEC IMAL と FIXED で ある 。 精度 は , 括弧 の 中 に CE2 つ の 10 
進 定 数 を 書き , カン マ で 区 切っ て 記述 する 。 最初 の 数 は 総 桁 数 を 指 
定 す る も る ので, 符号 を つけ て は を ら な い 。 2 番目 の 数 は スケ ー ル 因 
数 で , 符号 を つけ て も よく , 小数 点 の 右側 に ある 桁 数 を 指定 する 。 
変数 が 整数 を 表わす 場合 は , スケ ー ル 因数 と その 前 に ある カン マ を 
省略 する と と が で きる 。 諸 属性 は どの よら な 順序 で 書い て も よい が , 
精度 の 指定 は , DBCIMAL か FIXED (また け は REAL か 
COMPLEX ) の すぐ 後に 書か を けれ ば な ら な い 。 


プロ グラ ム の 中 で 書か れる 1 0 進 固定 小数 点 変 数 の 宣言 の 例 は , 
次 の 通り で ある 。 


DECLARE A FIXED DECIMAL (5,4)3 
DECLARE B FIXED (6,0) DECIMAL: 
DECLARE C FIXED (7, 一 2) DECIMAL ジ 
DECLARE D DECIMAL FIXED REAL (3,2): 


最初 の DEPCLARD ステ ー ト メン ト は , A と いう 識別 名 が , 5 
桁 以 下 の 1 0 進 固定 小数 点 項 目 で , その うち も の 4 桁 は 小数 部 で ある 
と と (つま り 仮 想 上 の 小数 点 の 右側 と ある と と ) を 表わし て いる 。 
AK 割 り 当 て られ る 項目 は いずれ も 10 進 固定 小数 変換 され , 小 
数 点 の 位置 に 揃え られ る 。 


2 番目 の DRCLARE ステ ー ト メン ト は , B が 6 桁 以 下 の 整 数 
で ある と と を 表わし て いる 。 カ ンマ と ぞ ゼロ は 不要 で ある と と 注意 
し て いた だ きた い 。 と れ は , B FIXED DECIMAL (6 ) と 
指定 し て も よい 。 


3 番目 の DECLARE ステ ー ト メン ト は , 負 の スケ ー ル 因数 
ー 2 を 指定 し て いる 。 と れ は , 仮想 上 の 小数 点 の 位置 が , と の 項目 
の 右端 の 桁 の さら KK 右 2 桁 目 の と と ろ (C ある と と を 意味 し て いる 。 


4 番目 の DECLARE ステ ー ト メン ト は , D が , 3 桁 以 下 の 固 
定 小数 項目 で , その うち の 2 桁 が 小数 で ある と と を 表わし て いる 。 


1 0 進数 の 最大 許容 桁 数 は , 15 桁 で ある 。 指定 が な い 場 合 に と 
られ る 省略 時 解釈 の 精度 は , ( 5 , 0 ) で あぁ る 。 1 0 進 固定 小数 算 
術 デ ー タ の 内 部 コー ド 形 式 は , ペッ ク 1 0 進数 で ある 。 ズ バック 10 
進数 は , 1 ベイト KC つ いて 2 桁 ず つ 記 憶 さ れ , 有 端 の バイ ト の 右 4 
ビッ ト K 符 号 が 表示 され る 。 し た が っ て , 10 進 固定 小数 デー タ 項 
目 は , その 変数 が 宣言 され た と き K, (p) で 偶数 の 桁 数 が 指定 され 
て いて も , つね 奇数 の 桁 数 を も つも の と し て 貯え られ る 。 


偶数 格 が 宣言 され て いる 場合 は , 最高 位 の 桁 に 余分 の 桁 が も 2 け 
られ る と と に な り , と の デー タ 項 目 (K 対 し て 行なわ れる 操作 (比較 
操作 を ど ) の すべて と の 桁 も 参加 する 。 と の よう な 余分 の 高位 桁 
算術 的 を な 桁 あふ れ が 及 ん だ り , 割り 当て が 行なわ れ た り し た と と 
は , SIZE 条件 が 設定 され て いる と き (C だ け , 検出 する と と が で 
きる 。 


2 進 固定 小数 点 デ ー タ 


2 進 固定 小数 点 定 数 は , 1 桁 ま た は 2 桁 以 上 の 2 進数 (符号 は 任意 ) 
と , その すぐ 後 C 間 を あけ ず (C B と いう 文字 を つけ た も の か ら 構 成 
され る 。 符号 は , 必要 を ら ば , 定数 の 前 に つけ る と と が で きる 。 


次 に て あげ る の は , ブロ グラ ム の 中 で 書か れる 2 進 固定 小数 点 定 数 


の 例 で ある 。 


10110B 
11111B 
101B 
ー111.01B 
1011.111B 


式 を 評価 する 際 , 2 進 固定 小数 点 定 数 は , 精度 (p,q) が 明らか 
(C さ れる ( p は その 定数 の 中 KC ある 桁 数 の 合計 , q は 小数 点 の 右側 
(C あ る 2 進数 の 桁 数 ) 。 た と えば , 


0000001B は , (7 ,0) の 精度 を も っ て いる 。 


2 進 固定 小数 点 変 数 を 宜 斉 する た め の キ ー ワ ー ド 属性 は , 
BINARY と FIXED で ある 。 精度 は , 2 進数 の 最大 桁 数 と 小数 
点 の 右側 の 桁 数 を 表わす 2 つの 1 0 進 整定 数 を 括弧 入れ て 書い て 
指定 する 。 変数 が 整数 を 表わし て いる と き は , 2 番目 の 数 と カン マ 
を 省略 し て よい 。 諸 属性 は どの ょ よら な 順 で 指定 し て も よい が , 精度 
の 指定 は , BINARY か FIXED ( また は REAL か COMPLEX ) 
の 後 C 記 入 し を な けれ ば を ら な い 。 次 に あげ る の は , 2 進 固定 小数 点 
変数 の 宣言 の 例 で ある 。 


DECLARE FACTOR BINARY FIXED 
(20,2): 


FACTOR は , 最高 20 格 (その うち の 2 桁 が 小数 以下 ) の 2 進 
数 の 算術 デー タ 項 目 を 表わす と と の で きる 変数 で ある と 宣言 され て 
いる 。 と の 値 の 範囲 を 1 0 進数 で 表わす と , 一 26 2 , 144.00 か 
ら 十 262 ,143.7 5 で ある 。 


2 進数 の 最大 許容 桁 数 は , 3 1 で ある 。 省略 時 解釈 の 精度 は , 
(15,0 ) で ある 。 2 進 固定 小数 点 デ ー タ の 内 部 ユー ド 化 算術 形式 
は , ハー フワ ー ド また は フル ワー ド の 2 進 固定 小数 で ある 。 ハーフ 
ワー ド は 15 ビット と 符号 ビッ ト , フル ワー ド は 3 1 ピッ ト と 特 号 
ビ ピット で ある 。 精度 が (15,0) 以 下 の 2 進 固定 小数 点 デ ー タ 項目 
は , ハー フワ ー ド と し て 貯え られ , 精度 が (15,0) を 越え た ( 最 
大 の 精度 の 範囲 内 で ) も の は , フル ー ワ ー ド と し て 貯え られ る 。 宣 
言 さ れ た 桁 数 は , 低位 の 位置 に C あ る も の と み を され る が , 高位 の 余 
分 の 桁 も , と の デー タ 項 目 に 対 し て 行 を われ る すべ て の 操作 参加 
する 。 と の よう な 余分 の 桁 へ の 算術 的 を 桁 あ ふれ は , SIZE 条件 
が 設定 され て いる 場合 に だ け 検 出す る と と が で きる 。 
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標準 の 省略 時 解 駅 の シール が 適用 され る 場合 は , 宣言 が 行なわ れ 
て いな い ゅ 識別 名 は , 最初 の 文字 が 1 から N ま で の いずれ か で あれ ば ぱげ, 
省略 時 解釈 の 精度 を も つ 2 進 固定 小数 点 変数 と み を され る 。 


1 0 進 浮動 小数 点 デ ー タ 


1 0 進 浮動 小数 点 定 数 は , 1 0 進数 の フィ ー ル ド の 後 CE と いう 次 
字 を つけ , さら に その 人 後 1 0 進 整 数 の 指数 ( 任意 選択 に より 符号 
を つけ る ) を つけ た 形 で 書か れる 。 最初 の フィ ー ル ド に は , 小数 点 
を 入れ て も よく , また , 定数 全体 の 前 に 正 ま た は 負 の 符号 を つけ て 
る よい 。 次 (C あげ る の は , ブロ グラ ム の 中 KK 書か れる 10 進 浮動 小 
数 点 定 数 の 例 で ある 。 


1 5 セー2 3 
15E23 

4E 一 3 

ー48333E65 

438EO 

3141593E 一 6 

003141593E3 

最後 の 2 つの 例 は , 同じ 値 を 表わし て いる 。 

式 が 評価 さん る と き , 10 進 浮動 小数 点 定 数 の 精度 (p) が 明らか 
(CC な る ( p は , EE と いう 文字 の 左側 に ある 定数 の 桁 数 (小数 ) で あ 
る ) 。 た と えば , 

0.012RB5 は , ⑭) と いら 精度 を も っ て いる 。 

1 0 進 浮動 小数 点 変 数 を 宜 言 する た め の キ ー ワ ー ト 属性 は , 
DECTIMAL と FLOAT で ある 。 精度 は , 10 進 整定 数 を 括弧 で 
囲ん だ も の を 用 いて 記述 す る 。 と れ け は, 維持 すべ き 有 効 数 字 の 最小 
桁 数 を 指定 す る る の で ある 。 変数 に 割り 当て られ る 項目 の フィ ー ル 
ド が , その 変数 CK つい て 宣言 され た 精度 より も 大 きい 場合 は , 右側 
で 切捨て が 行なわ れる 。 つ まり , 最 下 位 の 有効 数 字 が 最初 C 切 り 捨 
て られ る 。 諸 属性 は どの ょ うな 順序 で 記入 し て も よい が , 精度 の 指 
定 は , DEC IMAL か FLOAT ( また は REAL か COMPLEX ) 


の 後 C 書か を けれ ば な ら な い 。 次 に あげ る の は , 10 進 肖 動 小数 点 
変数 の 宣言 の 例 で ある 。 


DECLARE LIGHT YEARS DECIMAL 
FLOAT(5) 
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と の ステ ー ト メン ト は , LIGHT YEBARS が , 最低 5 桁 の 有効 
数 字 の くわ し さ を も つ 1 0 進 浮動 小数 点 デ ー タ 項目 を 表わし て いる 
と と を 指定 し て いる 。 


1 0 進 浮動 小数 点 デ ー タ 項目 (て 許さ れる 最大 の 精度 は , (16) で 
あり , 省略 時 解釈 の 精度 は , (6 ) で ある 。 指数 は , 2 桁 を 越え て は 
を ら な い 。 1 0 進 浮動 小数 点 デ ー タ 項目 に よっ て 表わす と と の で き 
る 値 の 範囲 は , な よそ 10~? か ら 1 0 で ある 。 1 0 進 浮動 小数 点 
デー タ の 内 部 コー ド 化 算術 形式 は , 正規 化 さ れ た 16 進数 の 閣 動 小数 
点 で あり , 最初 の 16 進数 桁 の 左側 小数点 が ある も の と みな され 
る 。 宣言 され た 精度 が (6) 以下 の 場合 は , 短 精 度 の 靖 動 小数 点 形式 
が 用 いら れる 。 宣言 され た 精度 が (6) より 大 きい 場合 は , 長 精度 の 
浮動 小数 点 形式 ボ 用 いら れる 。 


標準 の 省略 時 解 収 の シー ル が 適用 され て いる 場合 は , 宣言 され て 
いな い 識 別名 の 2 も, 先頭 の 文字 が A か ら 是 , O か ら 必 , また は 英 
字 の 拡張 文字 $ お , #, @ の いずれ か で ある も の は , 10 進 浮動 小数 
点 変数 と み を され る 。 


2 進 浮動 小数 点 デ ー タ 


2 進 浮動 小数 点 定数 は , 2 進数 の フィ ー ル ド の 後 CEB と いら 文字 を 
つけ , さら C そ の 後 K 1 0 進 整数 の 指数 (符号 は 任意 ) と B と いう 
文字 を つけ た 形 を し て いる 。 指数 は 1 0 進 整 数 で , 2 の べき を 表 わ 
し て いる 。 2 進数 の フィ ー ル ド C は , 小数 点 を 含め る と と も で きる 。 
定数 全体 の 前 に 正 ま た は 負 の 符号 を つけ る と と も で きる 。 次 に 上 あ げ 
る の は , ブロ グラ ム の 中 で 書か れる 2 進 浮動 小数 点 定数 の 例 で ある 。 


101101E5B 
101.101E2B 
11101Eー28B 
ー10.01E99B 

式 を 評価 する と き , 2 進 浮 動 小 数 点 定 数 の 精度 (p ) が 明らか (に され る 

( p は , E の 左側 と ある 2 進数 の 桁 数 ( 小数 部 ) で ある ) 。 た と えば , 
0.0101E33B は , 精度 (5) を も ゃ っ て いる 。 

2 進 浮動 小数 点 変 数 を 宣 昔 する た め の キ ー ワ ー ド 属性 は , 


BINARY と FLOAT で ある 。 精度 は , 維持 すべ き 有 効 数 字 の 最 
低 桁 数 を 指定 する 1 0 進 整定 数 を 括弧 で 囲ん だ も の で 表わさ れる 。 


諸 属性 は どの ょ うな 順 で 記入 し て も よい が , 精度 の 指定 は , 
BINARY か FLOAT (また は REAL か COMPLEX ) の すぐ 
後に 書か を な けれ ば を ら な い 。 次 (C 示 す の は , 2 進 浮動 小数 点 変 数 の 
宣言 の 例 で ある 。 


DECLARE S BINARY FLOAT (16): 


上 の 例 は , 識別 名 8 が , 2 進数 フラ フィー ルド の 中 で 16 桁 の 2 進 浮動 
小数 点 デ ー タ 項目 を 表わす と と を 指定 し て いる 。 


2 進 浮動 小数 点 デ ー タ 項目 で 許さ れる 最大 の 精度 は ( 53 ) で , 
省略 時 の 精度 は ( 2 1 ) で ある 。 指数 部 は , 1 0 進数 で 3 桁 を 越え 
て は な ら な い 。 2 進 浮動 小数 点 デ ー タ 項目 で は , ほぼ 2~ 0 か ら 
2252 まで の 範囲 の 値 を 表わす と と が で きる 。 2 進 浮動 小数 点 デ ー 
タ の 内 部 コー ド 化 算術 形式 は , 正規 化 さ れ た 1 6 進数 の 浮動 小数 点 
数 で ある 。 宣言 され た 精度 が ( 2 1 ) 以下 の 場合 は , 短 精 度 の 浮動 
小数 点 形 式 が 用 いら れ , 宣言 され た 精度 が (2 1 ) を 越え て いる 場 
合 は , 長 精度 の 浮動 小数 点 形 式 が 用 いら れる 。 


複素 数 の 算術 デー タ 


複素 数 モー ド で は , 算術 デー タ 項 目 は , 実数 部 と 符号 付 の 虚数 部 の 
2 つの 部 分 か ら を る と 考え られ る 。 PL 1I で は , 複素 数 の 定数 は 


を い 。 複素 数 の 値 は , 実数 の 定数 と 虚数 の 定数 を 組み 合わ せ て 得 ら . 


れる 。 


虚数 の 定数 は , 実数 の 定数 ( どの よら を タイプ で も よい ) の すぐ 
後 CI と いら 9 文字 を 書い て 示す 。 


次 に C 示 す の は , ブ プログラム の 中 書か れる 虚数 の 定数 の 例 で ある 。 
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と れ ら は それ ぞ れ , ゼロ の 実数 部 を も つと 考え られ る 。 ゼロ 以外 の 
実数 部 を もつ 複素 数 の 値 は , 次 の ょ うな 形式 で 表わさ れる 。 


( 十 1 一 〕 実数 の 定数 { 十 1 一 } 虚数 の 定数 


し た が っ て , 38 十 2 71T と いう ょ よう K《 複 素数 の 値 を 書く と と が で 


き る 。 


複素 数 の 変数 を 宣言 する た め の キー リワード 属性 は , COMPLEX 
で ある 。 様々 を タイ プ ブ の 実数 算術 デー タ で 有効 を 属性 は いずれ も , 


複素 数 の 変数 で も も つと と が 許さ れる 。 基数 , スケ ー ル , お よび 精 
度 の 属性 は それ ぞ れ , どちら の フィ ー ル ド MK も 適用 され る 。 


COMPLEX 属性 を も ゃ つと 明示 的 に 宣言 され て いな じい 限り, 変 
数 は , 実数 デー タ 項 目 を 表わす と みな を され る 。 


数 字 デ ー タ 項目 (数値 フィ ー ル ド ・ デ ー タ 項目 と も いう ) は, 
PICTURE 属性 を も ち , 数 値 ど ク チャ ー が 指定 され て 宣言 され 
て いる 変数 の 値 で も る 。 と の デー タ 項 目 は , 10 進 数 の 固定 小数 ま 
た は 肖 動 小数 の 値 を 文字 で 表現 し た も の で ある 。 


数 値 ビ クチ ャ ー 指 定 は , 算術 値 を も つ ( また は 算術 値 変換 で き 
る ) デー タ だ けが そ と 割り 当て られ る よう な 文 字 ス トリ ング を 記 
述 す る も る の で ある 。 ピクチャー 文字 A また は 又は , 数 値 以外 の ピク 
チャ ー 文 字 ス トリ ング KK 対し て 使用 さき れる も の な の で , 数 値 ピ クチ 
ャ ー 指 定 に は , と れ ら の 文字 を 含め る と と は で き な い 。 数 値 ビク チ 
ャ ー 指 定 の 基本 形式 は , 数 字 を 指定 する ビ ピクチャー 文字 の 9 を 1 つま 
た は 2 つつ 以上 つづ けた も の K, 仮想 上 の 小数 点 の 位置 を 表わす ビク 
チャ ー 文 字 V を つけ て ( V に 任意 選択 ) 表 わ さ れ る 。 ビ ピクチャー 指 
定 は , 単 一 引用 符 で 囲ま な けれ ば を ら な い 。 た と えば , 


「 ゥ 999V99" 
と の 数 値 ビ ピクチャー 指定 は , 右 か ら 2 桁 目 の 位置 小数 点 が ある と 
みな され る , 最高 5 桁 の 文字 形式 の 1 0 進数 か ら を な る デー タ 項 目 を 
記述 する も の で ある 。 

数 値 ビ ピク チャ ー 指 定 の 中 で , 繰返し 因数 を 使用 する こと が で きる 。 
繰返し 因数 は , その 後 K 書か あれ た ピクチャー 文字 を いく つ 繰 り 返 し 
使用 する か を 示す 1 0 進数 の 整定 数 で ちり, 括弧 で 囲ん で 指定 する 。 
た と えば , 次 に あげ る ピクチャー 指定 は , 上 記 の 例 の 記述 と 同じ 結 
果 に を な る 。 

「(3)9V(2)9! 


数 字 変数 を 宣言 する た め の 形 式 は , 次 の 通り で ある 。 


DECLARE 識別 名 PICTURE 
数 値 ど クチ ャ ー 指 定 「: 


た と えば , 


DECLARE PRICE PICTURE 9299V99! ぅ 


上 の 例 は , PRICE (割り 当て られ る 値 は いずれ も , 右 か ら 2 桁 
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目 の と と ろ に 仮想 上 の 小数 点 が ある 5 桁 の 1 0 進数 か ら を る 文字 ス 
トリ ング と され る と と を 指定 し て いる 。 PRICE 割り 当て られ 
る デー タ は , 固定 小数 の 1 0 進数 デー タ の 場合 と 同じ ょ うに し て , 
仮想 上 の 小数 点 の 位置 に 合わ せら れる 。 


数 値 ピ クチ ャ ー 指 定 は , 定数 を 書く と き と は 傘 同 じ 形 式 で , デー 
タ の 算術 属性 を 指定 する 。 ビ ピク チャ ー 文 字 C よ っ て 表わす と と が で 
きる の は , 10 進数 デー タ だ け で ある 。 複素 数 デー タ は , 固定 小数 
点 ま た は 浮動 小数 点 デ ー タ 項目 の どちら か を 記述 する 単 一 の ビク チ 
ャ ー 指 定 と いっ し ょ C COMPLEX 属性 を 指定 する と と に よっ て , 
宣言 する と と が で きる 。 数 字 デ ー タ 項目 の 中 で 使用 で きる 10 進 
数 の 最大 桁 数 は , 15 桁 で ある 。 


数 字 デ ー タ は 算術 属性 を を も っ て は いる が , コー ド 化 算術 形式 で 
貯え 々 られ る の で は を な いと と (注意 し て いた だ き た い 。 数 字 デ ー タ 
は ゾー ン 10 進数 形式 で 貯え られ る の で , 算術 演算 に 使用 する た め 
(C は その 前 C, パック 10 進数 か 16 進数 の 浮動 小数 点 形式 の と ど ち 
ら か に 変換 し な けれ ば を ら な い 。 と の よう な 変換 は 自動 的 に 行なわ 
れ る が , 余分 実行 時 間 を 必要 と する 。 


数 字 デ ー タ は , 文字 スト リン グ と 同じ より 文字 形式 と な っ て 
いる し, また, コー ド 化 され た 算術 デー タ と 同じ ょ う K 小 数 点 の 位 
四 C 合 わせ られ る が , コー ド 化 され た 算術 デー タ 項 目 と も , 文字 ス 
トリ ング と ゃ 別 を 形 で 処理 され る 。 数 字 デ ー タ 項目 に 挿入 する た 
め 編 集 文字 を 指定 する と と が で きる が , と の 文字 は , 実際 に デー 
タ 項 目 の 中 CK 貯 えら れる 。 したがって, 項目 を 印刷 し た り , 文字 ス 
トリ ング と し て 処理 し た りす る と き は , その 割当 て の 中 (編集 文字 
も 含め られ る 。 しかしながら, 数 字 項 目 が , 別 の 数 字 変 数 また 
は 人 算術 変数 C 割 り 当 て られ る と き は , その 割当 て の 中 編集 文字 は 
含ま れず , 実際 の 数 字 と 仮想 上 の 小数 点 の 位置 だ けが 割り 当て られ 
る 。 次 の 例 C つ いて 考え て みよ う 。 


DECLARE PRICE PICTURE '$99V.99', 
COS 和 T CHARACTER (6), 
VALUE FIXED DEBCIMAL (6, 
2)i 


PRICEB = 12.28: 

COST テニ '$12.28「j: 
PRICE K 対 する と の ビ ピクチャー 指定 の 中 では, 通貨 記号 ($) と 
小数 点 (・) が 編集 文字 で ある 。 と これら は , デー タ 項 目 の 中 K 文 字 と 
し て 貯え られ る 。 し か も > と れ ら は は 算術 値 の 一 部 で は を い 。 2 番目 


の 割当 て ステ ー ト メン ト を 実行 し た あと , PRICE ぉ お よび COST 
の 実際 の 内 部 文字 表現 は , 全く 同じ と な る と 考え る と と が で きる 。 
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と の 2 つ を 印刷 すれ ば , 全く 同じ 印刷 され る 。 し か し , と の 2 つ 
が つ わ ね に 同じ 働き を する と は 限ら な い 。 た と えば げ , 


VALUE = PRICEj 


COST = PRICEi 


VALUE COSTs 


PRICE = COST: 


最初 の 2 つの 割当 て ステ ー ト メン ト が 実行 され た あと で は , 
VALUE の 値 は 0012.28(C を な り , COST の 値 は '$12.28' 
(C を な る 。PRICEB を VALUEK 割 り 当 て る と き は , 通貨 記号 と 小 
数 点 は 編集 文字 と みな され, と れ ら は 割当 て の 一 部 に は を なら ず , 
PRICE の 算術 値 が 内 部 コー ド 化 算術 形式 K 変 換 さ れる 。 し か し 
な が ら , PRICE か ら COST (割り 当て る と き は , と の 割当 て 
は 文字 スト リン グ 人 KK 対す る も る の で ある か ら , 数 値 ビク チャ ー 指 定 の 
編集 文字 つね に と の よう みな 割当 て KC 参加 す る 。 PRICE は 文字 
形式 で 貯 えら れる の で , 変換 は 不要 で ある 。 


3 番目 と 4 番目 の 割当 て ステ ー ト メン ト は , エラ ー を 引き 起す 。 
スト リン グ の 中 通貨 記号 か ある と , 算術 定数 と し て は 無効 に な る 
の で , COST の 値 を VALUE 割り 当て る と と は で き な い 。 全 


く 同 じ 理 由 か ら , COST の 値 を PRICE 割り 当て る と と は で 


き ない 。 数 値 ビ クチ ャ ー 指 定 を 伴っ て 宣言 され た 変数 に 割り当て る 
と と が で きる の は , 算術 タイ プ の 値 ま た は 算術 タメ イプ KK 変 換 で きる 
値 だ け で ある 。 


注 : 小数 点 は , 編集 文字 で あっ て も $, 文字 スト リン グ の 中 の 実際 の 


文字 で あっ て も よい が , 算術 定数 の 中 小数 点 お が ある と と が 許さ れ 
て いる の で , 算術 形式 変換 する 際 C, と の た め C エ ラー が 起 と る 
と と は な い 。 正 また は 負 の 符号 に つい て $, 算術 定数 の 前 符号 が 
あっ て よい の で , 同じ こと が いえ る 。 


数 値 ピ ビク チャ ー 指 定 の 中 では, ゼロ 消去 文字 , 潤 動 文字 , 揮 入 廊 
字 を どの 他 の 編集 文字 を 使用 する と と が で きる 。 ピク チャ ー 文 字 K 


関す る 詳細 は , D 節 「 ビ ピクチャー 指定 文字 ] お よび 1 節 [属性] の 
中 の PICTURE 属性 の 項 を 読ん で いた だ きた い 。 


2 リジン ジグ ャ の ニー タク 


スト リン グ は , 1 つの デー タ 項 目 と し て 取り 扱う 9 とこ と の で きる , 連 


続 す る 一 連 の 文字 ( また は 2 進数 ) で ちる 。 ス トリ ング の 長 さ は , 
その 中 KC 含ま れる 次 字 ( また は 2 進数 ) の 数 で ある 。 


スト リン グ C は , 文字 スト リン グ と ピッ ト ・ ス トリ ング の 2 種類 
が ある 。 


文字 スト リン グ ・ デ ー タ 


文字 スト リン グ C は , 特定 の 機械 構成 で 文字 と し て 認め られ る も の 
で あれ ば , どの よう な 数 字 , 英字 , また は 特殊 文字 で も 含め る と と 
が で きる 。 文字 スト リン グ の 中 C あ る プラ ンク は いずれ も 必須 の 文 
字 と 考え られ , 長 さ の カウ ント (《 含 め ら れる 。 文字 スト リン グ の 内 
部 人 c 注 和 択 を 挿入 し て も , それ は 注 秋 と は 認め られ な い 。 注釈 は , 注 
釈 の 区 切り ( ノ ネ と ネン ) も 含め て , 文字 スト リン グ ・ デ ー タ の 一 
部 分 と み を され て し まう 。 


文字 スト リン グ 定 数 を プロ グラ ム の 中 書く と き は , 単 - 引 用 符 
で 囲ま な けれ ば を ら な い 。 スト リン グ の 中 文字 と し て 単 一 引 用 符 
を 書き た いと き は , 間 (C プ ラン ク を あけ ず ( 単 一 引用 符 を 2 つ 書 か 
な けれ ば を ら な い 。 文字 スト リン グ の 長 さ は , 両端 の 引用 符 の 中 < 
ある 文字 の 数 で ある 。 ス トリ ング の 中 で 2 つの 単 一 引用 符 を 使っ て 
1 個 の 単 一 引用 符 を 表わし て いる 場合 は , 2 つ で 1 個 の 文字 と し て 
数 を られ る 。 


次 C あげ る の は , 文字 スト リン グ 定 数 の 例 で ある 。 


「LOGARITHM TABLE 

'"PAGE 5 

「SHAKESPEARE 'S HHAMLET 
た G43.98 一 1 の 


(2 ) 'WALLA 


3 番目 の 例 は , 実際 (CC は SHAKESPEARE'S ''HAMLET' 
( 長 さ は 2 4 ) を 表わし て いる 。 最後 の 例 の 中 で 括弧 の 中 に 入っ て 
いる 数 は , その 後に 書か れ て いる 文字 を 何 度 繰り 返す か を 示す 結 返 
し 因数 で ある 。 と の 例 で は , "WALLA WALLA ′ (プラ ンク 
も 繰り返さ れる 廊 字 の 1 つ で ある ) と いら 定数 が 指定 され て いる 。 
繰 返 し 因数 は , 括弧 で 囲ん だ 符号 な し の 1 0 進 整定 数 で を けれ ば を 
ら ず , 許さ れる 最大 の 値 は , 32.767 で ある 。 ナル 文字 スト リン 
グ は , 間 に プ ラン ク を あけ ず K 2 つの 引用 符 を 書い て 示す 。 


文字 スト リン グ 変 数 を 宣言 する た め の キ ー ワ ー ド 履 性 は , 


CHARACTER で ある 。 ス トリ ング の 中 MC ある 文字 の 数 を 指定 す 
る 式 ま た は 10 進 整 数 を 括弧 (入れ て 書く と と よって, 長 さ を 宣 
言 す る と と も で きる 。 長 さ の 指定 は , CHARACTER と いう キー 
ワー ド の 後に つづ け て 書か を けれ ば な ら な い 。 た と えば, 


DECLARE NAME CHARACTER (15)} 


と の DECLARE ステ ー ト メン ト は , NAME と いう 識別 名 が , 
長 さ 1 5 桁 の 文字 スト リン グ ・ デ ー タ 項目 を 表わす と と を 指定 し て 
いる 。 1 5 桁 よ り 短い 文字 スト リン グ が NAME 割り 当て られ る 
と き は , 左 に つめ られ , 長 さ が 15 桁 た な る まで 右側 た プラ ンク が 
バッ ディ ング され る 。 1 5 桁 よ り 長 い ス トリ ング が 割 り 当 て られ る 
と き は , 右側 が その 分 だ け 切 り 捨 て られ る 。 ( と の よう な 切 捨 て が 
行 を われ た と き は , STRINGSIZE 条 件 を 使用 し て いれ ば 検知 
する と と が で きる 。 ) 


長 さ の 指定 が を いと き は , 長 さ は 1 とみ を され る 。 


文字 スト リン グ 変 数 は , 次 の よう に し て , VARYING 属性 を 
も つと と を 宣言 する と と も で きる 。 


DECLARE NAME CHARACTER (15) 
VARYING 


と の DECLARE ステ ー ト メン ト は , 最大 の 長 さ が 1 5 で 長 さ の 
変わ る 交 字 スト リン グ ・ デ ー タ 項目 を 表わす た め C, NAME と い 
ゥ 識別 名 を 使用 する と と を 指定 し て い る 。 あ る 特定 の 時 点 に な ける 
NAME の 実際 の 長 さ 属 性 は , その 時 点 で 割り 当て られ て いる デー 
タ 項 目 の 長 さき (C な る 。 ブ プロ グラ マー は , 長 さ の 変わ る 文字 スト リン 
グ の 長 さ を 記 録 し て ぉ く 必 要 は を い 。 と れ は , 自動 的 に 行なわ れる 。 
し か し , プロ グラ マー は , LENGT 是 組込み 関数 を 用 いて , ある 
任意 の 時 点 C ぉ ける 長 さ を 決め る と と が で きる 。 ( と の 関数 に つい 
て は , 第 1 3 章 「 編 集 お な よび スト リン グ の 取扱 い 」 の と と ろ で 解説 
する 。 ) 長 さ の 変わ る スト リン グ 変 数 は , 初期 値 か 与え られ る まで , 
その 長 さ が 定義 きれ て いな いと と に 注意 し て いた だ きた い 。 


娘 字 スト リン グ ・ デ ー タ は , 内 部 的 KC は 文字 形式 , す を わ ち 各々 
の 文字 が 記憶 装置 の 中 で それ ぞ れ 1 バイ ト を 占め る 形 で 貯え られ る 。 
CHARACTER 属 性 を つけ て 宣言 され た 変数 に 許さ れる 最大 の 長 
さ は , 32,767 で ある 。 繰 返 し 因数 が 適用 され る 前 の 文字 スト リ 
ング 定数 (て 許さ れる 最大 の 長 さ は , その コン バイ ラー が 使用 で きる 
記憶 域 の 量 に よっ て 異な る が , 最低 の 場合 で も 5 1 2 で ある 。 文字 
スネ ストリ ング の 最小 の 長 さ は ゼロ で ある 。 長 さ の 変わ る スト リン グ に と 
割り 振ら れる 記憶 域 は , 宣言 され た 最大 の 長 さ より も 2 バイ ト だ 
け 多 く な る 。 最初 の 2 バイ ト C は , その スト リン グ の 現在 の バイ ト 
数 が 入っ て いる 。 


文字 スト リン グ 変 数 は , 次 の 形式 の PICTURE 属性 を 用 いて 
宜 言 する と と も で きる 。 
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PICTURE 区 字 ピ クチ ャ ー 指 定 


文字 ピク チャ ー 指 定 は , A, 双 , お よび 9 と いう ピクチャー 指定 

文字 か ら を な る スト リン グ で あ る 。 ビク チャ ー 文 字 の スト リン グ は , 
単 一 引用 符 で 用 ん で お か な けれ ば を ら な を い 。 また, その 中 C は 最低 
1 個 の A ま た は 双 が 入っ て いな けれ ば ならない が , その 他 C 9 以外 
の 文字 が 入っ て いて は な ら な を ない 。 A と いら 文字 は , 記述 され て いる 
フィ ー ル ド の 中 の 該当 位置 C, 英字 また は プラ ンク が 入る と と を 指 
定 す る も る の で ある 。 駐 と いら 文字 は , その フィ ー ル ド の 該当 位置 
どの よう な 文字 が あっ て も よい と と を 指定 する も の で ある 。 9 と い 
う 2 ビ ピク チャ ー 文 字 は , 該当 位置 < 数 字 ま た は ブラ ンク が 入る と と を 
指定 し て いる 。 た と えば , 


DECLARE PART_NO PICTURE 
「AA9999X999「' ぅ 


と の DECLARE ステ ー ト メン ト は , PART_NO と い 2 う 識別 
名 が , 2 桁 の 英字 , 4 桁 の 数 字 , 1 桁 の 文字 ( どん な 文字 で も よ 
い ) , お よび 3 桁 の 数 字 か ら な を る 文字 スト リン グ ・ デ ー タ 項目 を 
表わす と と を 指定 し て いる 。 


ビク チャ ー 指 定 の 中 で の 繰 返 し 因数 の 用 い 方 は , スト リン グ ク 定 数 
の 中 で の 用 い 方 と は 異な た っ て い る 。 繰返し 因数 は , 引用 符 の 内 側 《 
置 か を けれ ば を ら な い 。 と の 場合 の 繰 反 し 因数 は , すぐ 人 後に C あ る ビ 
クチ ャ ー 次 字 を 繰り返す と と を 指定 する 。 た と えば , 上 記 の ビク チ 
ャ ー 指 定 は , 次 の よう (書く こと と も で きる 。 


「(2)A(4)9X(3)9! 
ピクチャー 指 定 で 許さ れる 最大 の 長 さ は , 前 に 述べ た よう (, 文 
字 ス トリ ング 定数 で 許さ れる 長 さ と 同じ で ある 。 
文字 ピクチャー 指定 で は , ビク チャ ー 文 字 9 は 数 字 ま た は ブラン 


ク を 指定 す る る の で ある が 。 数 値 ビク チャ ー 指 定 の 場合 は , と の 交 
字 は 数 字 だ け を 指定 する 。 


ビッ ト ・ ス トリ ング ・ デ ー タ 


ビッ ト ・ ス トリ ング 定数 は , 単 一 引用 符 で 囲ん だ 一 連 の 2 進数 の す 
ぐ 後 CB と いう 2 文字 を つけ た 形 で , プロ グラ ム の 中 書か れる 。 


ナル ・ ビ ッ ト ・ ス トリ ング 定数 は , 間 を あけ ず K 2 個 の 引用 符 を 
書き , その すぐ 人 後 (CB と い 259 文 字 を つけ た 形 で 書 か れる 。 
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次 に あげ る の は , ブロ グラ ム の 中 KC 書 かれ を た を ビット ・ ス トリ ング 
定数 の 例 で ある 。 


し 1 !B 


Wi' オ すす 年 は は 19 すす 


(44)'0'B 


1 1 


3 番目 の 例 の 中 で, 括弧 (て 入れ られ た 数 は , その 後に ある 一 連 の 数 
字 を 指定 され た 因数 だ け 繰 り 返す と と を 指定 する 繰返し 因数 で ある 。 
上 の 例 で は , 6 4 個 の 2 進数 で ロ か ら を な る スト リン グ が で きる 。 


ビッ ト ・ ス トリ ング 変数 は , BIT キー ワー ド 属 性 を つけ て 宣言 
され る 。 そ の スト リン グ の 中 CC あ る 2 進数 の 桁 数 を 指定 する た め 《C , 
式 ま た は 1 0 進 整定 数 を 括弧 で 囲ん だ も の を 用 いて , 長 さ を 宣言 す 
る と と が で きる 。 B と いら うら 文字 は , スト リン グ の 一 部 で は を い の で , 
長 さ の 指定 に は 含ま れ を い 。 長 さ の 指定 は , BIT と いう キー ワー 
ド の 後 K 書か を けれ ば を ら な い 。 次 に あげ る の は , ビッ ト ・ ス トリ 
ング 変数 の 例 で ある 。 


DECLARE SYMPTOMS BIT (64) 


文字 ネス トリ ング と 同様 , ビッ ト ・ ス トリ ング は け は, 左 か ら 右 へ 順番 

(変数 (C 割 り 当 て られ る 。 そ の 変数 に 対 し て 宣言 され た 長 さ より も 
スト リン グ の 方 が 長い 場合 に は , 右端 の 文字 が その 分 だ け 切 り 捨 て 
られ る 。 短い 場合 は , 右側 Cc ゼロ が バッ デイ ング され る 。 


長 さ が 指定 され て いな いと き は , 1 と みな され る 。 


ビッ ト ・ ス トリ ング 変数 に VARYING 属性 を 与え て, それ が , 
長 さ の 変わ る ビッ ト ・ ス トリ ング を 表わす た め 使 用 さき れる と と を 
表示 する と と が で きる 。 そ の 用 い 方 は , 前 の 項 で 文字 スト リン グ 変 
数 に つい て 述べ た も の と 同じ で ある 。 


ビット ・ ス トリ ング は , 1 ベイト つい て 8 ビット ずつ 貯え られ 
る 。 ビ ピット ・ ス トリ ング 変数 K 許 され る 最大 の 長 さ は , 3 2,.767 
で あぁ る 。 繰返し 因数 が 適用 きれ る 前 の ビッ ト ・ ス トリ ング 定数 KK 許 
され る 最大 の 長 さ は , その コン バイ ラー で 使用 で きる 記憶 域 の 量 
よっ て 異な る が , 最低 の 場合 で も 4096(512 バイト ) で ある 。 
ビッ ト ・ ス トリ ング 対す る 最小 の 長 さ は , ゼロ で ある 。 長 さ の 変 
わる スト リン グ K 対 する 記憶 域 は , 宣言 され た 最大 の 長 さ より も 2 
バイ ト だ け 大 きく な る 。 最初 の 2 バイ ト IC は , その スト リン グ の 現 
在 の 長 さ が , ビッ ト 数 を 単位 と し て 入れ て お か れる 。 


プロ グラ ム 制 御 デ ー タ 


プロ グラ ム 制 御 デ ー タ (C は , ファ イル , ラベ ル , 入口 , 事象 , ログ 
ー タ ー, な よび エリ ア の 各 タ イプ が ある 。 


ファ イル ・ デ ー タ 


ファ イル ・ デ ー タ 項目 は , PL 1T ファ イル K 関 する 情報 を 表わす 
も の で あり , ファ イル 定 数 で ある と と も , ファ イル 変数 で ある て と 
も ある 。 フ ァイル 定数 は , ファ イル 変数 KC 割り 当て る と と が で きる 。 
ファ イル 変数 を 参照 する と と は , 割り 当て られ た ク ァ テイ メア 定数 を 参 
照 す る と と C な る 。 


ラベ ル ・ デ ー タ 
ラベ ル ・ デ ー タ 項目 は , ラ ベル 定数 また は ラベ ル 変 数 の 値 で ある 。 


ラ ベル 定数 は , ステ ー ト メン ト の 接頭 語 と し て 書か れ た 議 別 名 で 
あり , 実行 中 C そ の ラベ ル を 参照 する と と (C よ っ て その ステ ー ト メ 
ント (て ブ ログ ラム の 制御 を 渡す と と が で きる よう (て な っ て いる 。 コ 
ロン を 使っ て ラベ ル を 該当 の ステ ー ト メン トト 結び つけ る 。 

ABCDE: DISTANCE ー RATE ネ キネ TIME 
と の 例 の 中 で , ABCD は ステ ー ト メン ト ・ ラ ベル で ある 。 と の 
ステ ー ト メン ト は , 命令 を 正規 の 順序 で 実行 し て くる か , ま た は 
GO TO ステ ー ト メン ト を 使っ て ブログ ラム 内 の と ど と か 別 の 地点 
か ら と の ステ ー ト メン ト K 制 御 を 渡す と と に よっ て , 実行 する と と 
が で き お 。 


上 記 の よう KK 使用 ほれ て いる と き は , ABCDE は さら C ス テー 
トメ ント ・ ラ ベル 定数 と し て 区 別 す る こと と が で きる 。 ス テー トメ ン 
ト ・ ラ ベル 変数 は , ステ ー ト メン ト ・ ラ ベル 定数 を 参照 する 識別 名 
で ある 。 次 の 例 C つ いて 考え て みよ う 。 


LBL A: ステ テー トメント 


LBL _B: ステ ー ト メン ト j: 


LBL メー LBL A 


GO TO LBL %: 


LBL A と LBL B は , ステ ー ト メン ト の 接頭 語 と し て 使わ れ て 
いる の で , ステ ー ト メン ト ・ ラ ベル 定数 で ある 。 LBL 又は , ス 
テー トメ ント ・ ラ ベル 変数 で ある 。LBL_X(CLBL A を 割り 当 
て た 場合 は , GO TO LBL XX と いう ステ ー ト メン ト を 与え る 
と , LBL A ラテ ー ト メン ト に 制御 が 肖 さ れる 。 ど と か 別 の と と 
ろ で , と の プロ グラ ょ ム C は , LBL XX(CLBL B を 割り 当て る ス 
テー トメ ント が 含ま れ て いる か も し れ な い 。 そ の よう な 場合 は , 
LBTL 双 を 参照 する と , LBL_B を 参照 し た の と 同じ と と に な る 。 
L BL X の と の 値 は , 別 の 値 が 割り 当て られ る まで その まま に な 
っ て いる 。 


ステ ー ト メン ト ・ ラ ベル 変数 は , 次 の よう Cc, LABEL 属性 を 
つけ て 宣言 し な けれ ば な ら な い 。 


DECLARE LBL X LABELi 
入 ロ デー タ 


入口 デー タ は , 入口 名 と だ け 結 び つ け て 使用 まれ る も の で , ブロ ン 
ー ジャ ー の 入口 点 へ の 参照 を 可能 に する 値 を も っ て いる 。 人 和信 ロ デー 
タ は , 入口 定数 で ある と き と , 入口 変数 の 値 で ある と き が ある 。 


入口 定数 は , PROCEDURE ま た は ENTRY ステ ー ト メン ト 
の 接頭 語 と し て 書か れ た 入口 名 と し て , ブロ グラ ム の 中 に 出 て くる 
識別 名 で ある 。 と れ を 使用 する と と に よっ て , ブロ シー ジャ ー の 入 
品 点 を 参照 する と と が で きる 。 たとえば, 


DECLARE (SQUARE,CUBE) ENTRY 
CALL SQUARE 


CALL CUBEs 


SQUARE と CUBE は , 入口 定数 と し て 宣言 され て いる 。 と の 2 つ 
の どちら か の 入口 定数 参照 が 行なわ れる と , SQUARE また は 
CU BE C よ っ て 指定 され た ブロ シー ジャ ー 入 口 点 制 御 が 渡さ れる 。 


入口 変数 は , 入口 定数 を 参照 する 識別 名 で ある 。 次 の 例 C つ いて 
考え て みよ 5。 


DECLARE EV ENTRY VARIABLE, 
(E1.E2) ENTRY 


EV = E1s 
CALL EVi 
REV = BE2s 
CALL EV: 


EV は , VARIABLE 属 性 に よっ て 入口 変数 と し て 宣言 され て いる 。 
最初 の CALL ステ ー ト メン ト は , 入 口 定数 1 て と よっ て 表わさ れる 人 口 
点 を 呼び 出 し て いる 。 2 番目 の CALL は , 入口 点 選 2 を 呼び 出し て いる 。 
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事象 デー タ 


事象 変数 は , レ ュ ー ド 式 入 出力 操作 (また は DISPLAY ステ ー 
トメ ント の 実行 ) と , その 操作 を 開始 し た プロ シー ジャ ー の 中 K あ 
る 他 の ステ ー ト メン ト の 実行 と の 間 で , ある 程度 の オー バー ラッ プ 
が で きる よう に する た め K 用 いら れる も の で ある 。 


EVENT オプ ショ ン ま た は WAIT ステ ー ト メン ト の 中 
EVENT 属性 を 記入 する と と C に よって, あ るい は 次 の 例 の よう 


し て 明示 宣言 する と と (C よっ て , 変数 に は EVENT 属性 が 与え ら 
れ る 。 


DECLARE ENDEVT EVENT: 


詳細 に つい て は , 第 12 章 「 レ ュー ド 方 式 の 転送 」] と セク ショ ン 
4 の 「 表 示 」 の 項 を み て いた だ きた い 。 


ロケ ー タ ー・ デ ー タ 


ロケ ー タ ー・ デ ー タ C は , ポイ ンタ ー と オフ セッ ト の 2 種類 が ある 。 


ポイ ンタ ー 変 数 の 値 は , 実際 (C は 記憶 域内 の 記憶 位置 の アド レス 
で ある た め , いく つか の 異 を る 記憶 位置 に 記憶 域 が 割り 振ら れ て 
いる 可能 性 の あ る 変数 KC 対 する 参照 一定 の 性 質 を 与え を る た め K 使 
用 する と と が で きる 。 


オフ モッ ト 変 数 の 値 は , 確保 され た 記憶 域 の 先頭 か ら の 相対 的 な 
位置 を 指定 する も る ので, と の 記憶 域 の アド レス 自体 が 変っ て も その 
まま 通用 す る 。 

ロケ ー タ ー 変 数 は , 次 の 例 の よら (C し て 宣言 する と と が で きる 。 


DECLARE HEADPTR POINTERK, 
FIRST OFFSET (AREA1): 


と の 例 の 中 で , AREA 1 は , FIRSTC よ っ て 指定 され た 記憶 位 
置か 含ま れる 記憶 域 の 名 前 で ある 。 

BASED 属性 の 中 , ロケ ー タ ー 修 飾 記号 の 左側 , また は SET 
オプ ショ ン の 中 POINTER 属性 を 記入 する と と に よっ て , 変 


数 に POINTER 属性 を 与え る と と も で きる 。 


詳細 に ついては, 第 8 章 「 記 憶 域 の 制御 ] を みて いた だ きた い 。 
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ェ リ プア 変数 は , 基底 付 変数 の 割 振り の た め KC 確 保 さ れる 記憶 域 を 記 
述 す る た め に 用 い られ る 。 エ リア は , その 中 含ま れる 割 振り 場所 
全体 を いっ し ょ (割り 当て た り , 転送 し た りす る と と が で きる 。 し 
た が っ て , 1 組 の 基底 付 の 割 振り 場所 を 割当 て や 入出 力 の 1 単位 と 
し て 取り 扱 2 こ と が で きる 一 方 で , 個々 の 割 振り 場所 は それ ぞ れ 別 
の 存在 と し て 識別 すね る こと と も で きる 。 


OFFSET 属性 また は IN オブ ショ ン の 中 (C AREA 属 性 を 記 
入 す る と と に よっ て , ある い は 次 の 例 の よう 明示 宣言 する と と 
よっ て , 変数 AREA 属 性 が 与え られ る 。 


DECLARE AREA1 AREA(2000), 
AREA2 AREA: 


確保 され る 記憶 域 の バイ ト 数 は , 上 の 例 の AREA1 の ょ よう KC, 明 
示 的 (記述 す る こと が で きる 。 記述 され て いな を な いと き は , 省略 時 解 
釈 C に より 1000 バ イト と みな され る 。 理論 上 の 最大 の サイ ズ は 16, 
777,200 バイ ト で ある が , 実際 に は , その プロ グラ ム で 使用 で 
き る 記憶 域 の 量 に よっ て 制約 され る 。 


詳細 に つい て は , 第 8 章 「 記 憶 域 の 制御 ] を みて いた だ きた い 。 


デー タ の 編成 方 法 


PL/T で は , デー タ 項 目 は 1 個 の デー タ 有 要素 C す る と と も で きる 
し , それ ら を いく つか まとめ て , 配列 や 構造 と 呼ば れる デー タ の 集 
合体 を 作 ゐ 6 と と も で きる 。 1 つの 要素 を 表わす 変数 は , 要素 変数 
( スカ ラー 変数 と も ゃ 呼ば れる ) で ある 。 デー タ 要 素 の 集 ま り を 表 わ 
す 変 数 は , 配列 変数 また は 構造 変数 で ある 。 


どの よう な を な タ イブ の 問題 デー タ ま た は ブロ グラ ュ 制 御 デ ー タ で も , 
まとめ て 配列 また は 構造 に する と と が で きる 。 


配列 


デー タ の タイ ブ お よび 精度 また は 長 さ 関し て 同じ 性 質 を も $ つ デー 
タ 要 素 を いっ し ょ に まとめ て 配列 C す る と と が で きる 。 配列 は , そ 
の 中 に ある 要素 が すべ て 同じ 属性 を も ゃ つ , n 一 次 元 の 要素 の 集まり 
で ある 。 配列 その も の に だ け , 名 前 が 与え られ る 。 配列 の 中 の 個々 
の 要素 は , 配列 内 (CK ぉ ける 相対 的 を 位置 を 与え を る こと と と よっ て 参照 
され る 。 次 の よう な 2 つの 宣言 た つい て 考え て みよ 29。 


DECLARE LIST (8) FIXED DECIMAL 
( ② う 3 
DECLARE TABLE (4,2) FIXED 
DECIMAL (3)j 


最初 の 例 で は , LIST は , 8 個 の 要素 か ら な る 1 次 元 の 配列 で , 
その 中 の 個々 の 要素 は , 3 桁 の 1 0 進 固定 小数 点 項 目 で ある と 宣言 
され て いる 。 2 番 上 日 の 例 で は , TABLE は , 8 個 の 10 進 固定 小 
数 点 の 要素 か ら な る 2 次 元 の 配列 で ある と 宣言 され て いる 。 


DECLARE ステ ー ト メン ト の 中 で 配列 名 の 後に ある 括弧 内 の 
数 字 は , 次 元 属性 の 指定 で ある 。 と の 指定 は 配列 名 の 後 C 書か な け 
れ ば な ら な い が が 間 に プ ラン ク を 入れ て も 入れ なく て も よい 。 とれ 
は , 配列 の 次 元 の 数 な よび 名 次 元 の 限界 (また は 範囲 ) を 指定 する 
も の で ある 。 LIST(KC 対 し て は 1 つ し か 限界 が 指定 され て いな い 
の で , と れ は 1 次 元 の 配列 で ある 。 TABLE 対し て は , カン マ 
で 区 切っ て 2 つの 限界 が 指定 され て いる ので, と れ は , 2 次 元 の 配 
列 と し て 宣 斉 され た と と に て な る 。 


次 元 の 限界 と いう の は , その 次 元 の 始め (下限 ) と 終り (上 限 ) 
で ある 。 範囲 は , 上 限 と 下限 も 含め て その 間 (C あ る 整数 の 数 で ある 。 
次 元 C 対 する 限界 の 指定 の 中 整数 が 1 つ し か を いと き は , ト 限 は 
1 と みな され る 。 1 次 元 の 配列 LIST は , 1 と 8 の 限界 を も ち , 
その 範囲 は 8 に を る 。 2 次 元 の 配列 TABLE は , 1 と 4, お よび 
1 と 2 の 限界 を も ち , その 範囲 は 4 と 2 な る 。 


次 元 の 下限 が 1 で な いと き は , 上 限 と 下限 を 表わす 2 つの 数 を コ 
ロン で 結び つけ て , その 両方 を 明示 的 に 記述 し な けれ ば を ら な い 。 
た と えば げ ば, 


DECLARE LIST_A (4:11)3 
DECLARE LIST_B (一 4:3 ぅ )3 


最初 の 例 の 限界 は 4 と 1 1 で あり , 2 番目 の 例 の 限界 は ー4 と 3 で 
あ る 。 範囲 は どちら も 同じ で ある と と ( つま り , どちら の 場合 も 下 
限 か ら 上 限 ま で の 間 (C 8 個 の 整数 が ある ) 注意 し て いた だ きた い 。 
配列 の 限界 と 範囲 の 違い 充分 注意 し て いた だ きた い 。 2 以上 の 
配列 が 関係 する 配列 デー タ を 取り 扱う と き ( 第 4 章 「 式 と デー タ 変 
換 」 の と と ろ で 説明 する ) は , それ ら の 配列 の 限界 ( 範囲 だ け で な 
く ) は 全く 同じ で な けれ ば を ら を な い 。 LIST, LIST 一 A , 
LIST 一 B の 稚 囲 は みな 同じ で ある が , 限界 は 同じ で は な を な い 。 


配列 の 要素 を 参照 する た め の 方 法 は , 配列 の 限界 に ょ っ て 決ま る 。 
た と えば , 上 で 宣言 され て いる LIST と いう 配列 CK 次 の よう な デ 
ー タ 項目 を 割り 当て る 場合 を 考え て みよ う 。 


20 5 10 30 630 150 310 70 


それ ぞ れ の 要素 は , 次 の よう て し て 参照 され る と と C な る 。 


参 暑 要 素 


LIST (1) 2 0 
LIST (2) 5 
LIST (3) 10 
LIST (4) 30 
LIST (5) 630 
HESF C@) 150 
ES (7 3 10 
LIST (8) 7 0 


LIST と いう 名 前 の 後に ある 数 は , 添字 で ある 。 配列 名 の 後に 
添字 を 括弧 (C 入 れ て ( 間 (C プ ラン ク を 入れ て も , 入れ を な く て も よい ) 
つけ る と , 配列 の 中 に ある 特定 の デー タ 項 目 が 識別 され る 。 LT ST 
( 4 ) と いう よう な 添字 付き の 名 前 は , 1 個 の 要素 を 指し て な り , 
要素 変数 で ある 。 配列 名 添字 を つけ ず K 記 入 す る と ( たとえ ば, 
LIST ), 配列 全体 を 指す と と が で きる 。 と の 場合 , LIST は 配 
列 変数 で あ る 。 導 字 と 次 元 属 性 の 指定 の 違い 注意 し て いた だ きた 
い 。 後者 は , 宣言 の 中 に C 出 て く る も る の で あり , それ が 次 元 を も っ て 
いる と いら と と と , 配列 の 中 に ある 要素 の 数 を 指定 する も る の で ある 。 
添字 は , 配列 の 中 に ある 特定 の 要素 を 識別 する ゐる ため, 他 の 参照 の 
中 で 使用 3 され る も の で ある 。 


上 で 宣言 し た LIST A と LIST BC 同じ デー タ を 割り 当て 
る と , 次 の よう (参照 され る 。 


参 照 要 素 参 照 
LIST_A (4) 20 LIST _B (-4) 
LIST_A (5) 5 DLS RB' ^( 王 9) 
LIST _A (6) 10 LIST_B (一 2) 
ES 中 、 29 30 LIST_B (1) 
LIST A (8) 630 LIST_B (0) 
LIST A (9?) 150 LIST_B (1) 


LIST_A (10) 310 LIST B (2) 


LIST A (11) 70 LIST B (3) 
2 次 元 の 配列 と し て 宣言 され て いる TABLEC 同 じ デ ー タ を 割り 
当て た 場合 を 考え て みょう 。 TABLE は , 次 の よう な 4 行 2 列 の て 
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トリ ックス (行列 ) と し て 表わさ れる 。 


TABLE(m,n)  (m,1) (m,2) 
放 。 抽 、 2 0 5 
2 状 ) 1 0 3 0 
(3 ,n) 630 150 
( 4 ,n) 310 70 


TABLE 内 の 各 要 素 は , 2 つの 添字 を カン マ で 区 切っ て 括弧 
入れ た 添字 名 (C よ っ て , 参照 され る 。 た と えば , TABLE(2,1) 
は , 第 2 行 の 最初 の 項目 , と の 場合 は 10 と いう デー タ 項 目 , を 指 
定 す る こと C な る 。 


注 : わ か りや すく 説明 する た め (C, TABLE を マト リッ クス KC し 
た が , と れ は 単に 概念 的 を も る の で あっ て , 各 項 目 が 実際 < 記憶 域 の 
中 で と の よう な 構成 C な る わけ で は を な い 。 デ ー タ 項目 は , 行 を 主体 
と し た 順序 で ( つま り , 右側 の 添字 が 先 C 変 っ て ゆく ), 配列 C 割 
り 当 て られ る 。 た と えば ゆば, TABLE へ の 割当 て は , TABLE(1, 
1) ,TABLE(1.2), TABLE(2,1) ,TABLE(2,2), 
he と いら 順 進め られ る 。 


配列 は , 2 次 元 ま で 限ら れ て いる の で は な く , 最高 1 5 次 元 ま 
で 宣言 する と と が で きる 。 配列 の 要素 を 参照 する と き , 添字 付 の 名 
前 に は その 配列 の 中 (C あ る 次 元 の 数 だ け 添 字 を つけ な けれ ば な ら な 
い 。 


と の 間 で は , 配列 の 例 と し て 算術 デー タ の 配列 を 取り 上 げ て きた 
が , すべ て の タイ プ の デー タ を 配列 に する と と が で きる 。 ス トリ ン 
グ の 配列 ( 文字 で も ビッ ト で も る 可 ) も 有効 で あり , ラベ ル , 入口, 
ファ イル , 事象 エリ ア , ロケータ ー の 各 デ ー タ の 配列 も 有効 で あ 
る 。 


添字 と し て の 式 


誠 字 付 の 名 前 の 添字 は , 定数 で ある 必要 は を い 。 算術 値 と し て 有効 
な を 値 を 生ずる も の で あれ ば , どの よう な 式 を 使用 し て も よい 。 と の 
よう な 式 の 計算 結果 が 整数 の 値 で を な いと き は , 小数 部 が 無視 され る 。 
シス テ ュ ブ 360 で 実施 する と き は , 添字 は , 2 進 整 数 と し て 内 部 
的 に 貯 を られ る 。 


変数 また は その 他 の 式 と し て 添字 を 表わす と と は , よく ある と と 
で ある 。 し た が っ て , TABLE ( 1 ,J* ネ KK) と いら よら うな な 指定 法 
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を 使え ば , 1 ,J, 人 多 の 値 の 変化 に 応じ し て TABLE 内 の いろ いろ な 
要素 を 参照 する と と が で きる 。 


配列 の 断面 


准 字 付 の 名 前 の 添字 を 性 印加 き 換 える と と C よ っ て , 配列 の 断面 
を 参照 する と と が で きる 。 星 印 は , 範囲 全体 を 使用 する と と を 指定 
する も の で ある 。 たとえば, TABLE(*, 1) は , TABLE の 
最初 の 列 の すべ て の 要素 を 参照 し て な ぉ ふり, TABLE( 1 ,1), 

TABLE(2,1),TABLE(3,1 ) お よび TABLE(4,1) 
か ら な る 断面 を 指定 する も る の で ある 。 添字 付 の 名 前 TABLE(2, 
 ) は , TABLE の 第 2 行 C あ る すべ て の デー タ 項 目 を 参照 し て 
いる 。 TABLE ( 玉 , 玉 ) は , 配列 全体 を 参照 する る の で ある 。 


星 印 の 添字 を も つ 名 前 は , 1 個 の デー タ 有 要素 で は を く <, 星 印 の 個 
数 に 相当 する 数 の 次 元 を も つつ 配列 を 表わし て いる と と 注意 し て い 
た だ きた い 。 し た が っ て , と の よう な 名 前 は , 要素 式 で は を く , 配 
列 式 で ある 。 


配列 の 断面 を 参照 する と い うと と は , その 配列 の 中 の 2 つ 以 上 の 
要素 を 参照 する と と に な る が , と の よ うら な 参照 に よっ て 指定 され る 
要素 は , その 断面 の 部 分 以外 の 他 の 要素 に よっ て 切断 され て し ま 5 
た め , 記憶 域 の 中 で 隣り 合っ て い を な いと と も ある 。 と の よう な 断面 
(C よ っ て 表わさ れる 記 培 域 は , 不 連続 記憶 域 と 呼ば れる 。 不 連続 記 
億 域 の 使用 に は , ある 種 の 制約 が 適用 ね れる 。 た と えば , レコ ュー ド 
変数 ( レコ ー ト 式 転送 ステ ー ト メン ト (C よ っ て デー タ が 転送 され る 
変数 ) は , 連続 記憶 域 ( 記憶 域 の 中 で 各 デ ー タ 項目 が 隣り 合っ て い 


る ) の 中 に ある デー タ を 表わし て いな けれ ば な ら な い 。 


構造 


同じ 人 性質 を も っ て いる 必要 は な い が , 互い K 論 理 的 な 関連 を も つい 
くつ か の デー タ 項 目 を まとめ て , 構造 と 呼ば れる 集合 体 を 作る と と 
が で きる 。 


配下 と 同様 。 デ ー タ の 集まり 全 体 を 参照 する の に 用 いら れる 名 前 
が , 構造 全体 C 与 えら れる 。 た だ し , 配列 と は 異 を り , 構造 の 中 の 
各 要 素 も , それ ぞ れ 名 前 を も っ て いる 。 


構造 は , 上 関係 CK ある 名 前 の 集まり で ある 。 と の 関係 で 最も 低 
い 位 置 に C ある の は 要素 の 集 ま り で , その 各々 は 1 個 の デー タ 項 目 ま 
た は 配列 を 表わし て いる 。 最も 上 位 (ある の は 構造 名 で , 要素 変数 
の 集 ま り 全 体 を 表わし て いる 。 たとえば, 次 に あげ る の は , 週給 の 
計算 て 使用 され る 要素 変数 の 集 ま り で ある 。 


LAST_NAME 
FIRST_NAME 
REGULAR_HOURS 
OVERTIME HOURS 
REGULAR_ RATE 
OVERTIME RATE 


と れ ら の 変数 を 集め て 構造 C し , 集合 体 全 体 を 指す 1 つの 構造 名 
PAYROLTL を 与え る と と が で きる 。 


PAYROLL 


LAST NAME REGULAR_HOURS 


REGULAR_RATE 


FIRST NAME OVERTIME_HOURS 


OVERTIME _ RATE 


PAYROLL を 参照 する と , PAYROLL と いら 構造 内 の す 
べ て の 要素 変数 が 参照 され る 。 た と えい ぱ , 


GET DATA (PAYROLL): 


上 の 入力 ステ ー ト メン ト を 与え る と , PAYROLL と い 2 構 千 
内 の 要素 変数 の 各々 (C 対 し て デー タ を 割り 当て る と と が で きる 。 


と の よ ょ うな 集合 体 を さら 小さ を 論理 的 を 集合 体 C 小 分 割 する と , 
都合 が よい 場合 が 多く ある 。 上 の 例 の 中 で , LAST_NAME と , 
FIRST NAME は 論理 的 を 小 集合 体 を 作る と と が で きる し , また , 
REGULAR_HOURS と OVERTIME_HOURS , REGU- 
LAR _ RATE と OVERTIME_ RATE も 同じ で ある 。 構造 の 
中 で ,。 と の よう な 小 集合 体 に 対 し て も 名 前 を つけ る と と が で きる 。 


PAYROLL 
NAME HOURS RATE 
FIRST REGULAKR REGULAR 
LAST OVERTIME OVERTIME 


名 前 の 上 下関 係 C は , 様々 を レベ ル が ある と 考え る と と が で きる 。 
第 1 番目 の レベ ル に ある の は , 構造 名 (大 構造 名 と も 呼ぶ ) で あり , 
それ 以下 の レベ ル の も の は , 下位 構造 名 ( 小 構 造 名 と 呼ぶ ) で あ る 。 
最も 下 の レ ベル に ある の は , 要素 名 (基本 項目 名 と 呼ぶ ) で ある 。 
構造 の 中 に ある 基本 項目 名 が 配列 を 表わす と と も 可能 で ある が , と 
の 場合 の 基本 項目 名 は , 要素 変数 で は を なく <, 配列 変数 を 表わし て い 
る 。 


構造 の 構成 は ,。 DECLARE ステ ー ト メン ト の 中 で レベ ル 番 号 
を 使用 し て 指定 され る 。 大 構造 名 は , 1 と いう レベ ル ん 番号 に よっ て 
宣言 し た けれ ば を ら な い 。 人 小 構造 名 と 基本 項目 名 は , 算術 的 (C 1 よ 
り 大 きい レベ ル 番 号 ( 1 0 進 整定 数 で を けれ ば な ら を い )《C よ っ て 


宣言 し を けれ ば を らい 。 レズ ベル 番号 と それ 結び つけ られ る 名 前 
の 間 は , プラ ンク を あけ て 区 切る と と 。 た と えば , 週給 の 各 項 目 は , 
以下 の ょ う K 宣 言 する と と が で まき る 。 


DECLARE 1 PAYROLL , 

2 NAME 
3 LAST , 
3 FIRST , 

2 HOURS , 
3 REGULAR。 
3 OVERTIME, 

2 RATE, 
3 _ REGULAR , 
3 OVERTIME:j 


注 : PAYROLL と いら 構造 を 実際 宣言 する と き は , 基本 項目 
名 LAST と FIRST , ぉ よび 2 対 の REGULAR と OVERTTIME 
iC 対 し て それ ぞ れ 属性 を 指定 する 。 と の 例 で は , 記入 行 を 変え た り , 
記入 位置 を ず らし た り し て いる が , と れ は 単 K 読 み 易 くす る た め の 
も の で あっ て ,。 DECLARE 1 PAYROLL, 2 NAME, 
3 LAST, と いら よう KK 書い て も よい 。 


PAYROLL は , NAME ,HOURS , な よび RATE と いう 小 構造 
が 含ま れる 大 構造 と し て 宣言 され て いる 。 各々 の 小 構造 に は , 2 つ 
の 基本 項目 名 が 含ま れ て いる 。 プ ロ グラ マー は , PAYROLL と い 
ぅ 名 前 を 使っ て 構造 全体 を 参照 する と と も で きる し , 小 構造 名 を 参 
照 す る と と によって 構造 の 一 部 分 だ け を 参照 する と と も で きる 。 


と の 宣言 の 中 で は , 名 前 の 前 に は それ ぞ れ 関連 する レベ ル 番 号 が 
つい て お おり, レベ ル 番 号 と 名 前 の 間 は プラ ンク で 区 切ら れ て いる と 
と 注意 し て いた だ きた い 。 次 の レベ ル の 番号 を 選ぶ と き は , 次 
大 きい 整数 を つづ け る 必要 は を い 。 と れ ら は , 単 K 名 前 の 相対 的 を 
レベル を 指定 する た め K 用 いら れる も の で ある 。 レ ベル ュ の 小 構造 
(て は , n よ り も レベ ル ん 番号 が 大 きく , し か も その 小 構 造 名 か ら , n 
以下 の レベ ル 番 号 を も つ 名 前 が 次 (C 出 て くる まで の 間 (C あ る 名 前 が , 
すべ て 含ま れる と と C な る 。 PAYROLL は , 次 の ょ よう K 宣 言 す 
る と と も で きる 。 


DECLARE 1 PAYROLL, 

4 NAME, 
5 LAST, 
5 FIRST, 

2 HOURS , 
6 REGULAR , 
5 OVERTTIME, 

2 RATE, 
3 REGULAR, 
3 OVERTIMEi 


と の 宣言 は , 前 記 の 宣言 と 全く 同じ 構造 を 作り 出す 。 


レベ ル の 数 は 最大 15 まで 許さ れる が , レベ ル 番 号 は 最大 255 
まで 使 2 と と が で きる 。 
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大 構造 名 の 記述 が 終了 する の は , レベ ァ ル 番号 1 を も つ 別 の 項目 が 
宣言 され た と き , レベ ル 番 号 を も た を い 別 の 項目 が 宣言 され た と き , 
また は DECLARE ステ ー ト メン ト の 終了 を 表わす セミ コロ ン が 
出 て き を とき, で ある 。 


レベ ル 番 号 は , DECLARE ス テー トメ ント , お よび 被 制御 構 
造 の と き は ALLOCATE ス テー トメ ント の 中 で だ け , 構造 名 KC 対 
し て 指定 され る も の で ある 。 構造 また は その 中 の 要素 を 参照 する と 
き に は , レベ アル 番号 は 使用 し た い 。 


修飾 つき の 名 前 


小 構造 名 や 構造 の 要素 は , 他 C 同 じょう を 名 前 な な けれ ば , その 小 
構造 名 や 要素 名 だ け を 使っ て 参照 する と と が で きる 。 し か し , 
REGULAR と OVERTIME と いう 名 前 は それ ぞ れ , PAY- 
ROLL 対す る 構造 の 宣言 の 中 2 回 出 て き て いる と と に 注意 し 
て いた だ きた い 。 これ ら の 名 前 を 参照 する と き は , その 名 前 を 唯一 
無 二 の も る の CC する た め の 何 ら か の 修飾 を 加え を けれ ば , 判別 が で き 
を い 。 


PL 1 で は , と の よう みな 不明 確 さ を 避け る た め (C, 修飾 つき の 
名 前 を 使う 9 こと が で きる 。 修飾 つき の 名 前 と は , その 名 前 より 高位 
の レベ ル C あ る 名 前 を 1 つま た は 2 つつ 以 上 使っ て 修飾 する と と CC よ 
り , 唯一 無 二 の も の と 判別 され る 要素 名 また は 小 構造 名 で ある 。 
PAYROLL の 例 で いえ ば , REGULAR と OVERTIME は , 
HOURS. REGULAR ,HOURS. OVERTIME ,RATE. 
REGULAR ,RATE. OVERT TIME と い 9 修 飾 名 を 使う と と 
(C よ っ て , 判別 する と と が で きる 。 


修飾 つき の 名 前 の 中 C 出 て くる 様々 を 名 前 は , ビリ オド で 連結 さ 
れる 。 ビ リオ ド の 前 後 K プ ラン ク が あっ て も よい 。 修飾 は 。 レベ ル 
の 順に 行 な う 。 つ まり , 最も 高い ら レ ベル の 名 前 を 最初 KC 書き , 最も 
低い レベ ル の 名 前 を 最後 C 書 く よ う に する 。 


大 構造 名 だけ は 例外 で ある が , 構造 の 中 C あ る 名 前 は , それ が 宣 
言 さ れ て いる プロ シー ジャ ー の 中 で 唯一 無 二 で ある 必要 は を い 。 た 
と えば , 唯一 無 二 の 参照 C す る た め C, PAYROLL. HOURS. 
REGULAR と いう 修飾 つき の 名 前 が 必要 を た こと も ある (WORK 
と いう よう な 別 の 構造 か あっ て , と と も 小 構造 HOURS の 中 
REGULAR と いう 名 前 が ある と すれ ば , こち ら は WO RK. 
HOURS. REGULAR と いう 名 前 を 用 いて 判別 する と と が で き 
る ) . 名 前 を 唯一 無 二 の も の と し て 判別 が で きる 範囲 で 修飾 を すれ 
ば ょ い の で , 修飾 に 用 いら れる 名 前 を , ある 限り 全部 使用 する 必要 
は を い 。 中 間 に あ る 修飾 名 を 省略 する と と も で きる 。 PAYROLL. 
NAMBE. LAST の か わり (CC, PAYROLL. LAST と いう 名前 
を 使っ て も よい 。 


構造 の 配列 
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構造 の 配列 を 宣言 する ため C, DECLARE ステ ー ト メン ト の 中 
で , 構造 名 <C 対 し て ( 大 構造 で も 小 構造 で も よい ) 次 元 属 性 を 与え 
る と と が で きる 。 構造 の 配列 は , その 中 の 要素 が 同じ 名 前 , レベ ル , 
お よび 要素 を も ゃ つ 構 造 で も る よう みな 配列 で ある 。 た と えば げ , 

WEATHER と いら 9 構造 が , 年 間 を 通じ て の 各 月 の 気象 情報 を 処理 する 
た め 《 使 用 され て いる と すれ ば , 次 の よう 宣言 する と と が で きる 。 


DCL 1 WEATHER( 12), 

2 _ TEMPERATURE , 
3 HIGH DECIMAL FIXED(4,1), 
3 LOW DECIMAL FIXED(3,1), 

2 WIND_VELOCITY , 
3 HIGH DECIMAL FIXED(3) , 
3 LOW DECIMAL FIXED( 2), 

2 PRECIPITATION, 
3 TOTAL DECIMAL FIXED( 3, 1), 
3 AVERAGE DECTIMATL FIXED( 3,1)j: 


し た が っ て , と の よう みな 配列 が 1 年 間 の 気象 を 表わし て いる と き は , 
プロ グラ マー は , WEATHER(7 ) と 指定 する と と に よっ て , 7 
月 の 気象 デー タ を 参照 する と と が で きる 。 7 月 の 各部 分 は , 
TEMPERATURE( 7 ) ,WIND VELOCITY(7) , 
PRECIPITATION(7 ) と いう ょ らし て 参照 する と と が で 
きる が , TOTAL( 7 ) と する と , 7 月 中 の 総 雨量 が 参照 され る 。 


3 月 の 最高 気温 を 参照 する た め の TEMPERATURE. 
HITGH(3 ) は , 添字 を つけ た 修飾 つき の 名 前 で ある 。 


構造 の 配列 の 中 KK 配列 で ある 小 構造 な 含ま れ て いる と き は , 添 字 
を つけ た 修飾 つき の 名 前 が な ぉ 一 層 必 要 に た っ て くる 。 た と えば ぱげ , 
次 の よう を な 構造 の 配列 に つい て 考え て み ょ 25。 


DECLARE 1 A (6 る 4,6 る ), 
2 B (5), 
3 C。 
0 各 し 
2 選 i 


A と B の 両方 が 構造 の 配列 で ある 。 と の 中 の デー タ 項 目 を 識別 する 
を た め に は , 3 つの 名 前 と 3 つの 添字 を 使 必要 が ある 場合 も ある 。 
た と えば , A(1,1). B(2). C は , A の 中 の 構造 の 中 CC あ る 
B の 要素 で ある C を 識別 する る の で ある 。 


聞 の 順序 を 変え を たい 限り C な いて は , この よう な 参照 の 中 で 使 
われ て いる 添字 を 右 ま た は 左 (移動 し て , 低位 また は 高位 の レベ ル 
の 名 前 に つけ る と と が で きる 。 た と えば , 上 記 の 構造 の 配列 の 場合 
A.B.C(1.1.2) お よび A( 1,.1,2).B.C は , A( 1,1). B(2). 
C と 同じ 意味 を も る つ 。 すべ て の 添字 が 最低 位 また は 最高 位 の レベ ル K 
移動 きん て い を いと き は , 介在 花 字 を $ も っ て いる と いう 。 したがって, 


NN し 


A. B( 1 , 1 , 2 ). C は , 介在 添字 を も っ て いる わけ で ある 。 


構造 の 配列 の 中 で 宜 言 され て いる 配列 は , それ が 含ま れ て いる 々 構 
造 の 中 で 宮 言 され て いる 次 元 を 受け つぐ 。 た と えば , 構造 A の 配列 
対す る 上 記 の 宣言 の 中 で は , 配列 B は AK 対 し て 宣言 され た 2 つ 
の 次 元 を 受け つぐ た め , 3 次 元 の 構造 に を なる 。B が 唯一 無 二 の も の 
で あっ て 修飾 を 必要 と し を いな ら ば , 特定 の B を 参照 する と き は 3 
つの 添字 が 必要 で ある (特定 の A を 識別 する た め C 2 つ , さら KC そ 
の A の 中 の 特定 の B を 識別 する た め KC 1 一 必要 ) 。 


構造 の 配列 の 断面 


と の コン パイ ラー で は , 構造 の 配列 の 断面 を 参照 する と と は で き な 
い 。 つま り , 参照 の 中 で 星 印 の 表示 を 使用 する と と は で き な い 。 


その 他 の 属性 


デー タ 変 数 (C 対 する キー ワー ド 属 性 (BINARY や DECIMAL 
な ど ) に つい て は , 本 章 の 前 の 節 で 簡単 に 説明 し た 。 1 つの デー タ ・ 
タイ プ に 個 有 の も の で は を いよ うら な 他 の 属性 を 使用 する こと も で き 
る 。 と れ ら の 属性 の 詳細 に つい て は , 1! 節 「 属 性 ] を み て いた だ き 
た い 。 デ ー タ ・ タ イプ お よび デー タ の 編成 KC 特 適用 され る 属性 は , 
DEFINED,LIKE,ALIGNED ,UNALIGNED , お よ 
び INITTIAL な を ど で あ る 。 


DEFINED 属性 


DEFINED 属性 は , 指名 され て いる デー タ 要 素 , 構造 , また は 
配列 が , 他 の デー タ K 割 り 当 て られ て いる も の と 同じ 記憶 域 を 占め 
る と と を 指定 する も る の で ある 。 た と を え ぱぴ , 


DECLARE LIST (100,100), 
LIST ITEM (100,100 ) DEFINED LIST 


LIST は , 100 行 100 列 の 2 次 元 の 配列 で ある 。LIST_ 
I TEM は , LIST の 上 KC 定 義 さ れ た , 全く 同じ 配列 で ある 。 
LIST ITEM の 中 C あ る 要素 を 参照 する こと は , LIST の 中 
の 対応 する 要素 を 参照 する の と 同じ で ある 。 


1 つの デー タ 項 目 を 小 分 割 し た り , オー バー レー し た りす る た め 
(CC,。 POSI TION 属 性 と いっ し ょ (CDEFINED 属性 を 使用 す 


る こと が で きる 。 たとえ ば, 


DECLARE LIST CHARACTER (50), 
LISTA CHARACTER(10) DEFINED LIST, 
LISTB CHARACTER(10 ) DEFINED LIST 
POSITION(11), 
LISTC CHARACTER( 30 ) DEEFTINED LIST 
POSITION(21)j 


LISTA は , LIST の 最初 の 10 文字 を 指し て な り , PO- 
SETION(1) と み を され る 。 LT STB は , LIST の 2 番目 の 1 0 文字 
を 指し て いる 。 LISTC は , LIST の 最後 の 3 0 文字 を 指し て いる 。 


新 し 配列 を 構成 する た め C, iSUB 変 数 を 使用 する こと とく よ 
っ て , 配列 の 一 部 分 を 指定 する の KC DEF {INED 属性 を 用 いる と 
と も で きる 。 i SUB 変 数 は , 1 か ら n ま で の 10 進 整定 数 と し て 
( n は 定義 され て いる ( 被 定義 ) 項目 の 次 元 の 数 を 表わす ) i を 指 
定 で きる 見 か け 変 数 で ある 。 i SUB 変 数 の 値 の 範囲 は , i 番 目 の 
次 元 の 下限 か ら 上 限 ま で で ある 。 たとえ ぱ ば , 


DECLARE A(20,20), 
B(10) DEFEINED A(2*1SUB , 2 ネ 1SUB ) 


B は , 配列 A の 対角線 上 に ある 偶数 番目 の 要素 を 集め た も の か ら 構 
成 さ れる サブ セッ ト で ある 。 言葉 を か えて いえ ば , B(1) は A 
( 2 ,2)K 対 応 し , B(2) は A(4 , 4)K 対 応 す る 。 


不 連続 記憶 域 : 配列 を 配列 で オー バー レー する た め KDEF INED 


属性 を 使用 する と , 不 連 続 記憶 域 に ある 配列 要素 ( つま り , 記憶 
域 の 中 で 陸 り 合 っ て いな じ 配 別 要素 ) を 配列 式 が 参照 する 可能 件 が 
生じ る 。 次 の 2 つの 場合 に は , 連続 する 要素 を 含む 配下 式 が , 不 連 
続 記憶 域 を 参照 する と と も 可能 で ある 。 


1. 配列 が i SUB 定 義 C よ っ て 宣 斉 され て いる と き , iSUB 
定義 に よっ て 宣言 され て いる 配列 の 中 に ある 隣り 合っ た 要素 
を 参照 する 配列 式 は , 不 連 続 記憶 域 を 参照 する と と に な っ て 
も よい ( つま り , 記憶 域 の 中 で 隣接 し て い を い , オー バー レ 
ー さ れ た 配下 の 要素 を 参照 し て も よい )。 


2. スト リン ク グ 配 列 が , それ より も ゃ 長い 要素 を も つ ス トリ ング 配 
列 の 上 定義 きれ て いる と き 。 被 定義 配列 の 中 に ある 連続 す 
る 要素 は , 基底 の 配列 と 被 定義 配列 の 各 要 素 の 長 さ の 違い 


よっ て 区 切 られ , 不 連続 記憶 域 の 中 に 貯え られ て いる も の と 
考え られ る 。 


LIKE 属性 


L IKE 属性 は , 宣言 され て いる 名 前 CK 対し て , LIKE 属性 の 後 
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(ある 大 構造 また は 小 構造 と 同じ 構成 を 与え る と と を 指示 する た め 
に 用 いら れる も の で ある 。 た と えば , 


DECLARE 1 BUDGET , 

2 RENT , 

2 FOOD, 
3 MEAT , 
3 EGGS , 
3 BUTTER , 

2 TRANSPORTATION, 
3 WORK , 
3 OTHER, 

2 BNTERTA INMENT , 

1 COST_OF_LIVING LIKE BUDGET 


COST_OF LIVING 対す る 上 記 の 宣言 は , 次 の よう 《 宣 
言 さ れ た 場合 と 同じ と を る 。 


DECLARE 1 COST_OF_LIVING , 

2 RENT , 

2 FOOD, 
3 MEAT, 
3 EGGS , 
3 BUTTER , 

2 TRANSPORTAT ION , 
3 WORK , 
3 OTHER , 

2 ENTERTATINMENT: 


注 : LIKE 属性 は , 指定 され た 名 前 の レベ ル よ り 低 い 構 造 の 構成, 
名 前 , お よび 属性 だ け を 複写 する 。 指定 され た 名 前 の 次 元 は 複写 さ 
れ な い 。 た と えば , BUDGET が 1 BUDGET (12 ) と 宣言 き 
れ て いた と し て も $, COST_OF_LIVING LIKE BUDGET 
と いら 宣言 < た よっ て COST_OF_LIVINGK 次 元 属性 は 与え を られ 
な い 。COST_OF_LIVINGK 次 元 を 与え る た め C は , DE - 
CLARE 1 COST_ OF LIVING(12) LIKE BUDGET と 
宣言 し を けれ ば を ら な い 。 


小 構造 名 を , LIKE 大 構造 また は LIKE 別 の 小 構造 と に う ょ よ 
ら K 宣 言 す る と と が で きる 。 ま た , 大 構造 名 を , LIKE 人 小 構造 ま 
た は L {IKE 別 の 大 構造 と いう よう KK 宣言 する と と も で きる 。 
ALIGNED お よび UNAL IGNED 属 性 
シス テム 360 お よび シス テ ュ ブ 370 で は , 情報 は , 8 ビッ ト 
単位 すなわち 8 ビッ ト の 倍数 で 時 えら れる 。8 ビ ピット か ら な る 各 単 
位 は , バイ ト と 呼ば れ る 。 PL ノ T デー タ が 次 字 形式 で 野々 えら れる 


と き は , 各 文 字 が それ ぞ れ 1 バイ ト K 入 る 。 


バイ ト は , 別々 C 扱 うこ と こと も で きる し , また , グル ー プ に し て フ 
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ィ ー ル ド と し て 扱う と と も で きる 。 ハー フワ ー ド は , 連続 する 2 ベ 
イト の グル ー プ で ある 。 ワ ー ド は , 連続 する 4 バイ ト の グル ー プ で 
ある 。 ダ プル ワー ド は , 2 ワー ド か ら な を る フィ ー ル ドド で ある 。 記憶 
装置 内 の バイ ト の 位置 に < は, 0 か ら 始 まる 連続 番号 が つい て いる 。 
と の 番号 は それ ぞ れ , 対応 する バイ ト の アド レス と 考え られ る 。 記 
憶 域 の 中 で は バイ ト の グル ー プ は , グル ー ズ の 左端 の バイ ト に よっ 
て アド レス され る 。 


ハー フワ ー ド や 婦 ブ プル ワ ー ド な どの 固定 長 フ ィ ー ル ド は , 主 記 憶 
装置 の 中 で は , その 情報 の 単位 C 対 する 整数 倍 の 境界 に 位 罰 し て い 
を けれ ば を ならない 。 そ の 記憶 装置 アド レス が その 単位 の バイ ト 数 の 
整数 何 に た な っ て いる と き , 情報 の 単位 に 対し て 境界 が 整数 倍 に な っ 
て いる と いら 5。 を たとえば, ワー ド ( 4 バイ ト ) は , その アド レス が 
4 の 倍数 C を る よう な 記憶 位置 に < を けれ ば を ら を な い 。 ハ ー フ ワー ド 
( 2 ベイ ト ) は , 2 の 倍数 で ある アド レス を も っ て いな けれ ば な ら 
ず , 人 ダブル ワー ド ( 8 ベイト ) は , 8 の 倍数 で ある アド レス を も っ 
て いな けれ ば な を ら な い ( 図 3 1 を 参照 )。 


ハー フワ ー ド , ワー ド , お よび 分 ブル ワー ド は , その 整数 倍 の 境 
界 K 位 置 合せ され て いな い 同 じ 長 さき の フィ ー ル ド KC く ら べ で て, 迅速 
(C て アク セス する と と が で きる 。 と の よう な 理由 か ら , ある 特定 の 操 
作 で 使用 され る デー タ は , と れ ら の 3 つの 整数 境界 の いずれ か K& 境 
界 合せ する よう シス テム か ら 有 要求 され る 。 


PL/I で は , 可能 を 限り の 速度 で 実行 が で き る よ うな 境界 に デー 
タ を 置く こと が で きる 。 た だ し と の よ うな 場合 は , 連続 する デー タ 妥 素 
の 間 C 使 用 され な い バ イト が で き , 記憶 域 の 使用 量 が 増す と と も あ 
る の で , つね 望ま し い 方 法 と は い を な い 。 ALTGNED お よび 
UNALIGNED 属 性 を 使用 する と と (よって, プロ グラ マー は , 該当 
する 整数 境界 に デー タ を 貯え る か どら か を 選択 する と と が で きる 。 


ALIGNED は , その デー タ ・ タ イプ の 必要 条件 に 相当 する 記憶 
域 境 界 C〈, デー タ 要 素 を 位置 合せ する よう 指定 する も る の で ある 。 と 
の よう な 必要 条件 は , K 節 「 デ ー タ ・ マ ッ プ 」 の 項 で 指定 され て い 
る 。 


UNALIGNED は , 1 つの 例外 を の ぞい て , 各々 の デー タ 有 要素 
は , 次 の バイ ト 境 界 上 'C 連 く こと を 指定 する も の で ある 。 唯一 の 例 
外 は 固定 長 ビ ッ ト ・ ス トリ ング の 場合 で と の 場合 は , 次 の ビッ ト 
位置 < 思 か れ る 。 


UNALIGNED 属 性 が 指定 され て いる と , コン バイ ラー は , あ 
る 操作 で デー タ の 境界 合せ が 必要 を ら ば その 操作 が 行 を われ る 前 K, 
該当 する 整数 境界 に デー タ を 移動 する た め の コ ー ド を 生成 する 。 し 
た が っ て , UNALIGNED 属 性 を 使え ば 記憶 域 の 必要 量 は 減る が , 
実行 時 間 は ふ を る こと と も ある 。 


省略 時 解釈 は , 要素 の レベ ル で 適用 され る 。 ビット ・ ス トリ ング ・ 
デー タ , 文字 スト リン グ ・ デ ー タ , お よび 数 字 デ ー タ の 省略 時 解 
釈 は UNALIGNED で ある 。 そ の 他 の タイ ブ の デー タ の 省略 時 解 
釈 は すべ て , ALIGNED で ある 。 


| ベイ ト 。。 バイト 。。 バイト ベイ ト 
ト 計 みせ ぷ ラ ラッ タート 

| ウー ド 

| 人 ダブ ル ワ ー ド | 


| ハー フン ワー ド 


ト ワー ド 


ベイト バイト イド 12 ト 
ハー フワ ー ト | バー フリ ワード 

| ワー ド 
| ダブ ル ワ ー ド 


図 3 1 固定 長 フ ィ ー ル ド の 境界 合せ を 示す 主 記憶 域 の セク ショ ン 


ALIGNED ま た は UNALIGNED は , 要素 , 配列 . また は 構 
造 変数 C 対 し て 指定 する と と が で きる 。 あ る 構造 に 対 し て どちら か 
の 属性 を 指定 する と , その 中 含ま れる 要素 の うち, ALTGNED 
また は UNALIGNED が 明示 宣言 され て いな いす べ て の 要素 に と 
の 属性 を 指定 し た の と 同じ と を なる 。 


次 の 例 は , 構造 と その 要素 (C 対 し て ALIGNED と 
UNALIGNED を 定 言 し た 場合 の 効果 を 示し た も の で ある 。 


DECLARE 1 S, 


2 XX BIT(2), ノ *※UNALTIGNED BY 
DPFAULT ネ ブ 

2 A ALIGNED , ノ * ネ AL 1GNED 
EXPLICITLY ネ ブ 


3 B, ノ 玉 ALIGNED FROM A ネ ン 
3 C UNALIGNED, ノン 人 kUNALIGNED 
EXPLTCTI TLY ネ ン 
D, ノ 玉 UNALIGNED FROM CC ネン 
E ALIGNED , ノ * キ AL TIGNED 
EXPLTC1TTLY ネ ン 
4 F, ノド UNALTIGNED FROM C* 
うら ノン 玉 ALTGNED FROM A キ ネン 
2 H: ノ ALIGNED BY 
DEFAULT* ネ 


忌 


INITIAL 属性 


INITIAL 属性 は , 変数 に 記憶 域 が 割り 振ら れる 時 点 で , その 
変数 K 割 り 当 て る 初期 値 を 指定 する る の で ある 。 た と えば , 


DECLARE NAME CHAR(10) INIT('JOHN DOE') 
DECLARE PI FIXED DEC(5,4) INIT(3.1416): 
DECLARE TABLE(100,100) INIT CALL(SUBR): 
DECLARE A INIT((B*C)) ぅ 

DECLARE 又 INIT(SQRT(Z)) 


NAME KK 記憶 域 が 割り 振ら れる と き C と , NAMEC は 「JOHN 
DOE と いう 文字 スト リン グ ( 右側 (< 1 0 個 の 文字 が 補充 され た 
上 で ) 割 り 当 て られ る 。 Pi が 割り 振ら れる と き は , 3.1 416 
と いう?9 値 C 初 期 値 化 さ きれ る 。 どちら の 場合 も その 値 は , その ブロ グ 
ラム の 間 中 その まま 変え ず C お な お く と と も で きる し , 実行 中 に 変え る 


と と も で きる 。 


3 番目 の 例 は ,。 CALL オ プシ ョ ン の 例 で ある 。 と れ は け , 初期 設 
定 を 行なう た め C SUBR と いう プロ シー ジャ ー を 呼び 出す と と を 
指示 し て いる 。 SUBR の 実行 中 K, 所 要 の 値 が TABLE(c 割 り 
当て られ る 。 


4 番目 の 例 は , 式 を 含む INITIAL 属性 を 示し た も の で ある 。 
と れ は , B と C の 積 の 値 で A を 初期 値 化 する よう 指定 し て いる 。 


5 番目 の 例 は , デー タ 項 目 を 初期 値 化 する た め K 関 数 参照 を 用 い 
る 例 で ある 。 


プロ グラ ム が ロー ド さ れる と き KC 割 り 振 られ る 変数 は 静 的 変数 
と 呼ば れる も の で , ブロ グラ ュ 実 行 の 間 中 割り 振ら れ た まま な 
っ て ぉ り , INITIAL 属性 の 中 で 指定 され た 値 が 1 度 だ け 割 り 
当て られ る 。 自動 変数 の 場合 は , それ が 宣言 され て いる プ ブロック が 
活用 化 さ ん る た び 割 り 振ら れる の で , 割 振り の た び K, 指定 さ 
れ た 初期 値 が 割り 当て られ る 。 基底 付 お よび 被 制 御 変数 の 場合 は , 
ALLOCATE ス テー トメ ント ( 基底 付 の 場合 は LOCATE ステ 
ー ト メン ト も ) が 実行 され る と き K 割 り 振ら れる の で , 割 振り の 
た びに た, 指定 され た 初期 値 が か 割 り 当 て られ る 。 し か し , 被 制御 変数 
の 初期 値 化 は , ALLOCATE ス テー トメ ント の 中 で 打ち 消す と と 
が で きる と と 注意 し て いた だ きた い 。 


入口 定数 , ファ イメ 定数 , DEFTINED デー タ , 構造 全体 , ベ 
ラメ ー タ ー( CONTROLLED パ バラ メー ター は の ぞ く ), また は 
事象 デー タ K 対 し て , INITIAL 属性 を 与え る と と は で き な い 。 


注 : 1 つま た は 2 つ 以 上 の 変数 を 含む CAL し オプ ショ ン ま た は 式 


を , 静 的 デー タ C 対 する INITIAL 属性 と いっ し ょ 使用 する 
と と は できない 。 


ェ リ プア 変数 は , 割 振り の 際 (C, EMPTY 組込み 関数 の 値 に よっ 
て 自動 的 に 初期 値 化 さ れ , その あと で , 指定 され た INITIAL 
CALL が 適用 され る 。 エ リナ は , CALL オプ ショ ン を も た な い 
INITTIAL 属性 に よっ て 初期 値 化 する と と は で き な い 点 人 注意 
し て いた だ きた い 。 
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要素 変数 と 同じ ょ う KC, 配列 C 対 し て も INITIAL 属性 を 指 
定 す る と と が で きる 。 構造 の 宣言 の 中 で は , 要素 名 に 対し て だ け 
INITIAL 属性 を 与え を る と と が で きる 。 


配列 ま た は 構造 の 配列 は , 部 分 的 初期 値 化 する と と も , 全体 と 
し て 初期 値 化す る と と も で きる 。 初期 値 化 を し ない 要素 は , IN- 
ITI AL 属性 の 中 で 省略 する か , また は 星 印 を 使う 9 こと に よっ て 指 
定 す る 。 た と えば, 


DECLARE A(15) CHARACTER(13) INITIAL 
(「JOHN DOE「,* ネ ,「RICHARD ROW「, 
「MARY SMITH') , 

B (10,10) DECIMAL FIXED(5 ) 
INITIAL((25)0,(25)1,(50)0), 

0C8.).。 
2 D INITIAL (0), 
2 EB INITIAL((8)0): 


と の 例 で は , A の 1 番目 , 3 番目 , な よび 4 番目 の 要素 が 初期 値 化 
され る 。 配列 の 残り の 部 分 は 初期 値 化 さ きれ な い 。 配列 B は, 最初 の 
2 5 個 の 要素 が 0 初期 値 化 さ れ , 次 の 2 5 個 が 1, 最後 の 50 
個 が 0 初期 値 化 され る と いら 形 で , 完全 初期 値 化 され る 。 手 式 
内 の 数 字 は , 初期 値 化 され る 要素 の 数 を 指定 する 反復 因数 で ある 。 

構造 C の 場合 は , D は 次 元 (8) を 受け つい で ぉ り , D の 最初 の 要素 
だ けが 初期 値 化 され る 。 ま た , E $ 次 元 (8) を 受け つい で いる が , 

E の 場合 は , すべ て の 要素 が 初期 値 化 され る 。 


構造 の 配列 を 宣言 する と き CLIKE 属 性 を 使用 し て , す で C そ 
の 要素 が 初期 値 化 さん て いる 構造 と 同じ 構成 C し ょ うと する 場合 は , 
と の 構造 の 配列 の 最初 の 構造 だ けが 初期 値 化 され る と と (注意 し な 
けれ ば なら な い 。 た と えば , 
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DECLARE 1 G, 
2 HH INITIAL(D), 
2 1 INITIAL(0), 
1 J す (8) LIKE Gi 


と の 例 で は , 構造 の 配列 の 中 で J( 1 ). HH と J( 1). I だ けが 初期 
値 化 され る 。 


STAT1IC 配列 の 場合 は , 反復 因数 は 10 進 整 定数 で を けれ ば 
らい 。 そ の 他 の 記憶 域 ク ラス の 配列 の 場合 は , 反復 央 数 は 定数 . 
変数 , また は 式 と する と と が で きる 。 


と の 反復 因数 と , 本 章 の 前 の 方 で 述べ た スト リン グ の 繰返し 因数 
と を 混同 し て は を ら な い 。 次 の 例 C つ いて 考え て みよ 5。 


DECLARE TABLE (50) CHARACTER (10) 
TNTT(E10)!AY。(25)(10) BE "(24)(1)「C )) 


と の INITIAL 属性 の 指定 に は , 反復 央 数 と 繰 返 し 因数 の 両方 
が 含ま れ て いる 。 と れ は , TABLE の 最初 の 要素 が 10 個 の A か 
ら な る スト リン グ (C よ っ て 初期 値 化 され , 次 の 25 個 の 要素 が それ 
ぞ れ , 10 個 の B か ら を る スト リン グ (C よ っ て 初期 値 化 され , 最後 
の 2 4 個 の 要素 が それ ぞ れ , C と いう 1 桁 の 文字 C よ っ て 初期 値 化 
され る と と を 指定 し て いる 。 ス トリ ング 配列 に 対す る TNITIAL 

属性 の 指定 の 中 で は , スト リン グ 定 数 の 前 に ある 括弧 に 入れ られ た 
因数 が 1 個 だ け の と き は , スト リン グ の 繰返し 因数 と みな され る 

( (10 ) !A ' の よう な 場合 ) 。 2 個 以上 ある と き は , 最初 の ゃ の が 
反復 因数 で , 2 番目 の も の が スト リン グ の 繰返し 因数 と み を され る 。 
と の よう な 理由 か ら , 2 つ 以 上 の 要素 を 初期 値 化 する た め (< 1 個 の 
スト リン グ 定 数 を 使用 する と き は , 1 と いう スト リン グ 繰 返 し 因数 
を 挿入 し を な けれ ば を ら を い ((24)(1)'!C' の よう な 場合 )。 


式 と いう の は , 値 を 表現 する も の で あ る 。 1 個 の 定数 また は 変数 は 
式 で ある 。 演算 子 な よび また は 括弧 を 使っ て 結び つけ た 定数 お よ 
び ノ また は 変数 も ゃ 式 で ある 。 演算 子 を 含む 式 は , 演算 式 と 呼ば れる 。 
演算 式 の 中 の 定数 な よび 変数 は , オペ ラン ド ま た は け は 副 式 と 呼ば れ る 。 


式 の 例 (C は , 次 の よう な も の が ある 。 


の.7 

LOSS 

A 十 B 
(SQTY-ーQTY)* ネ SPRICE 


どの よう みな 式 も , 要素 式 ( スカ ラー 式 と も 呼ば れる ), 配列 式 , 
また は 構造 式 の いずれ か 分 類する こと と が で きる 。 1 つの 式 の 中 KC 
要素 変数 , 配列 変数 。 な および 構造 変数 が あっ て よい 。 


要素 式 は , 要素 の 値 を 表わす 式 で ある 。 と の 定義 に は , 構造 の 中 
(て ある 要素 名 も 含め られ る し , 配列 の 中 の 1 つの 要素 を 指定 す る 添 
字 つ き の 名 前 も 要素 式 で ある 。 


配列 式 は , 配列 の 形 を し た 値 を 表わす 式 で ある 。 と の 定義 に は , 
次 元 属 性 が 与え られ た 構造 また は 構造 の 一 部 ( 小 構造 ま た は 妥 素 ) 
も 含ま れる 。 次 元 属性 を も ゃ つ 大 構造 また は 小 構造 を オペ ベラ ンド と し 
て ゃ つつ 式 は , さら K& 構 造 の 配列 式 と し て 分 類する と と が で きる 。 


構造 式 は , 構造 の 形 を 己 え られ た 1 組 の 値 を 表わす 式 で ある 。 そ 
の オォ ベラ ンド は 配列 で は な い が , オ ペラ ンド 添字 を つけ る と と は 
で きる 。 


次 に あげ る いく つか の 例 の 中 で は , 各 変 数 は 次 の ょ 2 宣言 さ れ 
た 属性 を も つと 仮定 し ょ う 。 


DECLARE A(10,.10) BINARY FIXED (31), 
B(10,10) BINARY FIXED (31)., 
1 RATE, 2 PRIMARY DECIMAL FIXED 


(4,2), 
2 SECONDARY DECIMAL FIXED 
(4.2), 
1 COST( 2 ) , 2 PRIMARY DECIMAL FIXED 
(4 , 2)。 
2 SECONDARY DECIMAL FIXED 
(4.2), 


C BINARY FIXED (15), 
D BINARY FIXPD (15) 


次 に あげ る の は , 要素 式 の 例 で ある 。 


C * D 

AA(353.2) 寺 B(4,.8) 

RATE. PRIMARY - COST. PRIMARY(1) 
A(4,.4) * ネ C 

RATE. SECONDARY / 4 

A(4,6) 玉 COST. SECONDARY(2) 


と れ ら の 式 は すべ て , その 各々 の オペ ラン ド が 要素 変数 また は 定 
数 で ある か ら (ある も の は 配列 の 式 で あっ た り , 構造 の 要素 名 で あ 
っ た りす る が ), 要素 式 で ちる 。 し た が っ て , 各々 の 式 は 要素 値 を 
表わし て い る 。 


次 C あげ る の は , 配列 式 の 例 で ある 。 


の p 
SN 9 宇 
っ ー 〇 ロロ 
| 
ワ 


RATE 十 COST 


上 の 式 は すべ て , その オペ ラン ド の うち も 少な く と も 1 個 が 配列 変数 
で ある か ら , 配列 式 で ある 。 し た が っ て , どの 式 も それ ぞ れ , 配列 
値 を 表わし て いる 。 3 番目 の 例 C は , 2 進 固定 小数 点 定数 1 0B が 
含ま れ て いる と と に 注意 し て いた だ きた い 。 最後 の 例 は , 構造 の 配 
列 を 表わし て いる 。 


次 に あげ る の は , 重 造 式 の 例 で ある 。 


RATE * ネ COST(2) 
RATE プ 2 


上 の 式 は 両方 と も , その オペ ラン ド の うち も 少なくとも 1 個 が 構造 変 
数 で あり , し か も 配列 の オペ ラン ド を も っ て いな を い の で , 構造 式 で 
ある 。 し た が っ て , と れ ら の 式 は それ ぞ れ , 構造 の 値 を 表わし て い 
る 。 


式 の 用 い 方 


1 個 の 定数 また は 1 個 の 変数 で ある 式 は , プログ ラム の 中 で は どこ と 
で も 自由 CK 書 く と と が で き る 。 し か し , 多く の PL エス テー トメ ン 
ト の 統語 規則 で は , 式 を 評価 し た 結果 が 正しい 値 《C な る も る の で あれ 
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ば , 演算 式 を その ステ ー ト メン ト の 中 書く と と が 許さ れ て いる 。 


本 書 で 使用 まれ て いる 統語 の 記述 の 中 で , 修飾 きれ て いな い 『" 式 ! 
と い 2 語 は , 要素 式 , 配列 式 , また は 構造 式 を 指し て いる 。 式 の 種 
類 が 制約 され て いる 場合 は , その 制約 が 注記 し て ある 。 た と えば , 
統語 規則 の 中 ("要素 式 "と いり 語 が ある と き は , 配列 式 も 構造 式 
も る 使え な いと いう と と を 表わし て い る 。 


注 : 演算 式 は , 様々 を P ル レン] ステー トメント の 中 KK 書く と と が で 
きる が , と れ が 一 般 に 最も 多く 出 て くる の は , 次 の よう を 形式 の 割 
付け ステ ー ト メン ト の 場合 で ある 。 


A = B+ オ C 


割当 て ステ ー ト メン ト は , PL/T キー ワー ド を も っ て いな い 。 割 
当て 記号 (一) は , 右辺 の 式 ( B 十 C ) の 値 を 左辺 の 変数 (A)K 
割り 当て る と と を 意味 し て いる 。 と の 章 で は , わか りや すい よう に, 
式 の いく つか の 例 を 割当 て ステ ー ト メン ト の 中 で 示し て ある 。 


演算 式 は , 1 つま た は 2 つつ 以 上 の 単 一 演算 か ら 構 成 さ れ て い る 。 単 
一 演算 は , 接頭 演算 子 演算 ( 単 二 オペ ベラ ンド の 前 KK 演算 子 が か ある ) 
また は 挿入 演算 子 演算 ( 2 つの オペ ラン ド の 間 演 算 子 が ある) の 
と どちら か で ある 。 挿 入 演 算 子 演算 の 2 つの オペ ラン ド は , 操作 が 行 
な われ る と き , 通常 は 同じ デー タ ・ タ イプ (て な っ て いな けれ ば な ら 
を い 。 


PL ン I で は , 式 の 中 の 演算 の オペ ベラ ンド は , 必要 応じ て , 演 
算 が 行なわ れる 前 C 共 通 の 表現 《C 自動 的 て 変換 され る 。 と これら の 変 
換 (C 関 する 一 般 的 を 原理 が , 本 章 の 後 の 方 の 「 目 標 フ ィ ー ル ド の 属 
人 性 」 の と と ろ 示 され て いる 。 変換 され る 項目 の 精度 と 長 さ を 計算 
する た め の 規 則 も 含め て , 特別 を 場合 の 細か い 規 則 に つい て は , F 
節 「 デ ー タ 変換 と 式 の 値 の 計算 」 の と と ろ を みて いた だ きた い 。 


デー タ 変 換 は , 主として 問題 デー タ K 限 定 さ れ て いる 。 ブロ グラ 
ょ 制御 デー タ (C つ いて 行なわ れる 唯一 の 変換 は , オフ セッ ト ・ タ イ 
プ と ポイ ンタ ー・ タ イブ の 間 の 変換 で ある 。 


1 つの 式 の 中 (c 2 つ 以 上 の 表現 を 使 29 こ と に つい て の 制約 は , 非 
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常に 少 を た い 。 し か し , と の よう K 混 用 すれ ば , 変換 を 意味 する と と 
を よく 心 C 留 め て お か な けれ ば な を な ら な い 。 実行 時 変換 が 行 を われ 
れ ば , 実行 の 速度 が 下がる と と (C を る 。 また, 注意 が 足り を た いと, 
変換 の 結果 , 精度 が 失 を われ た り , 予期 しない 結果 が 出 た りす る と 
と も ゃ ある 。 し た が っ て , 表現 を 混用 し た 式 は で きる 限り 避け る べき 
で ある し , どう し て も 使用 する と き は , プロ グラ マー は それ 関連 
する 変換 の 規則 を 充分 < 理解 し て お くべ き で ある 。 


割当 て 


式 を 評価 する 際 に 行なわ れる 変換 の ほか C, デー タ 項 目 ( また は 式 
を 評価 し た 結果 ) が , 割り 当て られ る 項目 の 属性 と 異な る 属性 を も 
つ 変数 K 割 り 当 て られ る と きゃ, 変換 が 行なわ れる 。 と の よう な 
変換 の 規則 は , 2, 3 の 例外 を の ぞい て , 演算 式 を 評価 する 際 の 変 
換 の 規則 と 同じ で ある 。 


スト リー っ ム 式 入出 力 が 行なわ れる と きも , 変換 が 行なわ れる 
(第 1 1 章 を 参照 の と と ) 。 と れ は , その デー タ が 変換 され る 属性 
を も つ 一 時 的 を 記憶 位置 へ の 割当 て ( 入力 の 直後 また は 出力 の 直前 
C 行 な われ る ) の 結果 と し て の 変換 と みな すこ と が で きる 。 


と の ほか も, 変換 を 引き 起す 状況 が いく つか ある 。 と これら を 網 
羅 し た リス ト が , 節 記 載 さ ん れ てい る 。 


問題 デー タ の 変換 


問題 デー タ K 対 し て 行なわ れる 変換 に は, タイ プ ブ の 変換 と 算術 的 変 
換 の 2 種 が か ある 。 


タイ ブ の 変換 は , 次 の よう を 4 つの タイ ブ の 問題 デー タ の 間 で 行 
を われ る 変換 で ある 。 


文字 スト リン グ 一 CHARACTER 属 性 を も つ デ ー タ 
ビッ ト ・ ス トリ ング 一 BIT 属 性 を も る つ デー タ 


数 字 一 ビク チャ ー 廊 字 A な よび 駐 の どちら $ 含 まれ て い を い 
PICTURE 属性 を も つ デ ー タ 


ュー ド 化 算術 一 FIXED また は FLOAT ,DECIMAL ま た 
は BINARY , REPAL ま た は COMPLEX , お よび 精度 の 
属性 を も つ デ ー タ 


ペ ュ ーー 


( 厳密 に いえ を ば, 数 字 デ ー タ は 単 (と 算術 デー タ の 特殊 を ケー ス で 
ある が , 変換 の 規則 を 表わす 目的 で , 一 応 別 の タイ ブ の 表現 と みな 
(2 


算術 的 変換 は , コー ド 化 算術 形式 の 中 で 行なわ れる 変換 一 固定 
小数 と 浮動 小数 の 間 の スケ ー ル の 変換 , 1 0 進数 と 2 進数 の 間 の 基 
数 の 変換 , 実数 と 虚数 の 間 の モー ド の 変換 , ぉ よび 精度 の 変換 一 
で あ る 。 


タイ プ の 変換 の 例 と し て , 算術 式 を 評価 する と き C 行 な われ る , 
ビッ ト ・ ス トリ ング か ら ュ コー ド 化 算術 表現 へ の 変換 が ある 。 ビッ ト ・ 
スト リン グ は , 符号 の な い 2 進 整数 とみ なされ, その スト リン グ の 
ビッ ト ・ ペ ター ン に よっ て 表わさ れる 正 の 2 進数 値 く 相当 す る 値 を 
も つ , FIXED BINARY(31 ,0) REAL と いら 属性 <, 
まず 変換 され る 。 そ の と き の ス トリ ング の 長 さ が 31 より 大 きけ れ 
ば , その スト リン グ の 左端 の 余分 の ビッ ト が 無視 され る 。 


算術 変換 の 例 と し て , 算術 式 の 評価 中 (< 行なわ れる , 固定 小数 点 
1 0 進数 表現 か ら 浮 動 小 数 点 2 進数 表現 へ の , 項目 ( ども ちら $ ゃ 実数 
モー ド ) の 変換 が ある 。 と の 項目 の 値 は 変ら ちず 同じ で ある が , その 
基数 は 1 0 進数 か ら 2 進数 CK 変 わり , その スケ ー ル は 固定 小数 点 
か ら 浮動 小数 点 C 変 わる 。 ま た , ある 値 を 10 進 整数 と し て 表わす 
た め に は , 3 32 倍 の 2 進 整数 が 必要 で ある か ら , 精度 属性 の 値 は , 
3. 3 2 倍 だ け 増 すこ と に な る 。 と の 値 は , 3.3 2 を 掛け た あと , 整 
数 に 切り 上 げ ら れる 。 


ロケ ー タ ー・ デ ー タ の 変換 


式 の 評価 な よび 割付 け の 際 C 変 換 す る と と の で きる 唯一 の ブロ グラ 
ょ 制御 デー タ の タイ プ は , OFFSET ま た は POINTER 属 性 を 
も つ ロ ケー ター・ デ ー タ で ある 。 式 を 評価 する と き は ( 三 お よび つ 
三 比較 演算 子 を 用 い る 比較 演算 に , ロケ クー ター・ デ ー タ を 含め る と 
と が で きる ), オフ モッ ト か ら ポ イン ター へ の 変換 だ けが 行 を な われ 
る 可能 性 が ある 。 割当 て の と き は , オフ モッ ト から ポイ ンタ ー へ の 
変換 お よび ポイ ンタ ー か ら オ フ セ ッ ト へ の 変換 が 行なわ れる 可能 性 
が ある 。 


組込み 関数 の 用 ( ゝ 方 


式 を 評価 する と き , お よび 割当 て の 際 (C 変 換 を 行なわ せる と と が で 
きる の と 同様 CK, プロ グラ マー は , 必要 を と き (C PL[ の 組込み 
関数 を 用 いて 変換 を 開始 する と と が で き る 。 ( 組込み 関数 の 概念 


つい て は , 第 9 章 「 サ ブ プルー チン と 関数 」 の と と ろ を , また 関数 の 
詳細 に つい て は , G 節 「 組 込み 関数 と 擬似 変数 」 の と ころ を みて い 
た だ きた い 。 ) 


関数 C は 次 の よう な も の が ある 。 


CHAR 

BIT 

F {XXED 
FLOAT 
DECTTMAL 
BINARY 


各 関 数 は , その 名 前 に よ っ て 暗示 され る 属性 (( デ ー タ を 変換 する 。 
と の 関数 は , 必要 と され る , タイ ブ の 変換 な む ょ よび 人 算 術 的 を 変換 を 行 
な りら 。 上記 の 関数 の ほか に , COMPLEX 組込み 関数 ( 2 つの 実 
数 の 引数 を 1 つの 複素 数 値 (変換 する ) と 関数 REAL (複素 数 値 
か ら 実 数 部 分 だ け を 取り 出す ) が ある 。 


B IT おぉ よび CHAR 組 込み 関数 の 場合 は , ブロ グラ マー は , そ 
の 結果 の スト リン グ の 長 さ 属性 を 指定 する と と が で きる し , また た, 
FIXED ,FLOAT ,DECIMAL , お よび BINARY の 場合 
は , 結果 の 精度 を 指定 する と と が で きる 。 


デー タ 項 目 の 精 度 は , PRECTISION 組 込み 関数 に よっ て 制御 
する こと と が で きる 。 


ポイ ンタ ー・ タ イプ と オフ セッ ト ・ タ イブ の 間 の 変換 は , 
OFFSET お よび PO INTER 組込み 関数 を 用 いる と と に よっ て , 
ブロ グラ マー が 開始 する こと が で きる 。 


と これら の 組込み 関数 C よ っ て 行なわ れる 変換 の 多く は , 所 要 の 属 
性 を も つ PL バ 1 変数 と 割当 て を する と と (よって, 同じ ょ うら 容 
易 C 行 な うと と が で きる (COMPLEX 組 込み 関数 CK よ っ て 行なわ 
れる 変換 は 例外 ) 。 し か し , プロ グラ マー は , 変換 を 行なう 目的 の 
た め だ け 変数 を 作成 する より も ゃ , 組込み 関数 を 使用 する 方 が 便利 
で ある と と が わか る で あろ 2 う 。 


式 の 演算 


演算 式 は , 1 つま た は 2 つ 以 上 の 単 一 の 演算 を 指定 する と と が で き 
る 。 演算 の クラ ス は , 演算 に 対 し て 指定 され た 演算 子 の クラ ス C よ 
っ て 決ま る 。 演算 の クラ ス C は , 算術 , ビッ ト ・ ス トリ ング , 比較 , 
お よび 連結 の 4 種類 が ある 。 
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算術 演算 


算術 演算 は , 次 に あげ る 演算 子 の いずれ か を 用 いて オペ ラン ド を 結 
び つ ける と と に よっ て 指定 され る 演算 で ある 。 


の 沙 デ \ 


正 の 符号 と 負 の 符号 は , 接頭 演算 子 ( 十 A や ーA の よう (C, 単 一 の 
オォ ベ ラン ド の 前 C に あっ て それ と 結び つけ られ て いる ) また は 抑 入 演 
算 子 ( AB や A 一 B の よう C, 2 つの オペ ラン ド の 間にあっ て そ 
れ ら と 結び つけ られ て いる ) の どちら か と し て 使用 する と と が で き 
る 。 そ れ 以 外 の 算術 演算 子 は , 挿入 演算 子 と し て だ けり 使用 する と と 
が で きる 。 


さ ら K 複 鈴 を 式 は , , と の よう な 算術 演算 を いく つか 合わ せ て 組 (C 
し た も の か ら 構 成 さ れ て い る 。 接頭 演算 子 は , 挿入 演算 子 演算 の オ 
ベラ ンド の 前 (CC なき, それ ら と 結び つけ る と と が で きる と と ん た 注意 
し て いた だ きた い 。 た と えば , A ネ キーB と い 29 式 の 中 で , 変数 B の 
前 (C あ る 負 の 符号 は , A の 値 と B の 負 の 値 と を 乗算 する と と を 表 わ 
し て いる 。 


2 つ 以 上 の 接頭 演算 子 を 1 つの 変数 の 前 に ふき , それ を 結び つけ 
る と と が で きる 。 正 の 接頭 演算 子 を 2 つ 以 上 重ね て る 累積 的 な 効果 
は を い が , 負 の 接頭 演算 子 を 2 つ 連 続 し て 与え る と , 正 の 接頭 演算 
子 を 1 つ 与 えた の と 同じ 効果 を も つと と に な る 。 


算術 演算 の 結果 


式 の 中 の オペ ベラ ンド て つい て 必要 変換 が 行なわ れ た あと , 算術 演 
算 が 実行 され , 結果 が 得 ら れる 。 と の 結果 は , 式 の 値 そ の も る の で あ 
る と と も , さら CC その あと で 演算 が 行なわ れる 中 間 結 果 で ある こと と 
も ある 。 


次 の 式 c つ いて 考 を て みよ う 。 
A * B 十 C 


A 素 B と いう 演算 が 最初 C 行 を われ て , 中 間 結 果 が 出さ れる 。 
その あと, ( 中 間 結 果 ) 十 C と いら 9 演算 を 実行 する こと と よっ 
て , 式 の 値 が 得 ら れる 。 


中 間 結 果 は 。 コン バイ ラー(C よ っ て 作ら れ た 一 時 的 記憶 位置 
入れ て ぉ な かれ, PL プ I ブロ グラ ム の 中 の 変数 と 同じ よう KC し て 必 
性 が 与え られ る 。 そ の 結果 が どの よう な 属性 を も つか は , 2 つの オォ 
ベラ ンド (接頭 演算 子 演算 の 場合 は 1 つの オペ ラン ド ) の 属性 と , 
関係 する 演算 子 (C よ っ て 敵 ま る 。 と の 関係 に つい て は , の ち に と の 
章 の 「 目 標 フ ィ ー ル ド の 属性 ]」 の と と ろ で 説明 する 。 
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中 間 結果 は , さら に その 先 で 演算 が 行なわ れる と き K《 変 換 さ れる 
と と も あり, また , 式 の 値 は , 割り 当て られ る と き 人 変換 さ れる こ て 
と も ある 。 と の よう な 変換 の 場合 も , プロ グラ マー が 定義 し た デー 
タタ と 全く 同じ 規則 に し た が っ て 行なわ れる 。 


組込み 関数 を 用 いる 演算 


PL ン 1 Cc は , 加算 , 減算 , 乗算 , 除算 < 関し て 実施 面 で 取り 決め 
られ た 精度 の 規則 を 打ち 消す と と が で きる よう な 組込み 関数 が 3 つ 
ある 。 ( 組込み 関数 の 概念 《C つ いて は , 第 9? 章 「 サ プル ー チ ン と 関 
数 」 の と と ろ で 説明 され て ぉ り , また 関数 CK つい て の 詳細 は , G 節 
「 組 込み 関数 と 擬似 変数 ] の と と ろ で 説明 され て いる 。 ) 


と の ょ うら みな 関数 は , ADD ,MULT IPLY , ぉ よび DIVIDE 
で ある 。 減算 され る オペ ラン ド K 対 し て 負 の 値 を 使用 する だ け で , 
ADD を 洲 算 (< 使用 する と と が で きる 。 と れ ら の 関数 を 使用 する と 
き は , 結果 の 精度 と いっ し ょ C2 つ の オォ ペラ ンド を 指定 す る 。 結果 
の 基数 ,。 スケール,。 お よび モー ド は , 式 を 評価 する と き K 変 換 の 規 
則 従 っ て 定義 る され る 。 


ビッ ト ・ ス トリ ング 演算 


ピッ ト ・ ス トリ ング 演算 は , 次 の 演算 子 の いずれ か に よっ て 2 つの 
オォ ペラ ンド を 結び つけ る と と に より 指定 され る 演算 で ある 。 


最初 の 演算 子 "not! 記号 は , 接頭 演算 子 と し て だ け 使 用 する と と 
が で きる 。 2 番目 と 3 番目 の 演算 子 "and' 記号 と "or 記号 は , 
挿入 演算 子 と し て だ け 使 用 する こと が で きる 。 (と れ ら の 演算 子 は , 
ブー ル 代 数 と 同じ 働き を も ゃ つ 。 ) 


ビッ ト ・ ス トリ ング 演算 の オペ ラン ド は , 必要 応じ て , 演算 が 
行 を われ る 前 に ビッ ト ・ ス トリ ング KC 変換 され る 。 抑 入 演算 子 演算 
の 2 つの オペ ラン ド の 現在 の 長 さ が 同じ で を いと き は , 短い 方 の オォ 
ペラ ンド の 右側 C ゼロ が 補 を われ て 拡張 され る 。 


ビッ ト ・ ス トリ ング 演算 の 結果 は , 両 オ ペラ ンド の 現在 の 長 さ 
( 両 オ ペラ ンド の 長 さ は , 変換 の あと つね (同じ し C な る) と 同じ 長 
さ の ビット ・ ス トリ ング な る 。 


ビッ ト ・ ス トリ ング 演算 は ,。 1 ビッ ト ず つ 行 を われ る 。 "not" 
演算 を する と , 逆 の ビッ ト が 得 ら れる 。 つ まり , ユ 1 の 結果 は 0 で 


ある 。 "and'" 演算 の 結果 は , 該当 する ビッ ト が 両方 と も 1 の と き 比較 演算 

だ け 1C な り , と れ 以 外 の 場合 は 0 に な る 。 "or "演算 の 結果 は , 

オペ ラン ド が 両方 と も ぞ ロ の と き 以 外 は 1 C な り , 両方 ゼロ の と き 

は 0 (C な る 。 下 の 表 は , 各々 の 演算 子 に 対す る 各々 の ビッ ト 位 置 の 

結果 で ある 。 比較 演算 は , 次 の よら な 演算 子 の いずれ か を 用 いて , 2 つの オ ペラ 
ンド を 結び つけ る と と C よ っ て 指定 され る 演算 で ある 。 


ト : 凌 。 中 時 0 と 1 、 テリ 本 BI) 容 し り 
SIG | ぐ - く < デー デー ッ > テラ ー ラ 
| | | | | | | | 
涼介 潤 北 2 細 | 中 、 態 暫 和 円 
| | | | | | | ' と れ ら の 演算 子 は , "より 小 リ ,。 ! よ り 小 で を い 『, ) より 小 ま た 
*。 衝 。 『 記 上 ル 症 窟 必 光 旧 ル は 等 し い ", "等 し い に ",。 『 等 し く て ない 『。 "より 大 また は 等 し いら 『 
EEE ! より 大 !,。 お よび 『" よ り 大 で を い 『 と いう と と を 指定 する も の で 
| | | | | | | | ある 。 
Ne 員 い 人 ポ 旧 旧 も 十 20。 上 思 L 5 
トー ニー ニニ ーー ニー ニー ニー ニー ニーーーーーーーーー ーー ニー ニー ニー ニー ニニ ーー ニー ニー ニー ニー | 
| | | | | | | | 比較 演算 に は , 4 つの タイ プ が ある 。 
| 。 棚 。 ド )J0m 朋 00 U、 引 部 00 
れ 天 どこ ここ ーー ペー コー コー ニニ ーーー エコ マデ ーー デビ ゴー デコ ニキ 1. 代数 比較 , と れ は , 内 部 コー ド 化 算術 形式 の 符号 付 算術 値 の 比 
較 を する 。 オ ベラ ンド の 基数 , スケ ー ル , 精度 , また は モー ド 
演算 結果 が ビッ ト ・ ス トリ ング の 値 に し みる よう な 1 つの 式 の 中 で , が 異な っ て いる と き は , 人 算術 演算 の 規則 に し た が っ て 変換 され 
2 つ 以 上 の ビッ ト ・ ス トリ ング 演算 を 組み 合わ せ て 用 いる と と が で - る 。 数 字 デ ー タ は , 比較 の 前 に コー ド 化 算術 形式 に 変換 され 
きる 。 る 。 複素 数 オペ ラン ド の 比較 の 場合 は , 三 お よび ーー と い 9 う 演 
算 子 だ けが 有効 で ある 。 
次 に あげ る 例 の 中 で , オペ ラン ド A の 値 が '010111'B で , 
オペ ラン ド B の 値 が か 「111111!B, オペ ラン ド C の 値 が 2. 文字 比較 , これ は , 婦 合 順序 に C し た が っ て , 左 か ら 右 へ 1 文字 
'「110'B と すれ ば , 次 の よう な 結果 が 得 ら れる 。 ずつ 交 字 の 比較 を する 。 
ーー A の 結果 は '101000'B 3 ビッ ト 比 較 , これ は , 左 か ら 右 へ 1 ビッ ト ず つ 2 進 数 字 の 比較 
を す る 。 


つ C の 結果 は "001'B 
4.。 ブロ グラ ュ 制 御 デー タ 比 較 , とれ は , 内 部 コー トド 化 形 式 の オペ 


C g B の 結果 は '110000'B 3 
ラン ド の 比較 を する 。 比較 演算 子 三 みよ び コ ー だ けが 許さ れる 。 


A | B の 結果 は '111111!B エリ ア お よび 事象 変数 の 比較 を する と と は で き な い 。 オフ セッ 
ト か ら ポ イン ター へ の 変換 だ け を 行なう と と が で きる 。 ブ ログ 
G | せ の 縛 末 103411 や ラム 制御 デー タ ( 対 する オペ ラン ド C つ いて と れ 以 外 c 不一致 


が ある と , エラ ーC な る 。 
A | (一 C) の 結果 は '011111'B 
!「110111'B 比較 の オォ ペラ ンド 同志 が 直接 的 (互換 性 を も つも の で な いと き は 
( つま り , それ ら の デー タ ・ タ イプ が 別 の タイ ブ の 比較 に 適する も 
の で ある と き は ), 順位 の 低い 方 の オペ ベラ ンド が , も 9 一 方 の 比較 
の タイプ に KC 合 わせ て 変換 され る 。 比較 タイ ブ の 順位 は , (1) 算 術 
( 最高 位 ), (2) 文 字 ス トリ ング , (3) ビ ッ ト ・ ス トリ ング の 順 で 
プー ル 組 込み 関数 ある 。 し た が っ て , た と えば , ビッ ト ・ ス トリ ング を 固定 小数 1 0 
進数 値 と 比較 する 場合 は , 10 進 数 値 と の 間 で 算術 比較 を する た め 
と 固定 小数 2 進数 (変換 され る ( 10 進数 値 も 固定 小数 2 進数 変 


っ ((-C)| (一 B)) の 結果 は 


演算 子 , を お よび | を 用 いる 『not『 , !and' , お よび "or" 換 さ れる ) 。 

演算 の ほか C, BOOL 組 込み 関数 を 用 いて ブー ル 演 算 を 行なう と 

と が で きる 。 組込み 関数 の 概念 に つい て は , 第 9 章 「 サ プ ブルー チン 比較 演算 の 結果 は つね C, 長 さ 1 の ビット ・ ス トリ ング で ある 。 
と 関数 」 の と と ろ を , また , 関数 の 詳細 C つ いて は , G 節 「 組 込 その 関係 が 真 の と き は , その 値 は '1 'B c を り , 関係 が 倫 の と き 
関数 と 擬似 変数 」 の と と ろ を みて いた だ きた い 。 は !'0' BC な る 。 
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比較 演算 は , 次 の ょ うな 形式 の TF ス テー トメ ント の 中 で 使わ れ 
る と と が 最も 一 般 的 で ある 。 


IF AB 
THEN 真 の と き の 処 思 
ELSE 偽 の と き の 如 軒 


A 三 B と いら 5 式 を 評価 する と , 結果 は '1'B ま た は '0'B 
の どちら か を な る 。 そ の 値 の 如何 に よっ て , IF ステ ー ト メン ト の 
THEN 部 分 また は PLSE 部 分 が 実行 され る 。 


し か し , 比較 演算 は IF ステ ー ト メン ト K 限 ちら れる わけ で は な く , 
次 の よう な 割当 て ステ ー ト メン ト も 有効 で ある 。 


双 テー A ぐ < Bi 


と の 例 で は , A が B よ ょ より 小 さい と き は , ' 1 'B と いう 値 が XX 割 
り 当 て られ , それ 以外 の 場合 は , '0 'B と い 9 値 が 割り 当て られ 
る 。 同様 K, 次 の よう を な ステー トメント る 有効 で ある 。 


最初 の 記号 ( 三 ) は 割当 て 記号 で あり , 2 番目 の 記号 ( 三 ) は 比較 
演算 子 で ある 。A が B と 等 し いと き は 又 の 値 は 1 BC な り , A 
が B と 等 し く な いと き は 又 の 値 は ' 0 ' BC を る 。 


連結 演算 


連結 演算 は , 次 の よう な 連結 記号 を 使っ て いく つか の オォ ベラ ンド を 
結び つけ る と と に よっ て 指定 され る 。 


と これ は , 左側 の オ ペラ ンド の 最後 の 文字 た は ビッ ト の すぐ 人 後 C, 
( 間 (c 文字 また は ビッ ト を 介在 させ ず K《 ) , 右側 の オペ ラン ド の 最 
初 の 文字 た は ビッ ト を つづ ける と いら う 形 で , オペ ラン ド を 結合 す 
る と と を 指定 する も の で ある 。 


連結 演算 は , スト リン グ ( 文 字 ・ ス トリ ング また は ビッ ト ・ ス ト 
リン グ の どちら みか ) KK 対 し て だ け 行 を うと と が で きる の で , 連結 演 
算 を 指定 する と スト リン グ ・ タ イズ プ K 変 換 さ れる と と も ある 。 ど ち 
ら か の オペ ラン ド が 文字 また は 1 0 進数 の 場合 は , 文字 スト リン グ 
の 結果 を 出す た め KC 変 換 が 行なわ れる 。 そ の ほか C, オペ ラン ト が 
ビッ ト と 2 進数 の 場合 , また は 両方 が 2 進数 の 場合 は , ビッ ト ・ ス 
トリ ング の 結果 を 出す た め (C 変 換 が 行なわ れる 。 
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連結 演算 の 結果 は , 以下 の 通り で ある 。 


ビッ ト ・ ス トリ ング : 2 つの ビッ ト ・ ス トリ ング の オペ ラン ド の 長 
さ の 合計 と 等 し い 長 さ を も つ ビ ピット ・ ス トリ ング 


文字 スト リン グ : 2 つの 文字 スト リン グ の オペ ラン ド の 長 さ の 合計 


と 等 し い 長 さ を ゃ つ 婦 字 スト リン グ 


連結 演算 で オペ ラン ド の 変換 が 必要 を 場合 は , その 結果 は , その 

ォ オペランド が 変換 され る 文字 スト リン グ の 長 さ によって 決ま る 。 た 
と を えば, A が 「010111'B,B が '101'B,C が XY, 必 |, 
D が 「'AA プ BB ' と い 2 定 数 の 属性 と 値 を それ ぞ れ も っ て いる と す 
れ ば , 次 の よう な 結果 に を る 。 


Al |B の 結果 は '010111101'B 
Al|IAIIB の 結果 は '010111010111101'B 

CI ID の 結果 は 'XY,ZAA/BB'" 

D|IC の 結果 は 'AA/BBXY,Z" 

BI ID の 結果 は '101AA ン BB 


最後 の 例 で は , 連結 が 行なわ れる 前 に , ピッ ト ・ ス トリ ング 
!「101!B が 文字 スト リン グ 「101「 KK 変換 され て いる と と に 注意 
し て いた だ きた い 。 そ の 結果 は , 8 桁 の 文字 スト リン グ に な る 。 


各種 演算 の 組合 せ 


1 つの 演算 式 の 中 で , タイ ブ の 異な る 演算 を いく つか 組み 合わ せる 
と と が で きる 。 ど の よう な 組合 わせ で も 使用 する と と が で きる 。 た 
と えば , 次 の 割当 て ステ ー ト メン ト の 中 で 示さ れ て いる 式 は 有効 で 
ある 。 


RESULT = A 十 B ぐ Cg Dj 
式 の 中 の 各々 の 演算 は ,。 その タイ プ の 演算 の 規則 (C し た が っ て 評価 
され る が , デー タ 変 換 が 必要 で あれ ば , 演算 が 行なわ れる 前 変換 
され る 。 
上 (C あげ た 変数 が 次 の よ 2K 宣 斉 さ れ て いる と すれ ぱげ, 
DECLARE RESULT BIT(3), 
A FIXED DECIMAL(1), 
B FEIXED BINARY (3), 
C CHARACTER(2), D BIT(4): 


・ A の 10 信 数 値 は , 2 進数 と 変換 され る 。 


・ A と B を 加え る 2 進数 加算 が 行 を われ る 。 


s* と の 2 進数 の 結果 が , 変換 され た C の 2 進数 値 と 比較 され る 。 


・ 比較 の 結果 の ビ ピット ・ ス トリ ング が , ビッ ト ・ ス トリ ング D 
の 長 さ C ま で 拡張 され , 『and" 演算 が 実行 され る 。 


・ 。 "and" 演算 の 結果 (長き 4 の ビッ ト ・ ス トリ ング ) が , 変 
換 さ れず <, し か し 右側 で 切り 捨て られ て , RESULT 
割り 当て られ る 。 


と の 例 の 式 は , 演算 が 1 つ 1 つ 評価 され て ゆく 順に 左 か ら 右 KK 記 
述 さ れ て いる 。 と の よ ょ よ うな 記述 の 仕方 は 。 あく まで も と の 式 の 場合 


の と と で あっ て , な し ろ る 通常 は , 式 の 中 に ある 演算 子 の 優先 順位 に 
よっ て 評価 の 須 序 が 決ま る 。 


演算 子 の 優先 順位 


式 を 評価 する と き の 演 算 子 の 優先 順位 は , 次 の 通り で ある 。 


米 氷 接頭 演算 子 十 接頭 演算 子 一 ココ (最高 位 ) 


ラン “ 
| 
挿入 演算 子 十 挿入 演算 子 一 | 
| 
邊 ' 
| 
く 。 で <= = ーー デ >= ラッ > ーー ジ ' 
| 
e Y 
( 最 下 位 ) 


最高 位 の 優先 順位 の 演算 子 が 同じ 式 の 中 (C 2 つ 以 上 ある と き は , 
と れ ら の 演算 子 は , 右 か ら 左 の 順 K 評 価 さ れる 。 つ まり , 右端 の 指 
数 演算 また は 接頭 演算 子 が 最初 に 評価 され る 。 そ の 左側 に ある 指数 
演算 ま た は 接頭 光 算 子 が 次 に 評価 され る 最高 位 の 優先 順位 の も の で 
ある 。 


最高 位 以外 の 演算 子 の 場合 は , 同じ 優先 順位 を も つ 演 算 子 が 1 つ 
の 式 の 中 (KK 2 つ 以 上 ある と き は , と これら の 演算 子 の 順位 は , 左 か ら 
右 の 順 で ある 。 


次 の よう な 割当 て ステ ー ト メン ト の 中 で 式 が 評価 され る 順序 は , 
演算 子 の 優先 順位 に よる と と 注意 し て いた だ きた い 。 


RESULT = A+ オ B ぐ Cg Di 


と の 順序 は , この 式 の 各 要 素 を 次 の よう 括弧 (て 入れ た 場合 と 同じ 
で ある 。 


(A) 十 (B) 
A、」B CC) 
に ( 入 . 填 B) く で ) e 3D) 


式 の 評価 の 順序 ( し た が っ て , その 値 も る ) は , 括弧 を 使 2 と と KC 
よっ て 変え る と と が で きる 。 たとえば, 前記 の 式 は 次 の よう 変え 
る と と も で きる 。 


(A 十 B) ぐ (C g D) 


と の 式 を 順序 に し た が っ て 評価 する と , 長 さ 1 の ビッ ト ・ ス トリ 
ング ( 比較 演算 の 結果 ) に を る 。 と の よう な 式 を 評価 する と き は , 
括弧 で 囲ま れ た 式 が 先 に 評価 され て 1 つの 値 が 出さ れ , その あと で 
括弧 外 の 演算 子 と の 関係 が 考慮 され る 。 し か し , 上 の 例 の よう 《 括 
弧 の 中 て 入 っ た 式 が 2 つ あ る 場合 に どちら の 式 を 先 K 評 価 す る か , 
と いう と と C つ いて の 規則 は , と の 青 語 で は 決ま っ て いな を い 。 


A の 値 が 固定 小数 点 2 進数 変換 され , 次 (C 加 算 が 行なわ れ て , 
固定 小数 点 2 進数 の 結果 ( 結果 _ 1 ) が 得 ら れる 。C の 値 が ビッ ト ・ 
スト リン グ 《 変 換 さ れ ( この よら みな 変換 が 有効 で あれ ば ) , *and『 
演算 が 行なわ れ る 。 


と の 時 点 で , 式 は 次 の よう C な る 。 


結果 _ 1 ぐ 結果 _2 


結果 _ 2 が 2 進数 変換 され て か ら , 代数 比較 が 行なわ れ , 式 全体 
の 結果 ( ビット ・ ス トリ ング ) が 出る 。 


演算 子 の 優先 順位 は ホ , オペ テン トド (また は 副 オ ペラ ンド ) の 中 で 
だ けり 定義 きれ る も の で あっ て , 式 全体 に つい て その 通り で ある と は 
限ら を い 。 次 の 例 に < つい て 考え て みよ う 。 


A 十 (B ぐ C) eg (D || E * 玉 ) 


と の 場合 , 各 演 算 子 の 優先 順位 は , 連結 演算 の 前 指数 演算 を 行 な 
ら うと と を 指定 し て いる だ け で あっ て , 他 の オペ ラン ド (A 十 (B 
ぐ く C) ) の 評価 と の 関係 で , 演算 の 順序 を 指定 し て いる の で は な 
ゆい 。 


どの よう な 演算 式 も ( 接頭 演算 式 を の ぞ く ), 最終 的 ヒ は 1 つの 
挿入 演算 に 還元 され る も の で な けれ ば を ら な い 。 その 演算 の オペ ラ 
ンド と 演算 子 (C よ っ て , 式 全体 の 結果 の 属性 が 決ま る 。 た と えば げ , 
演算 の 組合 わせ に つい て の 最初 の 例 ( 括 孤 を 含ま な いも の ) で は , 
"and "演算 子 が , 最終 的 を 挿入 演算 の 演算 子 で ある 。 と の 場合 , 
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式 を 評価 し た 結果 は , 長 さ 4 の ビッ ト ・ ス トリ ング で ある 。 2 番目 
の 例 で は , (括弧 を 使用 に て いる の で ) 最終 的 を 挿入 六 算 の 演算 子 
は , 比較 演算 子 で あり , その 評価 の 結果 は , 長 さ 1 の ビ ピット ・ ス ト 
リン グ C を る 。 


一 般 (c, 式 の 中 で 括弧 が 用 いら れ て いな い 限 り , 最も 低い 優先 順 
位 の 演算 子 に よっ て , 最終 的 を 演算 の オペ ラン トド が 決ま る 。 を た と え 
ば , 


A 十 B *※ 3 || C ネ Dー セ 


と の 例 で は , 最終 的 を 演算 が 次 の よう に を な る と と を , 連結 演算 子 が 
示 し て いる 。 


(A 十 B ホネ 3) || (C* ネ D 一 到 ) 
と れ を 評価 する と , 廊 字 スト リン グ の 結果 が 得 ら れる 。 


同様 C し て , 副 式 を 分 析 す る と と が で きる 。 式 の 2 つの オペ ラン 
ド は , 次 の よう 定義 せ する と と が で きる 。 6 


A 十 (B ** 3) 


(C *※D) 一 邑 


関数 参照 の オペ ベラ ンド 


式 の オペ ラン ド は , 定数 , 要素 変数 , 配列 変数 , また は 構造 変数 の 
いずれ で あっ て も よい 。 以下 の 割付 け ス テー トメ ント で 示さ れ て ゆい 
る ょ よう, 計算 の 結果 の 値 を 表わす 式 を オペ ベラ ンド に し て も よい 。 


A =B* SQRT(C): 


と の 例 で は ,。 SQRT (C ) と いう 式 は , C と いう 値 の 平方 根 (< 等 し 
い 値 を 表わし て いる 。 と の よう な 式 は , 関数 参照 と 呼ば れ る 。 


関数 参照 は , 名 前 と , 通常 は , 1 つま た は 2 以上 の 変数 , 定数 
また は その 他 の 式 を 括弧 に 入れ た リス ト か ら 構 成 さ れる 。 と の 名 前 
と いう の は , リス ト MC よ っ て 表わさ れ て いる デー タ K 対 し て 特定 の 
計算 を 行ない , その 計算 結果 を 関数 参照 の 位置 C 紀 き 換え る た め の 
コー ディ ング の ブロ ッ ク の 名 前 で ある 。 


上 の 例 で , C が 16 と いう 値 を ゃ つと 仮定 し ょ う 。 SQRT(C) 
と い ぃ 2 う 関 数 参照 が 与え られ る と . 16 の 平方 根 を 計算 し , 4 と いう 
値 で 関数 参照 を 置 換え る た め の コ ー ド が 実行 され る 。 実際 (C は , 
と の 割当 て ステ ー ト メン ト は 次 の よう に を な る 。 


A = テ B 玉 4 
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関数 参照 の 中 の 名 前 (C よ っ て 表わさ れる コー ド は , 関数 と 呼ば れ 
る 。 SQRT と いう 関数 は , PL/1 の 組 込 関 数 の 1 つ で ある 。 
組込み 関数 は , 多く の 種々 の 操作 を 行なう た め の も の で , PL バ I 
言語 の 一 部 で ある 。 各 関数 CK 関す る くわ し いと と は , G 節 「 組 込み 
関数 と 擬似 変数 」 の と と ろ を みて いた だ きた い 。 さら に, ブロ グラ 
ェ ー は , 他 の 目的 の 関数 を 書く こと と が で きる よう (C な っ て お り ( 第 
9 章 「 サ プ ブルー チン と 関数 」 の と と ろ で 説明 する ) , それ ら の 関数 
の 名 前 を 関数 参照 の 中 で 使用 する と と が で きる 。 


関数 参照 の 使用 は , 演算 式 の オペ ラン ド だ け K 限 られ て いる わけ 
で は な い 。 関数 参照 自体 が た 式 で あり , 式 が 使用 で きる と と ろ を ら ば 
ど と で も 使用 する と と が で きる 。 一 般 C, 変数 が 受入 れ 側 の フィ ー 
ルド を 表わし て いる 場合 ( 割当 て 記号 の 左側 を ど ) は , そ と 関数 
参照 を 使用 する と と は で き な い 。 


し か し 擬似 変数 と し て 使用 で き る 組込み 関数 も いく つか ある 。 
擬似 変数 は , 受入 れ フ ィ ー ル ド の 中 で 使用 され る 組込み 関数 で ある 。 
次 の 例 C つ いて 考え て みよ 2。 


DECLARE A CHARACTER( 10 ) , 
B CHARACTER(30 ) : 
SUBSTR(A,6,5) = SUBSTR(B,20,5)} 


と の 割当 て ステ ー ト メン ト の 中 で , SUBSTR 組込み 関数 名 は , 
普通 の 関数 参照 の 中 で も , また 擬似 変数 と し て ゃ 使用 され て いる 。 


SUBSTR 組込み 関数 は , 指名 され た スト リン グ か ら 指 定 の 長 
さ の サ プ ス トリ ング を 抽出 する も の で ある 。 擬似 変数 と し て 用 いら 
れ た 場合 は , 受入 れ フ ィ ー ル ド と し て 指名 され た スト リン グ の 中 の 
位置 を 表わし て いる 。 


上 の 例 で は , スト リン グ B の 20 桁 目 の 文字 か ら 始 まる 長 さ 5 文 
字 の サ プ ス トリ ング が , スト リン グ A の 最後 の 5 文字 < 割り 当て ら 
れ る 。 つ まり, A の 最後 の 5 文字 が , B の 20 か ら 24 桁 目 の 文字 
と 財 きま 換 えら れる わけ で ある 。 A の 最初 の 5 文字 と B の すべ て の 文 
字 は , 変ら ちな い 。 


G 節 「 組 込み 関数 と 擬似 変数 ]」 の と と ろ で , 擬 似 変数 と し て 使用 
で きる すべ て の 組込み 関数 を と り 上 げ て 説明 し て ある 。 ブ ログ ラマ 
ー 作 成 の 関数 は , 擬似 変数 と し て 使用 する こと は で き な い 。 


目標 フィ ー ル ド の 属性 


変換 また は 式 演算 の 目標 フィ ー ル ド は , 変換 また は 演算 の 結果 が 割 
り 当 て られ る 受入 れ 側 の フィ ー ル ド で ある 。 と と で は , と の よう な 
目標 フィ ー ル ド の 属性 を 決定 する た め の 原 理 C つ いて 取り 上 げ る 。 
詳し い 規 則 に Cc つい て は , F 節 「 デ ー タ 変換 と 式 の 値 の 計算 ]」 の と て 
ろ で 取り 上 げ て 説明 する 。 


直接 的 を 割当 て の 場合 , 次 の よう を な ステー トメ ント で 


変換 が 絶対 に 必要 と すれ ば , 目標 フィ ー ル ド は , 割当 て 記号 の 左側 
KC ある 変数 ( この 場合 は A ) で ある 。 し か し , 式 の 評価 の と き , 目 
標 フ ィ ー ル ド は ,。 コン バイ ラー が 作っ た 一 時 的 を 記憶 位置 で ある と 
と が 多い 。 


次 の 例 C つ いて 考え て みよ う 。 


DECLARE A CHARACTER(8) , 
B FIXED DEC IMAL( 3, 2 ) , 
C FIXED BINARY(10)} 
A = テ B 十 C5 


B +C と いら 式 を 評価 する と き , な よび その 結果 を 割り 当て る と き 
は , 次 の よう KC 4 種類 の 目標 フィ ー ル ド が ある 。 


1 B を 2 進数 変換 し た も の が 割り 当て られ る , コン バイ ラー 
作成 の 一 時 域 。 


2. 加算 の 結果 の 2 進数 が 割り 当て られ る , コン バイ ラー 作成 の 
一 時 域 。 


ぅ 3. 2 進数 の 結果 を それ KC 相当 する 固定 小数 点 1 0 進数 変換 し 
た も る の が 割り 当て られ る , コン バイ ラー 作成 の 一 時 域 。 


4. 結果 の 最終 的 た 行先 で ある A。 固定 小 数 点 1 0 進数 で 表わさ 
れ た 値 を それ 相当 する 文字 スト リン グ K 変 換 し た も の が , 
と れ 《 割 り 当 て られ る 。 


最初 の 目標 フィ ー ル ド の 属性 は , も と に を る フィ ー ル ド (B) の 属性 , 
演算 子 。 な よび その 他 の オペ ベラ ンド (算術 的 を 挿入 演算 子 の 1 つの 
ォ ベ ペラ ンド が 2 進数 の と き は , も 2 一 方 は 評価 の 前 《c 2 進数 変換 
され る ) の 属性 か ら 決 め ら れる 。 2 番目 の 目標 フィ ー ル ド の 属性 は , 
も と (C な る フィ ー ル ド ( C ぉ よび 変換 され た B の 表現 ) の 属性 か ら 


決め られ る 。 3 番目 の 目標 フィ ー ル ド の 属性 は , 一 部 分 は も と に な 
る フィ ー ル ド ( 2 番目 の 目標 ) か ら , 一 部 分 は 最終 的 を 目標 フィ ー 
ルド (A) の 属性 か ら 決 め られ る 。 ( 算術 的 を 2 進数 の 表現 は , 文字 
スト リン グ K 変 換 で き る よう (て と す る た め C は その 前 KK 1 0 進数 表現 
CC 変換 し な けれ ば な ら な い の で , 最終 的 を 目標 フィ ー ル ドド から 決 め 
られ る 唯一 の 属性 は DEC IMAL で ある 。 ) 4 番目 の 目標 フィ ー ル 
ド (A) の 属性 は , DBCLARE ステ ー ト メン ト か ら 知 る と と が で 
きる 。 


式 が 評価 され る と き , 目標 フィ ー ル ド の 属性 は 通常 , 一 部 分 は ゃ 
と (て を な る フィ ー ル ド か ら , 一 部 分 は 実行 され る 演算 か ら , また さら 
iC 一 部 分 は 2 番目 の オペ ラン ド の 属性 か ら と られ る 。 何 ら か の 想定 
が 行なわ れる と と も ある し , 実施 面 で の 制約 ( た と えば , 最大 の 精 
度 な ど ) や 約束 事 が 何 ら か の 形 で 存在 する と と も ある 。 式 が 評価 さ 
れ た あと, さら 結果 が 変換 され る と と も ある 。 と の 場合 , 目標 
ィ ー ル ド の 属性 は 通常 , も と に を る フィ ー ル ド と は 無関係 で ある 。 


変換 に は つね C, も と (C を な る デー タ 項 目 と 目標 の デー タク 項目 と が 
関係 する 。 つ まり , も と に な る 値 の 表現 と 変換 され た 値 の 表現 が 関 


- 係 す る わけ で ある 。 も と (て を る デー タ 項 目 と 目標 の デー タ 項 目 双方 


の 属性 の すべ て が , コン パイル 時 に わか っ て いる か , また は 省略 時 
解釈 < に よっ て 与え られ る 。 


も と KC な を る 値 K に よっ て その 属性 が 決ま る 可能 性 の ある 中 間 結 果 を 
変換 に 含め る と と も 可能 で ある 。 た と えば , 文字 スト リン グ か ら 算 
術 形式 変換 する (C は , 中 間 的 を 変換 が 必要 で あり , し た が っ て , 
最終 的 変換 が 完了 する 前 中 間 結果 が 出る と と C な る 。 し か し , 
と の よう を な 場合 の 最終 の 目標 フィ ー ル ド の 属性 は , つね に も と KC な 


る デー タ 項 目 か ら 決 め ら れる の で , 変数 の 値 と は 無 財 係 で ある 。 


定数 も また 履 性 を も つと と を よく 理解 し を な けれ ば を なら な い 。 1.0 
と いう 定数 は , 1,'1!B,!'1',1B,1EB0 を ど と いう 定数 と 
は 異な っ て いる 。 コ ンズ バイ ル 時 また は 実行 時 定数 を 変換 する と と 
が で きる が , どちら の 場合 も その 規則 は 同じ で ある 。 


配 列 式 


配列 式 は 。 1 つの 配列 変数 , ま た は 少な を く と も 1 つの 配列 オペ ラン 
ド を 含む 式 で ある 。 配列 式 に も , 演算 子 (接頭 , 挿入 の どちら で $ ), 
要素 変数 。 な よび 定数 を 含め る と と が で き る 。 


配列 式 を 評価 する と , 結果 は 配列 に C を る 。 配列 C 対 し て 行なわ れ 
る すべ て の 演算 は , 1 つ 1 つの 要素 に つい て 行 を 主 と し た 順序 で 行 
な われ る 。 し た が っ て , 配列 式 の 中 で 参照 され る すべ て の 配列 は , 
次 元 の 数 が 同じ で , し か も 各 次 元 の 限界 ゃ 全く 同じ で を な けれ ば を ら 
を い 。 
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配列 オペ ラン ド と いっ し ょ を 比較 演算 子 を 使用 し て も よい が , 
IF ステ ー ト メン ト の IE クロ ー ズ の 中 で 配列 オペ ラン ド を 使用 す 
る と と は で き な い 。 IF ステ ー ト メント は は, 1 つの 真 , 偽 い に ずれ か 
の 結果 を テス ト す る も の で ある か ら , IF クロ ー ズ の 中 で 使用 し て 
ょ よい の は , 要素 式 だ け で ある 。 


注 : 配列 式 は , 通常 , 数 学 で いう 行列 式 と 同じ で は を い 。 


接頭 演算 子 と 配列 


配列 KC 対す る 接頭 演算 子 演算 の 結果 は , 同じ 境界 を も つ 配 列 で あり , 
その 中 の 要素 は それ ぞ れ , も と の 配列 の 各 要 素 C 対 し て 行 を われ た 
演算 の 結果 に な る 。 た と えば ぱげ , 


A が 右 の よう みな 配 列 の と き は 5 3 -? 
| くう プ 
6 。 3 一 4 
ーA は 右 の よう な 配列 に を る ー5 一 5 2 
ー1 一 2 一 7 
ー6 8 4 
挿入 演算 子 と 配列 


1 つの オォ ペラ ンド と し て 配列 変数 を 含む 輝 入 演算 は , も う 一 方 の ォ 
ペラ ンド と し て 要素 , 別 の 配列 , また は 構造 を 含む と と が で きる 。 


配列 と 要素 の 演算 


要素 と 配列 が 挿入 演算 子 に < よっ て 結び つけ られ て い る 演算 の 結果 は , 
も と の 配列 と 同じ 限界 を も つつ 配列 C な を なり, その 中 の 各々 の 要素 は , 

も と の 配列 の 中 の 対応 する 要素 と 1 つの 要素 と の 間 で 行 な た われ た 演 
算 の 結果 C を な る 。 た と えば ぱげ, 


A が 右 の よう な 配列 の と き は 人 。 1 8 
遇 妥 聞 4 3 
A 玉 3 は 右 の よう な 配列 C を な る 15 30 24 
36 33 9 
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配列 と 要素 の 演算 に お ける 要素 を , 同じ 配列 の 中 に ある 要素 C す 
る と と が で きる 。 た と えば , A ネ キ A(2,3) と いら 式 の 結果 は , 
A(2 ,3) の 値 が 3 を な ので, 前 記 の 配列 A の 場合 と 同じ 結果 に な る 。 


次 の 割当 て ステ ー ト メン ト に つい て 考え て みよ 2。 
全学 。 交信 (て 1 みう) う 


再び , AC 対 し て 上 記 の 値 を 用 いれ ば , 新た に CAC 割り 当て られ る 
値 は 次 の よう に な る 。 


50 100 800 
1200 1100 300 


A( 1 , 2 ) 対す る も と の 値 ( この と き は 1 0 で ある ) は , 評価 の 
際 に A の 最初 の 2 つの 要素 に 対し て だ け 用 い られ る と と 注意 し て 
いた だ きた い 。 式 の 結果 が Ac 割 り 当 て られ , A の 値 が 変わ る の で , 
A(1.,2) の 新しい 値 が その 後 の 演算 C 用 いら れる 。 最初 の 2 つの 
要素 は , 10, すなわち A( 1,2 ) の も と の 値 で 乗算 され る 。 そ の 
他 の 要素 は すべ て , 100, す を わ ち A( 1, 2 ) の 新しい 値 で 乗算 さ 
れる 。 


配列 と 配列 の 演算 


1 つの 返 入 演算 子 CK よ っ て 2 つの 配列 が 連結 され て いる 場合 は , 2 
つの 配列 は 全く 同じ 限界 を も つも の で な けれ ば な ら な い 。 そ の 結果 
は , も と な る 配列 の 限界 と 同じ 限界 を も つ 配 列 に な る 。 も と て な 
る 2 つの 配列 の 対応 する 要素 同志 に 対し て 演算 が 行なわ れる 。 


2 つの 配列 は 全く 同じ 次 元 数 の も の で を な けれ ば を ら ず , また た, 対 
応 す る 各 次 元 の 下限 な よび 上 限 も 全く 同じ で を けれ ば を ら な い 。 た 
と えば , 又 ( 10 ,6 ) と 宣言 され た 配列 の 限界 は , Y(2: 11, 
3: 8 ) と 宣言 され た 配列 の 限界 と 同じ で は を い ( 対応 す る 次 元 c 対 
する 範囲 は 同じ で ある し , 要素 の 数 も 同じ で は ある が ) 。 


次 に あげ る の は , 配列 の 挿 入 演算 式 の 例 で ある 。 


A が 右 の よう な 配列 で 2 4 3 
6 1 7 
4 8 2 
B が 右 の よう を 配列 の と き は 1 5 7 
8 3 4 
6 3 1 


ペー 


wー ン 


A 十 B は 右 の よう かな 配列 C を り 3 9 10 
14 4 11 
10 11 3 
A 玉 B は 右 の より な 配列 C を る 2 。 20 21 


48 る 26 


24 24 2 


配列 と 構造 の 演算 
挿入 演算 子 C よ っ て 配列 と 構造 結び つけ られ て いる 演算 の 結果 は , 
その 配列 と 全く 同じ 限界 を も ゃ ち , その 構造 と 全く 同じ 構造 を も つ 構 
造 の 配列 C を る 。 
た と えば , 次 の よう な 宣言 が 与え られ て いる と すれ ば , 
DECLARE 1A, 2 B, 2 C, 
文 ( 2) , 
Y(2) LIKE Ai 
次 の 割当 て ステ ー ト メン ト は , 


Y = 於 十 A: 


有効 で も ある 。 と れ は 次 の も ゃ の 相当 する 。 


Y.B(1) 三文 (1) 十 A.B: 
Y.C(1) = (1) 十 A.Cj 
Y.B(2) XX(2) 士 AB} 
Y.C(2) =X(2) 十 A.C: 


配列 式 に お ける デー タ 変 換 
配列 式 (C つい て の と の 説明 の 中 で あげ て ある 例 で は , 単 一 の 算術 注 


算 だ けが 示さ れ て いる 。 演算 を 組み 合わ せる 際 の 規則 お よび オズ ペラ 
ンド の デー タ 変 換 の 規則 は , 要素 演算 の 場合 と 同じ で あ る 。 


構 造 式 


構造 式 は , 少な く と も 1 つの 構造 オ ベラ ンド を 含み , し か も 配列 オ 
ベラ ンド は 含ま たい, と いう 1 個 の 構造 変数 ま た は 式 で ある 。 要素 


変数 と 定数 は , 構造 式 の オ ペラ ンド に する と と が で きる 。 構造 式 を 
評価 する と , その 結果 は 構造 に を る 。 構造 オペ ラン ド は , 大 構造 名 
また は 小 構造 名 の どちら で あっ て も よい 。 


比較 演算 子 に 対し て 構造 の オ ベラ ンド を 用 いて も よい が , IF ス 
テー トメ ント の IF クロ ー ズ の 中 で 構造 オペ ラン ド を 使用 する と と 
は で きた な い 。 IF ステ ー ト メン ト は , 1 つの 真 , 偽 の 結果 を テス ト 
する も の で あ る か ら , IF クロ ー ズ の 中 で 使用 で きる の は , 要素 式 
だ け で ある 。 


構造 (C 対 し て 行なわ れる すべ て の 演算 は , 要素 の 1 つ 1 つつ い 
て 行 を われ る 。 BY NAME (CC よ る 割当 て の 場合 (次 の ペー ジ を 
参照 ) を の ぞい て , 構造 式 の 中 に 出 て くる 構造 変数 は すべ て , 同じ 
構造 に を た っ て いな けれ ば な ら な い 。 


同じ 構造 で ある と いう と と は , その 構造 内 の 小 構造 が 同じ 形 に を 
っ て ぉ り , その 中 KC 含ま れる 要素 と 配列 の 数 が 同じ で な けれ ば を ら 
を いと と , お よび その 構造 内 ( 小 構造 か あれ ば その 小 構造 の 中 で も $ ) 
の 要素 と 配列 の 位置 が 同じ で を な けれ ば を ら な を いと と を 意味 し て いる 。 
対応 する 位置 に ある 配列 は , 同じ 限界 を も つも の で な けれ ば な ら な 
い 。 名 前 は 同 じ し で あぁ る 必要 は ない 。 正 し い 変換 が 行なわ れる た め に 
は , 対応 す る 要素 の デー タ ・ タ イプ が 同じ で を けれ ば な を な ら な い 。 


接頭 演算 子 と 構造 


構造 対し て 接頭 演算 子 演算 を す る と , その 結果 は 同じ 形式 の 構造 
(C を たり, その 各々 の 要素 は , も と の 構造 の 各々 の 要素 (C 対 し て 実行 
され た 演算 の 結果 に を る 。 


注 : 構造 に < は , 多く の 異な た る デー タ ・ タ イプ の 要素 を 舎 め る と と が 
で きる の で , 構造 変数 (大 構造 名 , 小 構造 名 の どちら で も ゃ も )C よ っ 
て 表わさ れる すべ て の 要素 に 対 し て 演算 を 正 し く 実 行 する と と が で 
きい 限り , 構造 式 の 中 の 接頭 演算 子 演算 は 無 意 味 に を る 。 


挿入 演算 子 と 構造 

1 つの オペ ラン ド と し て 構造 変数 を 含む 挿入 演算 は , も う 一 方 の オ 
ベラ ンド と し て 要素 また は 別 の 構造 を も つと と が で きる 。 

構造 式 の 中 の 構造 オペ ラン ド は , 大 構造 名 で ある 必要 は を い 。 小 
構造 名 は ,。 それ が どの よう を レベ ル の も ゃ の で あっ て も , 構造 変数 で 
ある 。 し た が っ て , M. N が 大 構造 M の 中 の 小 構造 で あれ ば , 次 


あげ る ゃ も の は , 構造 式 で ある 。 


M.N g '1010'B 
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構造 と 要素 の 演算 

演算 の 一 方 の オ ペラ ンド が 構造 で , も う 一 方 が 要素 の 場合 は , 構造 
の 中 C あ る 各々 の 要素 (つい て 1 つ ず 演算 を 連続 し て 行 を た う の と 
同じ で ある 。 各々 の 副 演算 で は , 構造 内 の 1 つの 要素 と 単 一 の 要素 
が 用 い られ る 。 

次 の 構造 た つい て 考え て みょう 。 


1 A, 
2 


双 が 要素 変数 で あれ ば , A 玉 又 は 次 の も の と 等 し い 。 


A.C 玉 駐 
A.D 玉 双 
A.E 玉 
A.G ネネ 双 
A.H 玉 又 
A.1 * 
構造 と 構造 の 演算 


1 つの 演算 が 2 つの 構造 オペ ラン ド を も っ て いる と き は , 対応 する 
各々 の 対 関 し て 1 つ ず ー 要 素 演算 を 連続 し て 行なう の と 同 じ で ある 
る 。 を た と えば , A が , 前 の 例 で 示し た 構造 で も あり, M が 次 の よう な 
構造 を も っ て いる と すれ ば , 


1 M, 
2 N, 
3 OO, 
3 P, 
3 Q⑩, 
2 R, 
3 S, 
9 っ (』 
3 Ui 
A | | M は 次 の も の と 等 し く を る 。 
A.C || M.O 
A.D || M.P 
A.E || M.Q 
A.G || M.S 
A.H || M.T 
A. 1 || M.U 
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BY NAME に よる 構造 の 割当 て 

構造 式 の オ ペラ ンド が 同じ 構造 に を た っ て いな けれ ば な ら な いと いう 
規則 C 対 する 唯一 の 例外 は , BY NAM オプ ショ ン を も つ 割 当 
て ステ ー ト メン ト の 中 構造 式 が あ る 場合 で ある 。 


BY NAME は , 構造 の 割当 て ステ ー ト メン ト の 最後 の と と ろ 
(C, カン マ を つけ て その 人 後 K 書 く 。 以下 KC 示 す の は , その 例 で ある 。 


次 の 構造 と 割当 て ステ ー ト メン ト C つ いて 考え て みよ ょ 29。 


1 ONE , 1 TWO, 1 THEREE , 

2 PART1 , 2 PART1 2 PART1 , 
2 RED , 3 BLUE , 5 RED, 
3 ORANGE , 3 GREEN , 3 BLUE , 

2 PART2 , 3 RED, 3 BROWN , 
3 YELLOW, 2 PART2 , 2 PART2 , 
3 BLUE , 3 BROWN, 3 YELLOW , 
3 GREEN: 3 YELLOW : 3 GREEN: 


ONE = TWO, BY NAME: 
ONE.PART1 = THREE.PART1, BY NAME: 
ONE = TWO 十 THREE,. BY NAME 


最初 の 割当 て ステ ー ト メン ト は , 次 の も の と 同じ で ある 。 


ONE. PART1. RED = TWO. PART1. RED: 
ONE. PART2. YELLOW = TWO. PART2. YELLOW : 


2 番目 の 割当 て ステ ー ト メン ト は , 次 の も の と 同じ で ある 。 


ONE. PART1. RED = THREE. PART 1. RED: 


3 番目 の 割当 て ステ ー ト メン ト は , 次 の も の と 同じ で ある 。 


ONE. PART 1. RED 


TWO. PART 1. RED 
十 THREE.PART1. RED: 


ONE.PART2. YELLOW = TWO. PART2. YELLOW 
十 THREE.PART2. YELLOW : 


BY NEME オプ ショ ン は , 割当 て ステ ー ト メン ト の 中 に だ け 
書く と と が で きる 。 と れ は , 両方 の 構造 に 共通 を 名 前 を も ゃ つ 要 素 
対 し て だ け , 構造 の 要素 の 割当 て を 行なう と と を 示す も の で あぁ る 。 
割当 て ステ ー ト メン ト の 中 で 指定 され る 最高 レベ ル の 修飾 語 を の ぞ 
いて , 修飾 する 名 前 は すべ て 同じ で を けれ ば な を ならない 。 


BY NAME オプ ショ ン を $ ゃ も つ 割 当て ステ ー ト メン ト の 中 K 演 
算式 が ある と き は , それ ぞ れ の 構造 の 中 で その 名 前 が 宣言 され て い 
る 要素 に 対し て だ け , 演算 と 割当 て が 行 を われ る 。 上記 の 3 番目 の 
割当 て ステ ー ト メン ト の 場合 は , TWO の PART2 の 中 要素 名 
と し て GREEN は 出 て いな い の で , ONE . PART 2 .GREEN 
お よび THEREE.PART2.GREENC 対 し て , 演算 は 行なわ れ 
を い 。 


例外 条件 


デー タ の 変換 中 (C 起 と り 得 る PL/1 の 例外 条件 に と は, S1ZE , 
CONVERS TION , お よび STRINGSIZE の 3 つが ある 。 

( 条件 の 概念 は , 第 1 4 章 「 例 外 条 件 の 処 理 と プロ グラ ム ・ チ ェ ッ 
クア ウゥ ト 」 の と と ろ で 説明 され て お り , また , 諸 条件 の 詳細 に つい 
て は , HH 節 「ON 条 件 」 の と と ろ で 説明 され て いる 。 ) 


SIZE 条件 は , 算術 値 の 左側 か ら 有効 数 字 が 失 を われ た と まき に 
起こ と る 。 と の 条件 は , 式 の 中 で 変換 が 行なわ て れる と き , また は 式 の 
結果 を 割り 当て る と き K 起 こり 得る も る の で あっ て , 文字 スト リン グ 
また を は ビ ピット ・ ス トリ ング KK 変換 さ れる と き C は , 値 が 切り 捨て ら 

れ て も 起 ら を いじ 。 編集 指示 転送 で また は F 形式 < 変 換 す る と き (, 
指定 され た フィ ー ル ド の 幅 が リスト 項目 の 値 を 収容 で き な い 場合 
も と の 条件 が 起こ と る 。 S 1 ZE 接頭 語 の 有効 範囲 内 で 条件 が 起 っ た 
と きだ け 割 込み を 起 と す よ う 《, 通常 , STZE 条 件 は 禁止 状態 
(C さ れる 。 


CONVERSI ON 条件 は , も と に な る フィ ー ル ド の 中 K, 行 を 
われ る 変換 対し て 有効 で を ない 文字 が 含ま れ て いる と き MC, 起こ る 。 
た と えば , 算術 形式 変換 され る 文字 スト リン グ の 中 算術 定数 で 
許さ れる 文字 以外 の 文字 が 含ま れ て いる 場合 や や 。 ビッ ト K 変 換 され 


る 文字 スト リン グ K 0 と 1 以外 の 文字 が 含ま れ て いる 場合 を ど て , 
CONVERS TION が 起 と る 。 無効 を 文字 が ある と , その 各々 に つ 
いて 1 度 ず つ CONVERS ION 条件 が 起こ と る の で 無効 な 文字 
が 2 つ 以 上 ある と , 1 回 の 変換 操作 で 数 回 の 割込み が 起こ る 。 
CONVERS I ON 条件 は 通常 , 解禁 され て いる の で , 条件 が 起 っ 
た と き は 割込み が 起 と る 。 と の 条件 は , NOCONVERSION 接 
頭 語 を 使っ て 禁止 状態 に する と と が で きる 。 と の よう な 場合 は , 条 
件 が 起 っ て も 割込み は 起 ら な い 。 


STRINGSTIZE 条 件 は , 文字 また は ビット ・ ス トリ ング が 割 
り 当 て られ る 目標 フィ ー ル ド が 小さ すぎ て スト リン グ を 収容 で き な 
いと き C 起 と る 。 目標 フィ ー ル ド の 長 さ (合う よら (C, 文字 また は 
ビッ ト の 右端 が 切り 捨て られ る 。STRINGS1IZE 条件 は , 
STRINGS 1ZE 条件 接頭 語 の 有効 範囲 内 で だ け 割 込み が 起 と る 
ょ う , 通常 は 禁止 状態 に され る 。 


と れ ら の 3 つの 条件 は , 式 の 評価 中 に も 起こ と り 得 る 。 さら, 
FIXEDOVERFLOW ,OVERFLOW ,UNDERFLOW , 
ぉ よび ZERODIVIDE の 4 つの 条件 も 起り 得る 。F IXED- 
OVERFLOW と OVERELOW は , 目標 フィ ー ル ド K つ いて 富 
言 され た 精度 を 越 を た と き で は を な 〈, 実施 面 で 定義 され た 最大 精度 
を 越え た と き C 起 こと る と と 注意 し て いた だ きた い 。 
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第 5 章 ステ ー ト メン ト の 分 類 


と の 間 で は , 機能 別 C ステ ー ト メン ト を 分 類 し て いる 。 機能 別 の ク 
ラス KC 分 け て ステ ー ト メン ト が リス ト さ れ て ちな り , 各 ス テー トメ ン 
ト の 目的 と その 用 法 の 例 が 記載 され て いる 。 

各 ス テー トメ ント に つい て の 詳細 な 説明 は , 本 章 で は なく, J 節 
「 ス テー トメ ント 」 を みて いた だ きた い 。 


ステ ー トメ ント の 種類 


ステ ー ト メン ト は , 次 の よう を クラ ス K 分 ける と と が で きる 。 

記述 ステ ー ト メン ト 

入出 力 ス テー トメ ント 

デー タ 移 動 む お よび 計算 ステ ー ト メン ト 

デブ ログ ラム 構成 ステ ー ト メン ト 

記憶 域 制 御 ス テー トメ ント 

制御 ステ ー ト メン ト 

例外 制御 ステ ー ト メン ト 

グリ グズ ョ モッ ザ ナー ャ ステ デ テール メン マツ 人 
それ ぞ れ の クラ ス の 名 前 は , 説明 の 便宜 上 つけ た も の で あっ て , ブ 
リプ ロ セ ッ サ ー・ ス テー トメ ント 以外 は , 言語 の 中 で と の 名 前 が 特 
別 を 意味 を も っ て いる わけ で は な い 。 ス テー トメ ント の 中 C は , い 


くつ も ゃ も の 働き を も つも の も ある の で , 2 つつ 以 上 の クラ ス K 属 する も 
の も ゃ も ある 。 


記述 ステ ー ト メン ト 


PL ステ ー ト メン ト が 実行 され る と き は , 非常 に 多く の 種類 の 
デー タ を 扱 2 こ と が で きる 。 算術 定数 また は スト リン グ 定 数 以外 の 
各 デ ー タ 項目 は 。 ブロ グラ ム の 中 で は 名 前 に よっ て 参照 され る 。 

PL 1 言語 で は , 参照 され る デー タ 項 目 の 特 性 ( また は 属性 ) は , 
プロ グラ ム の コン ズバ イル 時 に わか っ て い を けれ ば を ら を な い 。 た だ し , 
と の 規則 に は 2 , 3 の 例外 が ある 。 た と えば ぱ ば , 非 STATIC 項目 
の 場合 は , 配列 の 次 元 の 限界 , スト リン グ の 長 さ , エリ ア の 大 きる, 
初期 値 , ある 種 の ファ イル 属性 は , プロ グラ ム の 実行 中 (C 決 め る と 


と も で きる 。 


DECLARE お よび DEFAULT ス テー トメ ント 


DECLARE ステ ー ト メン ト は , 名 前 の 属性 を 指定 する た め の 主 
要 を 方 法 で ある 。 ブ ログ ラム の 中 で 使用 され る 名 前 は 。 つね 

DECLARE ステ ー ト メン ト の 中 (CC ある 必要 は を く , 文脈 に よっ 
て その 属性 を 決め る と と が で きる 場合 も 多い 。 属 性 が 明示 的 宣言 
され て お ら ず , し か も 文脈 か ら ゃ 決め られ を いと いう 場合 は , 省略 
時 解釈 の 規則 が 適用 され る 。 省略 時 解釈 の 規則 に は , その コン ベイ 
ラー で 定義 され た 標準 の 省略 時 解釈 の 規則 と , DEFEAULT ステ 
ー ト メン ト を 使っ て 特定 の プロ グラ ム 用 に プログラマー が 定義 し た 
も の, と が ある 。 省略 時 解釈 と 文脈 (C よる 決定 と を うま く 組 合わ 
せれ ば , DECLARE ス テー トメ ント を 使 2 必要 が を い 場 合 も ある 。 


DEFEAULT ステ ー ト メン ト を 使う 2 と こと に よっ て , プロ グラ マ 
ー は , 省略 時 解釈 が 適用 され る 以下 の よう な 属性 (C 対 し て 制御 を 加 
える と と が で きる 。 


明示 宣言 され た 議 別名 
文脈 宣言 され た 識別 名 

暗示 宣言 され た 識別 名 

ENTRY 属性 の 中 の 記述 子 

内 部 プロ ンー ジャ ー か ら 返 され た 値 


DECLARE ステ ー ト メン ト は , ブロ グラ ム の 文書 化 と い 5 面 
か ら ゃ 重要 を 部 分 で ある 。 したがって, プロ グラ マー は , その 属性 
が 省略 時 解 息 で きる も る の で あっ て も , また 文脈 宣言 が 可能 で あっ て 
も , 宣言 を 自由 C 用 いる と と が で きる 。 DECLARE ステ ー ト メ 
ント の 数 制限 は を い の で , 様々 を 名 前 の グル ー プ K 対 し て , 別々 
の DECLARE ステ ー ト メン ト を 使用 する と と が で きる 。 と の よ 
うに する と , 修正 が 容易 C を り , 診断 の 解読 も 明確 に な る 。 


その 他 の 記述 ステ ー ト メン ト 


OPEN ステ ー ト メン ト は , ファ イル 定数 CK 関し て ある 種 の 属性 を 
指定 する と と が で きる の で , 記述 ステ ー ト メン ト と し て 分 上 類 さ れる 
と と も ゃ ある 。 被 制 御 変数 に 対す る 特定 の 属性 を , ALLOCATE 
ステ ー ト メン ト の 中 で 指定 する と と が で きる 。 FORMAT ステ ー 
トメ ント は , 外部 媒体 上 に な ける デー タ の レイ アウ ト , た と えば で 
ー ジ や 入力 カー ド を など, を 記述 する も の と 考え る と と も で きる 。 
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入出 力 ス テー トメ ント 


入出 力 ク ラス KC 属す る 主要 を ステ ー ト メン ト は , 内 部 記憶 装置 と 外 
部 媒体 と の 間 で 実際 に デー タ の 転送 を 行なう も ゃ の で ある 。 その 他 の 
入出 力 ス テー トメ ント は , と の よう な 転送 (影響 を 与え を る る の で あ 
っ て , 入出 力 制御 テート メン ト と 考え る と と が で きる 。 


各 入 出力 ステ ー ト メン ト は , ファ イル を 識別 する た め の 関 連 
FILE オプ ショ ン を つけ て 使用 3 れる 。 フ ァイル ・ オ ブシ ョ ン は , 
ファ イア 定数 = ファ イル 変数 。 また は ファ イル の 値 を 返す 関数 の い 
ずれ か で ある よう な ファ イメ ル 式 を 指定 する も の で ある 。 


以下 の リス ト の 中 で は , デー タ の 転送 を 引き 起す ステ ー ト メン ト は , 
RECORD 入 出力 と STREAM 入 出力 の 2 クラ ス 《 分 け て ある 。 


RECORD 転送 ステ ー ト メン ト 


RE AD 
WRITE 
REWRITE 
LOCATE 


DELETE 
STREAM 転送 ステ ー ト 


GET 


PUT 

入出 力 制御 ステ ー ト メン ト 
OPEN 
CLOSE 


と れ ら の ステ ー ト メン ト K 関 連 の ある ステ ー ト メン ト と し て , 
DISPLAY ステ ー ト メン ト が ある 。 


STREAM 転 送 と RECORD 転 送 の 問 に は , 2 つの 重要 な 相違 
が ある 。 STRE AM 転送 で は , 各 デ ー タ 項目 は 別々 (C 扱 われ る が , 
RECORD 転送 は , デー タ 項 目 の 集まり ( レ ュ ー ド ) を 1 つの 全 
体 と し て 扱 2。 STREAM 転送 で は , 各 項 目 は , 転送 され る と まき 
KC 編集 きれ , 変換 され る 。 一 方 , RECORD 転送 で は , 編集 も 変 
換 も 行なわ れず , 外部 媒体 上 の レ ュ ー ド は 内 部 記憶 装置 内 に ある と 
き と 全 く 同 じ レレ コード の コピ ビー で ある の が 普通 で ある 。 


と の よう な 相 闘 が ある の で , RECORD 転送 は , 内 部 表現 ( 2 
進数 や 1 0 進数 を ど ) で 書か れ て いる 大 き を ファ イル を 処理 する の 
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特 適し て いる 。 そ れ K 対 し て , STREAM 転送 は , 光 孔 デー 
タ を 処理 し た り , 読み や すい デー タ を 作成 し た り ( と の よう な 場合 
は 編集 が 必要 ) する の に 用 いら れる 。 


レコ ー ド 転送 ステ ー ト メン ト 


READ ステ ー ト メン ト は , 内 部 記憶 装 還 に レ ュ ー ド を 直接 転送 し, 
それ ら を 処理 で きる よう に て す る 。 


WRITE ステ ー ト メン ト は , レコ ュー ド を 出力 装置 転送 する 。 


LOCATE ステ ー ト メン ト は , 緩衝 域内 C ぉ お ける 位置 を 指し 示 
す ポ イン ター を セッ ト す る と と (よって, 出力 緩衝 域 の 中 K 変 数 を 
入れ る 記憶 域 を 割り 振る も の で ある が , その 際 C, と の ファ イル 
用 の 緩衝 域 の 中 に す で (C レ ュ ー ド が 入っ て いれ ば , 先 に それ を 書き 
出 し て か ら 上 記 の と と を 行 を う 。 


REWRITE ス テー トメ ント は , UPDATE フ ァイル 内 の 既存 
の レ ュ ー ド を 変更 する 。 


DELE TE ステ ー ト メン ト は , UPDATE ファ イル か とら 既存 の 
レコ ー ド を 削除 する 。 


スト リー ム 転 送 ス テー トメ ント 


CET おぉ よび PUT ステ ー ト メン ト で 処理 する と と が で きる の は , 
順次 ファ イル だ け で ある 。 レコ ー ド の 境界 は , 通常 無 祝 され る 。 デ 
ー タ は , 外部 媒体 か ら 入 っ て きた (GET ) か , 外部 媒体 CK 出 て ゆく 
(PUT) 個々 の デー タ 項 目 の 流 れ を 考え る と と が で きる 。 


GET ぉ よび PUT ステー トメント は , 3 つの モー ド ( デー タ 指 
示 , リス ト 指示 , また は 編集 指示 ) の いずれ か で , 項目 の リス ト を 
転送 する と と が で きる 。 デ ー タ 指示 転送 で は , デー タ 項 目 の 名 前 と 
その 値 が , 外部 媒体 上 記録 さ れる 。 リス ト 指 示 転 送 で は , デー タ 
は , プラ ンク また は カン マ (C よ っ て 区 切ら れ て 定数 の リス ト と し て 
外部 的 (C 記 録 さ れる 。 編集 指示 転送 で は , デー タ は , 形式 リス ト 《 
し た が っ て 1 文字 ずつ 処理 され る 文字 の スト リン グ と し て 外部 的 
記録 され る 。 


デー タ 指 示 転 送 は , 比較 的 少量 の 値 を 読む と き や , 注釈 付 の デバ 
ッ ギ ング 用 の 出力 を 作る 際 C 非 常に 有効 で ちる 。 リス ト 指 示 入 力 は , 
自由 形式 で 容 孔 され た 大 量 の デー タ を 読む の KC 適し て いる 。 編集 指 
示 転 送 は , 形式 を 厳密 制御 し を けれ ば を な ら な いと き , た と えば 報 
告 書 を 作成 する と き や 固定 形式 で 光 也 され た カー ド を 読む と き (, 

使用 され る 。 


注 : GET * ぉ よび PUT ステ ー ト メン ト は , FILE オプ ショ ン を 
指定 する か わり (CC, STRING オプ ショ ン の 中 で スト リン グ 名 を 
指定 する と と IC よっ て , 内 部 的 を デー タ 移 動 C も 使用 する と と が で 
きる 。 と の 機能 は , RPAD SET お ぉ お ょ よび LOCATE ステ ー ト メ 
ント を 用 いて , 緩衝 域 へ の ( な よび 緩衝 域 か ら の ) デー タ 移 動 に も 
使用 する と と が で きる が , と れ は , 実際 に は 入出 力 操作 の 一 部 分 で 
は な い 。 STRING オプ ショ ン を も つ GET お よび PUT ステ ー 
トメ ント は , と の 章 の 「 デ ー タ 移動 と 計算 ステ ー ト メン ト 」 の 項 で 


説明 する 。 


入出 力 制御 ステ ー ト メン ト 


OPEN ステ ー ト メン ト は , ファ イル 名 を デー タ ・ セ ッ ト 《 結 び つ 
け , その デー タ ・ セ ッ ト の 処理 の 準備 を する も の で ある 。 ま た, そ 
の ファ イル KK 対 し て 追加 の 属性 を 指定 する と と も で きる 。 


OPEN ステ ー ト メン ト は , つね 指定 し を な けれ ば を ら を いわ け 
で は な い 。 ま だ 開か れ て いな い フ ァイル の 名 前 を 指定 する 入出 力 転 
送 ス テー トメ ント が 実行 され る と , デー タ 転 送 が 行 を われ る 前 て, 
ファ イル は 自動 的 に 開か れる 。 


ファ イル KK 対 し て INPUT また は OUTPUT 属 性 を 指定 する た 
め C, OPEN ステ ー ト メン ト を 使用 する と と が で きる 。 たとえば, 
PRINT ファ イル の 場合 , 各 印 刷 行 の 長 さ と 1 ペー ジ 当 り の 行 数 
は ,。 OPEN ステ ー ト メン ト の 中 で PAGESTZE お よび LINE- 
SIZE オプ ショ ン を 用 いる と と (C よ っ て の み 指 定 す る と と が で き 
る 。 LINESTIZP オ プシ ョ ン は , 装置 転送 され る 物理 ブロ ッ ク 
の 長 さ を 決定 する た め K, PRINT OUTPUT 以 外 の ファ イル 
対し て も 指定 する と と が で きる 。 OPEN ステ ー ト メン ト は , デ 
ー タ ・ セ ッ ト と ファ イル と を 連係 する る の と し て , ファ イル 名 以外 
の 名 前 を 指定 する (TITLE オブ ショ ン の 中 で ) た め 使 用 する 
に と:5 0 まる 。 


CLOSE ステ ー ト メン ト は , デー タ ・ セ ッ ト を ファ イル か と ら 切 
り 離 す も る の で ある 。 ブ ログ ラム が 終了 する と き に は すべ て の ファ イ 
ル が 閉じ られ る の で , CLOSE ステ ー ト メン ト は , 必ず し ゃ 指定 
し な く て も よい 。 


DISPLAY ステ ー ト メン ト 


DISPLAY ステ ー ト メン ト は , 操作 卓上 CC メッ セー ジ ( 通常 は , 
操作 員 (C 対 する も の ) を 書き 出す た め C 用 いら れる 。 REPLY オ 
プシ ョ ン を つけ て と の ステ ー ト メン ト を 使用 すれ ば , 操作 員 は , コ 
ー ド また は メッ セー ジ を タイ プ す る と と て C よ っ て ブロ グラ ム と 連絡 
する と と も で きる 。 REPLY オプ ショ ン は , 操作 員 が メッ セー ジ 
を 確認 する まで プログ ラム の 実行 を 保留 し て お くだけ の 目的 で 使用 
する と と も で きる 。 


デー タ 移 動 と 計算 ステ ー ト メン ト 


内 部 的 た な データ 移動 と は , 指定 され た 変数 Cc 式 の 値 を 割り 当て る と 
と で ある 。 式 は , 定数 また は 変数 の いずれ で も よく , また , これ か 
ら 行なわ れる 計算 を 指定 する 式 で あっ て も よい 。 


内 部 的 を デー タ 移 動 の た め C, また 計算 を 指定 する た め , 最も 
一 般 的 CK 用 ^ られ る ステ ー ト メン ト は , 割当 て ステ ー ト メン ト で あ 
る 。 STRING オプ ショ ン を も つ GET お よび PUT ス テー トメ 
ント も , 内 部 的 を デー タ 移 動 C 使 用 する と と が で きる 。 さら, 
PUT ステ ー ト メン ト は 。 と これから 行なわ れる 計算 を 指定 する こと と 
も で きる 。 


割当 て ステ ー ト メン ト 


割当 て ステ ー ト メン ト は 。 キー ワー ド を も た な い が , 割当 て 記 人 3 
(て よっ て 議 別 され る 。 と れ は , 通常 , 次 の 2 つの 形式 の うち どちら 
か の 形式 を と る 。 


A 


Bi 


A BB 壮 で 5 

最初 の 形式 は , 単なる 内 部 的 を デー タ 移 動 C 用 いる と と が で きる 。 
割当 て 記号 の 右側 C ある 変数 ( また は 定数 ) の 値 が , 左側 に ある 変 
数 (C 割 り 当 て られ る 。 2 番 日 の 形式 は , 演算 式 を 含ん で お り , その 
値 が , 割当 て 記号 の 左側 に ある 変数 に 割り 当て られ る 。 2 番目 の 形 
式 は , デー タ の 移動 は も ちろ ん で ある が , 行なう べき 計算 も 指定 す 
る も の で ある 。 


左辺 の 変数 の 属性 が , 式 の 結果 ( また は 変数 ある い は 定数 ) の 属 
性 と 異な っ て いて も よい の で , 割当 て ステ ー ト メン ト を 用 いて 変換 
また は 編集 を 行 を うと と も で きる 。 


左辺 の 変数 を , 配列 また は 構造 の 名 前 に する と と も で きる 。 つま 
り , 右辺 の 式 の 結果 が 配列 また は 構造 の 値 に な っ て も よい 。 し た が 


っ て , 単 一 の 項目 と 同様 ,。 デー タ の 集合 体 を 移動 する た め (C 割 当て 
ステ ー ト メン ト を 用 いる と と が で きる 。 


複数 割当 て 


次 の よう みな 形式 の ステ ー ト メン ト の 中 で は , 割当 て ステ ー ト メン 
ト の 式 の 値 を 2 つ 以 上 の 変数 KC 割り 当て る と と が で き る 。 
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A, メ B 十 C: 


と の よう な ステ ー ト メン ト は , B 十 C の 値 が 1 度 だ け 計 算 さ れ , 
次 に A と 双 C 割 り 当 て られ る 点 以 外 は , 単 一 の 割当 て と 全く 同じ ょ 
ら (C し て 実行 され る 。 


注 : BY NAME C ょ る 構造 の 割付 け 複 数 割当 て を 使用 する 場 
合 は , 影響 を 受け る 要素 名 は , 割当 て 記号 の 左側 に リス ト さ れ て い 
る 構造 の すべ て 共通 する 要素 名 だ け で ある 。 


プロ グラ ム 編 成 ス テー トメ ント 


プロ グラ ュ 編 成 ス テー トメ ント と は , ブログ ラム を セク ショ ン K 区 
切っ て , プロ ッ ク お よび グル ー プ に する た め C と 用 いら れる ステ ー ト 
メン ト で ある 。 と の よう な ステ ー ト メン ト (C は , PROCEDURE 
ス テー トメント, END ステ ー ト メン ト , ENTRY ステ ー ト メン 
ト , お よび BEGIN ステ ー ト メン ト が ある 。 


プロ グラ ム を 適当 を プロ ッ ク K 分 ける と , プロ グラ ム の 作成 と テ 
スト が 簡素 化 さ れる 。 とれ は , 幾 人 か の プロ グラ マー が 1 つの プロ 
グラ ム を 共同 し て 作成 する 場合 に と く K 有 効 で ちる 。 ま た, 自動 記 
憶 域 ク ラス の 動 的 な 割 振り は , それ が 宣言 され て いる ブロ ッ ク K 入 
る と き に 割り 振ら れる の で , と の 方 法 を 使用 すれ ば , 記憶 域 を 有 
効 C 使 用 する と と が で きる 。 


PROCEDURE ステ ー ト メン ト 


プロ シー ジャ ー・ ブ ロッ ク は , PROCEDURE ステ ー ト メン ト お 
ょ び 関 連 す る END ステー トメ ント て よっ て 区 切ら れる が , その 主 
を 働き は , 指定 され た デー タ K 対 し て 行 を われ る 一 連 の 操作 を 定義 
する と と で ある 。 と の よう な 一 連 の 操作 に は 名 前 ( PROCEDURE 
ステ ー ト メン ト の ラベ ル ) が 与え られ , その 名 前 が 知ら れ て いる と 
と ろ で あれ ば ど と か ら で ゃ 呼び 出す こと が で きる 。 


どの よう な プロ グラム も , 少な く と も 1 個 の PROCEDURE ス 
テー トメ ント と 1 個 の END ステ ー ト メン ト を も っ て い を な けれ ば を な 
らい 。 ブ プロ グラ ム は , 別々 作成 され た あと で 連係 され た いく つ 
か の プロ シー ジャ ー か ら 構 成す る と と が で きる 。 ブロ シー ジャ ー の 
中 CK, ネス ト さ れ た 他 の プロ シー ジャ ー が 含ま れ て いて も よい 。 と 
れ ら の 内 部 プロ シー ジャ ー の 中 K, 局部 的 に 定義 る され た 名 前 と し て 
扱わ れる ( 他 指 定 さ れ て いな けれ ば ) 宣言 が 含ま れ て いて も よい 。 
と の よら な 定義 は , 自分 の ブロ ッ ク の 外 で は 知ら て て い を い の で , 
その 外側 の プロ シー ジャ ー の 中 で と の よう な 名 前 を 参照 する こと は 
で きま ない 。 と これら の 名 前 と 結び つけ られ る 記憶 域 は , 通常 , その よ 
ら 友 名 前 が 定義 され て いる ブロ ッ ク K 入 る と き 割 り 振ら れ , そ 
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の ブロ ッ ク か ら 出 る と き K 解 放さ れる 。 


プロ シー ジャ ー に よっ て 定義 S さ れ て いる 一 連 の ステ ー ト メン ト は , 
プロ シー ジャ ー 名 が 知ら れ て いる と と ろ で あれ ば げ ば, ど と か ら で も ゃ 実 
行 す る と と が で きる 。 ブ プロ シー ジャ ー は , CALL ス テー トメ ント 
(C よ っ て 呼び 出す と と も で きる し , 式 の 中 に その 名 前 を 書く こと 《 
よっ て も 呼び 出す と と が で きる (後者 の 場合 は , 関数 参照 と 呼ば れ 
る ) 。 関数 参照 は , 値 を 計算 し て , 式 の 評価 の 中 で 使用 する た め (C 
そ の 値 を 関数 参照 に 戻す 。 


2 つの プロ シー ジャ ー の 間 の 連絡 は , 呼出 し 側 の プロ シー ジャ ー 
か ら 呼 び 出 され る 側 の プロ シー ジャ ー《C す 数 を 渡し た り , 呼び 出さ 
れる 側 の プロ シー ジャ ー か ら 値 を 返し た り , 両方 の プロ シー ジャ ー 
の 中 で 知ら れ て いる 名 前 を 用 いた りす る と と C よ っ て 行なわ れる 。 
し た が っ て , プロ シー ジャ ー は , 別 の 地点 みか ら 呼び 出さ れれ ば , 別 
の デー タ を 使っ て 働く こと が で きる 。 RETURN ステ ー ト メン ト 
を 用 いて , 関数 プロ シー ジャ ー か と 関数 参照 に 値 が 返さ れる 。 


ENTRY ステ ー ト メン ト 


ENTRY ステ ー ト メン ト は , ある プロ シー ジャ ーK 対 し て 代 奉 の 
入口 点 を 設け , 場合 に よっ て は , その 入口 点 K 応 し た 代替 の ペラ メ 
ー タ ー・ リ スト を 作っ て 引数 を 渡す と と が で きる よう (CC する も の で 
ある 。 


注 : ENTRY ステ ー ト メン ト は , それ が 入っ て いる プロ シー ジャ 
ー へ の 入口 点 を 指定 する も る の で あっ て , ENTRY 属性 と は 違う と 
と 注意 し て いた だ きた い 。 ENTRY 属性 た つい て は , 第 9 章 
「 サ プル ー チ ン と 関数 」 の と と ろ で 説明 する 。 


BEGIN ステ ー ト メン ト 


開始 プア ロック (BEGIN ステ ー ト メン ト と それ 関連 する END 
スネ ステー トメント と (て よ っ て 区 切 られ て いる ブロ ッ ク ) の 中 で も , 局 
部 的 を 名 前 の 定義 を する と と が で きる 。 開始 ブロ ッ ク は , その 中 
含ま れる ステ ー ト メン ト が , 制御 の 流れ と いう 目的 か ら み て 1 つの 
存在 と 考え られ る と と を 指定 する も の で ある 。 開始 ブロ ッ ク の 最も 
一 般 的 を 用 法 の 1 つと し て , ON ステ ー ト メン ト の オン ・ ユ ニッ ト 
と し て 使用 する 場合 な あげ られ る 。 と の 場合 は , 正規 の 制御 の 流れ 
を 通っ て きた 結果 で は な く , 指定 の 条件 が 起 っ た と きだ け 実 行き 
れる 。 開始 ブロ ッ ク は , ある 種 の 自動 記憶 域 が 割り 振ら れる プロ 
グラ ム の セク ショ ン を 区 切る た め C も 有効 で ある 。 


各々 の 開始 プ ブロック は , プロ ンー ジャ ー ま た は 別 の 開始 プロ ッ ク 
の 中 に ネス ト し な けれ ば な を なら を な を い 。 


END ステ ー ト メン ト 


END ステ ー ト メン ト は , ブロ ッ ク ま を た は グル ー プ の 終り を 指示 す 
る た め C 用 い られ る 。 プ ロッ ク ま を た は グル ー プ は いずれ も , END 
ステ ー ト メン ト を も っ て いな けれ ば な らら な い 。 し か し , END ステ 
ー ト メン ト は , 明示 する と と も る も, 暗示 する と と も で きる 。 つまり, 
END と いう キー ワー ド の 後 (C(, ネス ト さ れ た ブロック を 含む ブロ 
ッ ク ま た は グル ー プ の ラベ ル を 記入 する こと に よっ て , 1 つの END 
ステ ー ト メン ト を , いく つも の ネス ト さ れ た ブロ ッ ク ま た は グル ー 
プ K 適 用 する と と が で きる 。 と の よら に て すると, その 他 の END ス 
テー トメ ント は , その ラベ ル を 含ん で いる も の よっ て 暗示 され る 
の で , 明示 的 に 与え る 必要 が を い 。 END の 後 C ラ ベル が な い 場 合 
は , その ステ ー ト メン ト は , 1 つの グル ー プ また は ブロ ッ ク KC だ け 
適用 され る 。 


ある プ ブロック KK 対し て END ステ ー ト メン ト が 実行 され る と , そ 
の プ ブロック は は 終了 する 。 し か し , 各 ブ ロッ ク は END ステ ー ト メン 
ト を も っ て いな を けれ ば を な ら を い が , と れ が ブロ ッ ク を 終了 させ る 唯 
ーー の 手段 と いう わけ で は ない 。 た と えば , RETURN ステ ー ト メ 
ント を 実行 する と と よっ て , プロ シー ジャ ー を 終了 させ る と と も 
で きる ( 「 制 御 ス テー トメ ント 」 の 項 を 参照 ) 。 


グル ー プ KK 対し て END ステ ー ト メン ト を 実行 し た と き の 効 果 は , 
その グル ー プ が 反復 する も る の で ある か どう か に よっ て 異 を る 。 反復 


- す る グル ー プ の 場合 は , END ステ ー ト メン ト を 実行 する と , すべ 


て の 反復 が 完了 する まで ( その 前 に グル ー ブ の 外 制御 が 渡さ れ な 
い 限 り ), グル ー プ の 先頭 制御 が 戻さ れる 。 ( 「 制 御 ス テー トメ 
ント 」 の 項 を 参照 ) 。 反 復 し を たい グル ー ブ の 場合 は , END ステ ー 
トメ ント は , 単に グル ー プ を 区 切る だ け の 働き を し て (ブロ グラ ム 
論理 の 中 で 1 つの 単位 と し て グル ー プ が 扱わ れる よら C す る ), 次 
の ステ ー ト メン ト K 制 御 を 渡す 。 


記憶 域 制 御 ス テー トメ ント 


PL/1 で 決め られ て いる 多く の 他 の 約束 事 と 同じ ょ う , 記憶 域 割 
振り に関する 約束 事 も , ブロ グラ マー は 打ち 消す と と が で きる 。 多 
く の 変 数 の 場合 , 記憶 域 タ ラス の 属性 AUTOMAT ITC が 想定 され る 。 
レ か し , 変数 C 対 し て STATIC を 宣言 する と と も で きる し (と 
の 場合 は , その プロ グラ ム の 間 中 割り 振ら れる ) , CON- 

TROLLED ま を た は BASED を 宮 言 する と と も で きる (と の 場合 は , そ 
の 割 振り は , プロ グラ マー て よっ て 明示 的 KC 指定 する と と が で きる ) 。 


ALLOCATE お よび FREE ス テー トメ ント 


ALLOCATE ステ ー ト メン ト は , ブロ ッ ク の 境界 と は 無関係 と , 


被 制 御 な よび 基底 付 デ ー タ KC 対し て 記憶 域 を 割り振る た め K 用 い 
られ る 。 被 制御 配列 の 限界 , 被 制御 スト リン グ の 長 さ , お よび 被 制 
御 域 の サイ ズ は , それ ら の 初期 値 と 同様 ,。 ALLOCATE ステ ー 
トメ ント が 実行 され る と き 《 指 定 す る と と も で きる 。 FREE ステ 
ー ト メン ト は , 被 制御 ぉ ょ び 基 底 付 の 記憶 域 が 割り 振ら れ た あと , 
それ を 解放 する た め C 用 いら れる 。 


制御 ステ ー ト メン ト 


一 般 (C,。 PL プ 1 プロ グラ ム の 中 の ステ ー ト メン ト は , 割込み が 起 
っ た り , 次 に あげ る 制御 ステ ー ト メン ト の いずれ か が 実行 され る と 
と CK よ っ て , 制御 の 流れ が 修正 され を い 限 り , 順番 実行 され る 。 


GO TO 
IF 

DO 
CALL 
RETURN 
END 
STOP 


GO TO ステ ー ト メン ト 


GO TO ステ ー ト メン ト は , 無 条 件 プラ ンチ と し て 使用 され る 。 
GO TO の 行先 が ラベ ル に よっ て 指定 され て いる と き は , 値 と し 
て いく つか の ラベ ル 定 数 を 割り 当て る と と IC よ っ て , ラベ ル 変 数 へ 
の スイ ッ チ と し て 使用 する と と が で きる 。 


ラ ベル 変数 に 添字 が つい て いる 場合 は , 添字 を 変え ん る と と CC よっ 
て , スイ ッ チ を 制御 する こと が で きる 。 GO TO ステ ー ト メン ト 
の 行先 は , ラ ベル の 値 を 返す 関数 参照 C よ っ て も 指定 する と と が で 
きる 。 ラ ベル 変数 また は 関数 参照 を 使用 する と と (て よって, 非常 と 
微 妙 を スイッチ ング の 効果 を 得る こと と が で きる 。 た だ し , 制御 ステ 
ー ト メン ト を 人 科 単 C す る 方 が 効率 が よい と と は , 確か で ある 。 


GO TO ステ ー ト メン ト の キー ワー ド は , 1 つま た は 2 つつ 以 上 
の プラ ンク で 区 切っ て 2 語 C し て 書い て も よい し , GOTO と 1 語 
で 書い て も よい と 。 

IF ステ ー ト メン ト 
IE ステー トメ ント 計 , 最も よく 用 いら れる 条件 プラ ンチ を 設定 す 
る も の で あり , 通常 , IF と いら 9 語 の 後 C 単 純 比較 式 と いっ し ょ KK 


用 いら れる 。 た と えば げ , 


IF A = B 
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THEN 真 の と き の 処 財 
ELSE 偽 の と き の 処 軒 


THEN ま た は ELSE ク ロー ズ は , 単 一 また は 複合 ステ ー ト メン 
ト , DO グル ー プ ( 「DO ス テー トメ ント 」 の 項 を 参照 ), また は 
開始 ブロ ッ ク の いずれ か か ら 構 成 さ れる 。 比 較 の 結果 が 真 を ら は ば, 
THEN クロ ー ズ が 実行 され る 。 THEN クロ ー ズ が 実行 され た あ 
と は , ELSE ク ロー ズ は 実行 され ず , 次 の ステ ー ト メン ト か とら と 実 
行 が 続け られ る 。 THEN クロ ー ズ の 中 C, GO TO ステ ー ト メ 
ント , また は 制御 を 別 の と と ろ KC 移 す た め の 何 か 他 の 制御 ステ ー ト 
メン ト が 含ま れ て いて も よい と と 注意 し て いた だ きた い 。 


比較 の 結果 が 偽 を た ら ば , PLSE クロ ー ズ だ けが 実行 され る 。 そ 
の ぁ と , 制御 は 通常 通り 続け られ る 。 


IF ステ ー ト メン ト は , 次 の よう CK 書く こと が で きる 。 


IF AB 
THEN C = D: 
ELSE C = Bi 


A が B と 等 し いと き は , D の 値 が CK 割り 当て られ , ELSE ク ロ 
ー ズ は 実行 され を い 。 A が B と 等 し く を いと き は , THEN ク ロー 
ズ は 実行 され ず , の 値 が CC 割り 当て られ る 。 


THEN クロ ー ズ また は PLSE ク ロー ズ の どちら か C, プラン 
チ ( 条件 付 , 無 条 件 の どちら で も ) を 引き 起す よう な 制御 ステ ー ト 
メン ト を 含め る と と が で きる 。 た と えば , THEN ク ロー ズ KCGO 
TO ステ ー ト メン ト が 含ま れ て いる と すれ ば , ELSE クロ ー ズ を 
指定 する 必要 は を い 。 次 の 例 つ いて 考え て 人 みよ う 。 


TE AB 
THEN GO TO LABEL_ 1 
次 の ステ ー ト メント 


A が BC 等 し けれ ば , THEN ク ロー ズ の GO TO ステ ー ト メン ト 
(C よ っ て , LABEL 1 KC 無 条件 C ブ プラ ンチ する 。 A が B と 等 し 
く な けれ ば , THEN クロ ー ズ は 実行 され な い の で , 次 の ステ ー ト 
メン ト が IFE ス テー トメ ント KK 関連 する ELSE クロ ー ズ で ある か 
と りら か C は 関わ り を く , 制御 は 次 の ステ ー ト メン トト KK 渡さ れる 。 


注 : THEN ク ロー ズ 人 よっ て 制御 の 移動 が 引き 起 さ れず , し か も そ 
の 後 C ELSD ク ロー ズ も な いと い う 9 場 合 は , THEN クロ ー ズ が 実 
行 さ れる か ど 2 か KC は 関係 なく, 次 の ステ ー ト メン ト が 実行 され る 。 


IF と いう キー ワー ド の 後 C 書 く と と の で きる 式 は , 要素 式 だ け 
で ある 。 配列 式 や 構造 式 は 許さ れ を な い 。 し か し , 2 つ 以 上 の 演算 子 
を 使用 す る 論理 式 は 許さ れる 。 た と えば , 

IF A = B gg CD 
THEN GO TO Ri 
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ネス ト さ れ た IF ステ ー ト メン ト を 用 いて も , 同じ 種類 の テス ト を 
行なう とこ と が で きる 。 以下 の 3 つの 例 は 同じ も ゃ の で ある 。 


例 1: 
IF A= テ BEg CD 
THEN GO TO Ri 
B = B 十 1 


例 2: 
IF AB 
THEN IF CD 
THEN GO TO Ks 


例 3: 
IF A 一 三 B THEN GO TO Si 
IF C - 三 D THEN GO TO S 
GO TO Ri 

S : B = B 士 13 


DO ステ ー ト メン ト 


DO ステ ー ト メン ト は , ルー プ を 通る た び K 制 御 変数 を 増やし を が 
ら 指 示さ れ た 回 数 だ な け ス テー トメ ント の グル ー プ を 実行 する よう 指 
定 す る た め KC, 最も よく 用 いら れる 。 こ と の よう な グル ー プ は , 次 の 
よう な 形式 に と する と と が で きる 。 


DO ji = 1 TO 10 ぉ 


END3 


反復 し て 実行 され る ステ ー ト メン ト は , DO ステ ー ト メン ト と 関連 
する END ステー トメント と (CC よっ て 区 切ら な けれ ば を ら な い 。 上 
の 場合 は , 制御 変数 1 の 値 が 1 か ら 10 まで 変っ て ゆく 間 (C, ステ 
ー ト メン ト の グル ー プ が 1 0 回 実行 され る 。 と の DO お よび END 
ステ ー ト メン ト の 効果 は , 次 の よう に し た 場合 と 同じ で ある 。 


1 三 1 
A: IFE 1 > 10 THEN GO TO Bs 


1 デ T 十 1 
GO TO Ai 
B: 次 の ステ ー ト メン ト 


制御 変数 は , テス ト さ れる 前 増やさ れる と と , お よび 一 般 C, DO 
ステ ー ト メン ト の 中 で セッ ト さ れ て いる 限界 を 制御 変数 が 越え た と 


き (C て だけ, その グル ー プ の 後 (( あ る ステ ー ト メン ト K ん 制御 が 移る と 
と 注意 し て いた だ きた い 。 最後 の 反復 が 終了 し た あと で 制御 変数 
を 参照 する と , 変数 の 値 は 指定 され た 限界 より も 1 だ け 大 きい ゃ の 
代 を っ て いる 。 


DO ステ ー ト メン ト は , 制御 変数 を 用 い ず C, WHILE オプ シ 
ョ ン を 用 い て, 次 の よら 使用 する と と も で きる 。 


DO WHILE (A = B): 


と の ステ ー ト メン ト を グル ー ズ グ の 先頭 に 置く と , A の 値 が B の 値 と 
等 しい 限 り , その グル ー プ は 繰 返 し 実行 され る 。 


次 の 形式 の 制御 変数 と WHILE オォ オプ ショ ン を 結び つけ る と と が 
で きる 。 


DO 1 = 1 TO 10 WHILE (A ビデ B): 


と の ステ ー ト メン ト は , 2 つの テス ト を 指定 し て いる 。 1 が 増加 す 
る た び (C, I が 10 を 越え て いな いか どう か テス ト が 行なわ れる 。 
その あと , A が BC 等 し いか どう か を みる 追加 の テス ト が 行 を われ 
る 。 両方 の 条件 が 満足 され た と き に だ け , その グル ー プ の ステ ー ト 
メン ト が 実行 され る 。 


1 つの DO ステ ー ト メン ト の 中 MC, 2 つつ 以 上 の 指定 を 含め る と と 
が で きる 。 次 に あげ る DO ステ ー ト メン ト の 各々 に つい て 考え て 信 
よう 。 


DO 【[ = J,K 
DO 1 PO 8 2 生 O. 45* 
DO Ii 1 TO 10。 11 WHILE (A = B): 


最初 の ステ ー ト メン ト は , 1 の 値 を J の 値 と 等 し く モ キット し て 1 
回 だ け DO グル ー プ を 実行 し , さら MK I の 値 を K の 値 C 等 し く セ ッ 
ト し て 1 回 だ け 実 行 す る と と を 指定 する 。 


2 番目 の ステ ー ト メン ト は , 合計 13 回 (IT の 値 を 1 か ら 10 ま 
で に し て 10 回 , さら (CI の 値 を 1 る 3 から 15C し て 3 回 ) DO グ 
ルー プ を 実行 する ょ うら 指定 し て いる 。 3 番目 の DO ステ ー ト メン ト 
は , 最低 1 0 回 と の グル ー プ を 実行 し その あと , (A と B が 等 し 
けれ ば ) さら KC 1 回 実行 する と と を 指定 し て いる 。『 1 1『 の 後 
WBY 0 を 揮 入 し た 場合 は , A と B が 等 し らい 限り 1i が 11K セ 
ッ ト さ れ た 状態 で 実行 が つづ けら れる 。 ど ちら の ステ ー ト メン ト の 
場合 も, カン マ を 用 いて 2 つの 指定 が 区 切 られ て いる と と 注意 し 
て いた だ きた い 。 と れ は , 前 の 指定 が 満足 させ られ た あと で だ け , 
後 の 指定 を 考慮 する と と を 表わし て いる 。 


DO ステ ー ト メン ト の 制御 変数 は , DO グル ー ブ 内 の ステ ー ト メ 
ント の 中 で 添字 と し て 使用 する と と が で きる の で , 各々 の 反復 で テ 
ー プ ブル また は 配列 の 連続 する 要素 を 処理 する と と が で きる 。 たとえ を 
ば , 


DO 1 = 1 TO 10j 
A(I) 三 Ti 
ENDj 


と の 例 で は A の 最初 の 1 0 個 の 要素 は 。 それ ぞ れ 1, 2, ・……。 
10 と いう よう て セ ッ ト さ れる 。 


反復 指定 の 中 の 増分 は , 何 か 他 の 値 が 指定 され て いない 隈 り (た 
と えば 次 の よら (C ), 1 と み を され る 。 


DO 1 = 2 TO 10 BY 2 


と の 例 は , I の 値 を 2, 4, 6, 8, お よび 10C し て ルー プ を 5 
回 実行 する と と を 指定 し て いる 。 


反復 し な い DO ステ ー ト メン ト 


DO ステ ー ト メン ト で , DO グル ー プ の ステ ー ト メン ト を 繰 長 し 
実行 する と と を , 必ず し ゃ 指定 し を な く て も よい 。 単純 な DO ステ 
ー ト メン ト を DO グル ー プ と 結び つけ て , 次 の よう 用 いる こと も ゃ 
で きる 。 


DO 


END: 


と の よう KK し て 単純 を な DO ステ ー ト メン ト を 使用 し て いる 場合 は , 
単に く , DO グル ー プ を 論理 的 C 1 つの ステ ー ト メン ト と し て 扱 ク と 
と を 表わし て いる 。 と の 方 法 は , IF ステ ー ト メン ト の THEN ク 
ロー ズ ま を た は ELSE クロ ー ズ で 実行 され る いく つか の ステ ー ト メ 
ント を 指定 する の に 用 いる こと と が で きる が , と の よう に C す れ ば , 開 
始 プ ロッ ク を 用 いな く て も 制御 の 順序 を 維持 する と と が で きる 。 


CALL ,RETURN , お よび END ス テー トメ ント 


サ プ ル ー チ ン は , その サブ ルー チン の 入口 点 を 指名 する CALL ス 
テー トメ ント を 用 いて 呼び 出す と と が で きる 。 サ ブル ー チ ン の 中 で 
RETURN ステ ー ト メン ト が 実行 され た と き , ま を は END ス テ 
ー ト メン ト が 実行 され て サブルーチン が 終了 し た と き K, 活用 化 ま 
た は 呼出 し を し た プロ シー ジャ ー を 制御 が 戻さ れる 。 


関数 参照 C 値 を 返す と き は , 括弧 で 囲ん だ 式 を も つ RETURN 
スネ ステート メン ト を 関数 プロ シー ジャ ー の 中 で 使用 する 。 と の 形式 は , 
関数 参照 に よ っ て 呼び 出さ れ た プロ シー ジャ ー か ら 値 を 返す た め C 
用 いら れる も の で ある 。 
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プロ グラ ム が 正常 終了 する の は , 主 プ ロン シー ジャ ー で 最終 的 を 
END ステ ー ト メン ト が 実行 され る か , 主 プ ブロ シ ー ジ ャ ー で 
RETURN ステ ー ト メン ト が 実行 され て , 呼出 し レブ ログ ラム ( オ 
ペレ ー テ ィング ・ シ ステ ム で あっ て も よい ) 制御 が 戻っ た と き で 
ある 。 そ れ 以 外 の 方 法 に よる ブロ グラ ム の 終了 は , 異常 終了 で ある 。 


STOP ステ ー ト メン ト 


STOP ステ ー ト メン ト は , ブロ グラ ム を 異常 終了 させ る た め に 用 
いら れる 。 


例外 制御 ステ ー ト メン ト 


と れ ま で KC 説明 し て きた 制御 ステ ー ト メン ト は , 実行 され た と きつ 
ね 制御 の 流れ を 変え た る も の で ある 。 実行 の 順序 を 変更 する と と の 
で きる も うら 一 つの 方 法 は , 例外 条件 が 起 っ た と き に プロ グラ スム 割 込 
み を 引き 起す 方 法 で ある 。 


一 般 的 に 云え ば , 例外 条件 と は , 予期 し を た いと と (た と えば げ 桁 あ 
ふれ な ど ) が 起こ る と と , ある い は 予期 し て は いる が 起 と る 時 点 を 
予測 で き を い ( たとえば, ファ イル の 終り な ど ) と と が 起 と る と と 
で ある 。 と の よう な 条件 の 取扱 いと 関す る 詳細 は , 第 14 章 「 例 外 
条件 の 取扱 いと プロ グラ ム ・ チ ェ ッ クア ウト 」 の と と ろ を みて いた 
だ きた い 。 


例外 制御 ステ ー ト メン ト C は , ON ステ ー ト メン ト , REVERT 
ステ ー ト メン ト , お よび SIGNAL ステ ー ト メン ト の る つが ある 。 


ON ステ ー ト メン ト 


ON ステー トメント は , と の 後 で , 指定 され た 条件 が 起 っ た た め K 
ブロ グラ ュ 割 込み が 引き 起 さ れ た と き C と る べき 処置 を 指定 する た 
め に 用 いら れる も の で ある 。 ON ステ ー ト メント は , 様々 な 条件 の 
いずれ か KC 対 し て と る べき 特定 の 処置 を 指定 する と と が で きる 。 と 
の よう な 条件 の いずれ K 対 し て も , PLI の 一 部 と し て 標準 的 な 
シス テム 和 置 が 用 意 さ れ て ぉ り , 割込み が 起 っ た と き (CON ステ ー 
トメ ント が 有効 に な っ て いな を けれ ば げ , 標準 的 を シス テム 処罰 が と ら 
れる 。 ほ と ん どの 場合 , 標準 的 を シス テム 処置 は 。 メッセージ を 印 
刷 し て , 実行 を 終ら せる と と で ある 。 


ON ステ ー ト メン ト は , 次 の よう な 形式 を と る 。 


ON 条件 (SNAP〕 {SYSTEM:| オン ・ ユ ニット } 


W 条件 『 C は , H 節 「ON 条 件 」 の と と ろ C リ スト され て いる 条件 
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の いずれ か を 記入 する 。 "オン ・ ュ ユニット 『 は , その 条件 が 生じ て , 
割込み が 起 っ た と き に と る べき 処置 を 指定 する 単 一 の ステ ー ト メン 
ト ま た は 開始 プア ロッ ク で あ る 。 た と えば げ , 


ON ENDFILE(DETAIL) GO TO NEXT_MASTER: 


と の ステ ー ト メン ト は , DETATIL と いう 名 前 の ファ イル の 終り 
を 越え て 読も る うと し て 割込み が 起 っ た と き に KC, NEXT_MASTER 
と いう ラベ ル の つい た ステ ー ト メン ト K 制 御 を 移す と と を 指定 し て 
いる 。 


オン ・ ユ ニッ ト の 実行 が うろ まく 完了 し た と き は , 割込み を 引き 起 
し た 条件 如何 に よっ て , 割込み の あっ た 地点 か また は その すぐ 後 の 
地点 <, 制御 が 正常 に 戻さ れる 。 


ON ステ ー ト メン ト の 効果 す を わ ち ォ オン ・ ユ ニッ ト の 設定 は , 
(1) 別 の オン ・ ユ ニッ ト ま た は SYSTEM と い 29 語 (標準 の シス 
テ ュ 処 講 (< 設定 し 直す ) を も つ , 同じ 条件 を 指名 する 別 の ON ステ 
ー ト メン ト を 実行 する か , また は (2) その 条件 を 指名 する RE 一 
VERT ス テー トメ ント を 実行 する と と に よっ て , 1 つの ブロ ッ ク 内 で 
変更 する と と が で きる 。 別 の プロ ッ ク が 活用 化 さ れる と き K 効 力 を 
も っ て いた オン ・ ユ ニッ ト は , 同じ 条件 (対す る 別 の ON ステ ー ト 
メン ト が 実行 され を い 限 り , 活用 化 さ れん た プロ ッ ク お よび さら K そ 
れ じ によって 活用 化 さ れ た ブロ ッ ク の 中 で も 効力 を も 続け る 。 活用 
化 を 行なっ た ブロ ッ ク K 制 御 が 戻っ た と き , オン ・ ユ ニッ ト は は 元 通 
り 《 再 設定 され る 。 


REVERT ステ ー ト メン ト 


REVERT ステ ー ト メン ト は , その ステ ー ト メン ト が 記入 され て 
いる ブロ ッ ク の 中 で す で K 実 行 さ れ た , 同じ 条件 に 対す る すべ て の 
ON ステー トメ ント の 効力 を 取り 消す た め K 有 用 いら れる も の で ある 。 


REVERT ステ ー ト メン ト (条件 名 を 必ず 指定 し な けれ ば な ら 
を ない ) は , 現在 実行 中 の ブロック が 呼び 出さ れ た と き , それ を 括 
用 化し た ブロ ッ ク の 中 で 効力 を も っ て いた オン ・ ユ ニッ ト K 設 定 し 
直す 働き を も っ て いる 。 


SIGNAL ステ ー ト メン ト 


SIGNAL ステ ー ト メン ト は , 指名 され た 条件 CK 対す る 割込み を 
起す ょ 9 促す 働き を も っ て いる 。 と の ステ ー ト メン ト は , ON ステ 
ー ト メン ト を 実行 する と と C よ っ て 設定 され る オン ・ ユ ニッ ト の コ ュ 
ー デ ィング を テス ト す る た め K 用 いる と と が で きる 。 たとえば, 


SIGNAL OVERELOW: 


と の ステ ー ト メン ト は , 桁 あ ふれ に よる 割込み が 起 と る よ 2 促し 
OVERFLOW 条件 KC 対 し て 設定 され た オン ・ ユ ニッ ト を 実行 さ 
せる も の で ある 。 オン ・ ユ ニッ ト が 設定 され て いな を めい め 場 合 は , その 
条件 対す る 標準 の シス テム 処 置 が 実行 され る 。 


プリ プロ セッ サー・ ス テー トメ ント 


PL グ I で は コン バイ レー ショ ン 中 原始 プロ グラ ム の 内 容 を あ 
る 程度 ま で 制御 で きる よう (て な っ て いる 。 た と えば , プロ グラ マー 
は , 原始 プロ グラ ム の 中 に ある 識別 名 を 変更 する こと と を 指定 する と 
と が で きる し , ブロ グラ ム の 一 部 分 だ け を 他 の 部 分 と は 別に コン バ 
イル する よ 9 選択 する と と も 可能 で ある 。 また, 外部 に ある 原始 ブ 
ログ ラム か ら テ キス ト を 組み 入れ る と と も で きる 。 と の よう な 操作 
は , コン バイ ラー の ブリ ブロ セッ サー 段階 で 実行 され る よ 2C に な っ 
て おぉ おり, 原始 アプ ログラム 自 体 の 中 に ある 他 の ステ ー ト メン ト の 間 K 
出 て くる プリ プロ セッ サー・ ス テー トメ ント (よっ て 指定 され る 。 


一 般 (C, プリ プロ セッ サー・ ス テー トメ ント は , キー ワー ド の 前 
(C バ パー セン ト 記 号 を つけ る と と (よっ て , 識別 され る 。 そ の 2 うち の 
いく つか は , 標準 の PL ルプ I ステ ー ト メン ト の キー ワー ド と 同じ で 
あり , コン ペイル 時 に なけ る と の 効果 は , それ が 実行 中 に 出 て きた 
と き と 同 じ で ある 。 


次 C, プリ プロ セッ サー・ ス テー トメ ント の すべ て を 記載 し た リ 
スズ ト を あげ る 。 


%ACTIVATE 
穴 assignment 
穴 DBACTIVATE 


%DECLARE 


%DO 

%END 

%GO TO 

%IF 

%INCLUDE 

% ナ ル 

PROCEDURE 
プリ プロ セッ サー RETURN 


と れ ら の ステ ー ト メン ト KC つ いて は , 第 15 章 「 コ ンズ ベイル 時 の 機 
能 」 と J 節 「 ス テー トメ ント 」 の と と ろ で 説明 し て ある 。 


リス ティ ンク 制御 ステ ー ト メン ト 


印刷 の 際 C 行 を スキ ッ プ する こと と (CC よっ て , ブロ グラ ム の リス ティ 

ング の 形式 を ブロ グラ マー が 制御 する と と が で きる よう な ステ ー ト 

メン ト が 2 つ あ る 。 そ の ステ ー ト メン ト は 次 の 2 つ で ある 。 
%PAGE 


SKIP 


と れ ら に つい て は , 第 16 章 「 コ ン バ ベイ ル 時 の 機能 ]」 の と と ころ を 分 
て いた だ き た ゆい 。 


と れ ら は 先頭 K% 記 号 を つけ て は いる が , プリ プロ セッ サー を 使 
用 する 必要 は を い 。 
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第 6 章 プロ グラ ム の 構成 


と の 章 で は , PL プ I ブロ グラ ム を 形成 する と き (C, どの よう て ステ 
ー ト メン ト を 構成 し て ブロ ッ ク ( に する と と が で きる か , ブ ログ ラム の 
中 で , ある ステ ー ト メン ト の ブロ ッ ク か ら 別 の ブロ ッ ク K 制 爺 が と 
の よら K 流 れ て ゆく か , ステ ー ト メン ト の ブロ ッ ク の 中 で デー タク 
対し て どの よう KC 記 人 憶 域 を 割り 振る と と が で きる か , と いう と と 
に つい て 説明 する 。 


プ ブロッ ク 


プロ ッ ク は , 区 切ら れ た 一 連 の ステ ー ト メン ト で あり , ブロ グラ ム 
の セク ショ ュ ン を 構成 する も る の で ある 。 ブロ ッ ク (C て すると, その ブロ 
ッ ク の 中 で 宣言 され た 名 前 が 局部 的 を た も ゃ の なり, 変数 の 割 振り が 
限定 され る 。 ブ ロッ ク (C は , プロ シー ジャ ー・ ブ ロッ ク と 開始 ブロ 
ッ ク の 2 種類 が ある 。 と の コン バイ ラー で は , 1 回 の コン バイ レー 
ンション で 最高 2 5 5 個 の ブロ ッ ク を 受け 入れ る と と が で きる 。 


プロ シー ジャ ー・ ブ ロッ ク 


プロ シー ジャ ー・ ブ ロッ ク ( 単 に ブロ シー ジャ ー と ゃ 呼ば れる ) は , 
以下 の よう な を 形 で , 先頭 CKPROCEDURE ス テー トメ ント , 末尾 
IC END ス テー トメ ント を つけ て 区 切ら れ を 一連 の ステ ー ト メン ト 
で ある 。 


PROCEDURE: 
END〔( ラベ ル 〕: 


プロ シー ジャ ー 名 は , 制御 が プロ シー ジャ ー 移 る と き に そ と を 
通る 主 本 を 入口 点 で ある か ら , すべ て の プロシージャー を 名 前 を つ 
け な け れ ば な ら な い 。 し た が っ て , PROCEDURE ス テー トメ ン 
ト は, 少なくとも 1 個 の ラベ ル を つけ な けれ ば な を ならない 。 END 
ネス テー トメント の END と いう キー ワー ド の 後に ラベ ル を 記入 する 
必要 は を い が , も し 記入 する を ら ば , その ENE ス テー トメ ント 
対応 する PROCEDURE ス テー トメ ント の ラベ ル ( ま を た は いく つ 
か の ラベ ル の うち の 1 つ ) と 一 致し て いな けれ ば を ら な い 。 ( 例外 
が いく つか ある が , それ ら に つい て は , と の 章 の 「 ネス ト さ れ た プ 
ロッ ク ぉ と よび DO グル ー プ CC お ける END ス テー トメ ント の 用 法 」 
の 項 を みて いた だ きた い 。 ) 次 に あげ る の は , ブロ シー ジャ ー の 例 
で ある 。 


A: READIN: PROCEDURE: 
ステ デート メシ ドモ コ 1 


ステ ー ト メン トー2 


ステ ー ト メン トーn 
END READIN: 


一 般 に , プロ シー ジャ ー の 名 前 ( また は いく つか の 名 前 の う ちの 
1 つ ) を 参照 する と と に よっ て , 制御 が プロ ンー ジャ ーMC 移 され る 。 
し た が っ て , 前 記 の 例 の プロ シー ジャ ー の 場合 は , その 名 前 の い ず 
れ か ( A ま た は READIN ) を 参照 する と と (と ょ よって, 制 仙 が 与 
えら れる 。 


PL ノ I プ ログ ラム は , と の よう を ブ プロシージャー が, 1 つま た は 
2 つ 以 上 集 っ て 構成 され て おぉ お り , その 各々 (C 他 の プロ シー ジー を お よ ょ 
び プ また は け 開 始 ア ロ ッ ク を 含め る と と が で きる 。 


開始 プ ブロック 


開始 ブロ ッ ク は , 以下 の よう な 形 で , BPGIN ステ チー トメ ント て 
始ま り , END ス テー トメ ント で 終る 1 組 の ステ ー ト メン ト で ある o 


[ ラベ ル : ]… BEGIN: 


END[ ラベ ル 〕 : 


開始 ブロ ッ ク の 場合 は , , プロ シー ジャ ー・ ブ ロッ ク と は 異な り , 
ラベ ル は 任意 選択 で ちあ る 。 BEGIN ステ ー ト メン ト の 前 (C1 つま 
た は 2 つ 以 上 の ラベ ル が つい て いる と き は , それ は 単に ブロ ッ ク の 
開始 点 を 識別 する 働き し か し な い 。 ( その ブロ ッ ク の 名 前 を 参照 せ 
ず , 正規 の 順次 的 を 実行 を 通じ て , 開始 プロ ッ ク KC 制 側 を 六 す と 
と が で きる 。 た だ し , GO TO ステ ー ト メン ト を 実行 する と と にょ 
っ て , ラベ ル 付 の BEGIN ステ ー ト メン ト K 制 御 を 移す と と も で 
きる 。 ) 

END の 後 の ラ ベル は , 任意 選択 で ある が , 対応 する BEGTIN ス 
テー トメ ント の ラベル と 一 致し て いれ ば , END の 後に ラベ ル を 記 
入 す る と と が で き る 。 ( 例外 が いく つか ある が , それ ら に つい て は , 
と の 章 の 「 ネ スト され た プ ブロック お よび DO グル ー プ に お ける END 
ステ ー ト メン ト の 用 法 | の と と ろ を みて いた だ きた い 。 ) 次 に あげ 
る の は , 開始 プア ロック の 例 で ある 。 


B: CONTROL: BEGIN: 
ステ ー ト メン トー1 
ステ ー ト メン トー2 


炎 欧 で コー ド メ ダグ トド コ 
END B: 


プロ シー ジャ ー の 場合 と は 異な り , 開始 プロ ッ ク の 場合 は , 通常 
それ ら を 特別 C 参 照 す る と と に ょ っ て 制御 を 渡す と いう と と は し な 
い 。 ど く 普 通 の 場合 の え テ ー ト メン ト 実 行 の 際 に と られ る 制 叙 の 順 
序 が 。 その まま 開始 ブロ ッ ク の 実行 に も 適用 され る 。 前 の ステ ー ト 
メン ト が 実行 され た あと , 制御 は 大 序 通り 開始 プア ロッ ク K 渡 され る 。 
唯一 の 例外 は , ON ステ ー ト メン ト の 中 で オン ・ テ ニット と し て 用 
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いら れる 開始 ブロ ッ ク の 場合 で , と の 場合 は , 指定 され た 条件 が 起 
っ た と きだ け , その ブロ ッ ク が 実行 され る 。 


開始 ブロ ョ ッ ク は , PL プン IT ブログ ラム を 構成 する 際 人 不可 欠 の も の 
で は な い 。 し か し , ブ プログラム の ある 特定 の 区 域 を 区 切る の 開始 
プ ブロッ ク を 使用 する と 便利 を 場合 が ある 。 と の よう な 利点 に つい て 
は , 本 章 な よび 第 7 章 「 名 前 の 認定 ] の と と ろ で 説明 する 。 


内 部 ブロ ッ ク と 外部 ブロ ッ ク 


どの よう な プ ブロック も ゃ も , 1 つま た は 2 つ 以 上 の ブロ ッ ク を 含む と と 
が で きる 。 つ まり , プロシージャー は , 開始 アロ ッ ク と 同様 , 他 の 
ブ プロシージャー や 開始 ブロック を 内 蔵 す る こと が で きる 。 しかし, 
プ ブロック の オォ オー バー ラッ プ は 許さ れず , 別 の ブロ ッ ク を 含む ブロ ッ 
ク は , その ブロ ッ ク を 完全 包含 し て い を けれ ば な ら な い 。 


別 の プロ ッ ク の 中 含ま れる ブロ シー ジャ ー・ ブ ロッ ク は , 内 部 
プロ シー ジャ ー と 呼ば れる 。 


別 の ブロッ ク の 中 低 含ま れ て いな を ない ブロ ッ ク は , 外部 ブ プロ シー ジ 
ャ ー と 呼ば れる 。 


PL プ {I ブ ログ ラム (CC は , 少 を なく と も 1 つの 外部 プロ シー ジャ ー が 
を けれ ば な を なら な い 。 ( 注 : シス テム 360 お よび シス テ ュ グ 370 
の コン バイ ラー で は , 各々 の 外部 プロ シー ジャ ー は 別個 に コン ベイ 
ル さ れる 。 外部 ブ プロシージャー の 入口 名 は , 7 桁 を 越え を て は を ら な 
い 。 ) 


開始 ブロ ッ ク は つね K 内 部 ブロ ッ ク で あり , 別 の ブロ ッ ク 放 含ま 
れ て いな けれ ば な ならない 。 


内 部 プロ シー ジャ ー と 開始 プア ロッ ク は , ネス ト さ れ た プ ブロッ ク と 
も 呼ば れる 。 ネス ト さ れ た ブロ ッ ク が , さら (て ま た その 中 (て ネ スト 
され た ブロ ッ ク を 含ん で いて も よじ ら 。 一 番外 側 の プロ ッ ク は , つね 
(C ブ ロジ シー ジャ ー で な けれ ば な を なら な い 。 次 の 例 C つ いて 考え て みよ 
う 。 
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A: PROCEDURE: 
ステ ー ト メン ト 一 a 1 
ステ ー ト メン トー-a2 
ステ ー ト メン トーa3 
B: BEGIN: 
ステ ー ト メン トーb1 
ステ ー ト メン ト 一 b2 
ステ ー ト メン ト -b3 
END B: 
ステ ー ト メン ト 一 a4 
ステ ー ト メン トーa5 
C: PROCEDURE : 
外 ケ ー ド メント っ 1 
ペー トメ ンド ーー2 
D: BEGINj: 
ステ ー ト メン ト 一 d1 
ステ ー ト メジ ドニ d2 
ステ ー ト メメ トーd う 3 
E: PRKOCEDURE : 
ステ ー ト メン ト 一 e 1 
スネ ステー トメント 一 e2 
END EE: 
ステ ー ト メン ト 一 d4 
END Dj: 
END C: 
ステ ー ト メン ト 一 a6 
ステ ー ト メン トーa/ 
END Aj 


上 の 例 で , プロ シー ジャ ー・ ブ ロッ ク A は , 他 の どの プ ブロック を も 
含ま れ て いな を い の で , 外部 プロシージャー で ある 。 プ ロック B せ は , 

A 含 まれ る 開始 プロ ッ ク で ある が , その 中 別 の ブロック は 含ん 
で いな を い 。 ブ ロッ ク C は 内 部 ブ プロシージャー で , 開始 ブロ ッ ク D を 
含ん で お り , さら CD の 中 内 部 プロ シー ジャ ーE が 含ま れ て いる 。 


と の 例 で は , A か ら 相 対 的 C 数 を て , ネス ティ ング の レベ ル は 3 
つ あ る 。 B と C が 第 1 の レベ ル , D が 2 番目 の レベ ル ( C か ら み れ 
ば 第 1 の レベ ル ) , E が 3 番目 の レベ ル ( C か ら は 2 番目 , D か ら 
は 第 1 の レベ ル ) で ある 。 許さ れる ネス ティ ング の 最大 の 深度 は , 
5 0 で ある 。 


END ス テー トメ ント の 用 法 


プロ ジー ジャ ー, 開始 プ ブロック, また は DO グル ー ブ で の BND ス 
テー トメ ント の 用 い ゆい 方 に は , 次 の よう な 規則 が 適用 され る 。 


1. END の 後に ラベ ル が つい て い を ない 場合 は , その END ステ 
ー ト メン ト よ り る 物理 的 C 前 に あっ て し か ゃ 最も 近く CC ある 
BEGIN また は PROCEDURE ス テー トメ ント よっ て 
始ま る 。 ま た 閉じ られ て いな を ない ブロッ ク , また は DO ステ ー 


トメ ント よっ て 始ま る , まだ 閉じ られ て い を な い DO0O グ ルー 
プ を 閉じ る (つまり 終止 させ る )。 


2. END の 後 MC 任 意 選 択 の ラベ ル が つい て いる と き は , その ラ 
ベル と 同じ ラベ ル を も る もち, し か る 物理 的 に その END ステ ー 
トメ ント より 前 て あっ て 最も 近く に ある BEGIN, PRO- 
CEDURE, また は DO ステ ー ト メン ト で 始ま る , まだ 閉 
じ し ら れ て いな を い プ ロッ ク ま た は DO グル ー プ を 閉じ る 。 と の 
上 うら な を な プ ブロック また は DO グル ー プ の 中 C ネ スト され て いる , 
まだ 閉じ られ て いな を な い ブ ロッ ク ま た は DO グル ー プ は , と の 
END ス テー トメ ント (て よっ て 自動 的 に 閉じ られ る 。 と の 閉 
し 方 を , 複数 終止 と いう 。 


複数 終止 は ,。 いく つも の END ステ ー ト メン ト を 連続 し て 指定 す 
る と と (C か わる 簡便 方法 で ある 。 実際 (CC は , コン バイ ラー は , 複 
数 終止 を 指定 する END ステ ー ト メン ト の 直前 に , 必要 な 数 の END 
ステ ー ト メン ト を 挿入 する 。 た と えば , 次 の よう な 外部 ブロ シー ジ 
ャ ー が 定義 され て いる も の と し ょ ら 5。 


FRST: PROCEDURE: 
ステ ー ト メン ト -f 1 
ステ ー ト メン ト 一 {# 2 
ABLK: BEGIN: 
スネ ステー トメント 一 a 1 
ステ ー ト メン トーa2 
SCND: PROCEDURE: 
ステ ー ト メン トー-s1 
BBLK: BEGIN: 
ステ ー ト メン ト 一 b1 


END: 
END: 
ステ ー ト メン ト 一 a3 ぅ 
END ABLK: 


END FRST: 


と の 例 で は , 開始 ブロ ッ ク BBLK と 内 部 ブロ ンー ジャ ー SCND 
は 実質 的 (同じ 場所 で 終了 する 。 つ まり , 各々 の END ス テー トメ 
ント の 間 (C は , 何 も ス テー トメ ント が な い 。 と の と と は , 開始 アロ 
ッ ク ABLK と 外部 プロ シー ジャ ーFRST の 場合 も 同様 で ある 。 

と の よう ら な 場合 は , 上 例 の ょ よう 低 各 ブ ロッ ク を 対し て END ステ ー 
トメ ント を 使用 する 必要 は を く , BBLK と SCND を 終了 させ る 
大 め C に 1 つの END ス テー トメ ント , また ABLK と FRST を 

終了 させ る た めも う 5 1 つの END ス テー トメ ント を 使用 すれ ば よい 。 


前 者 の 場合 は , ラベ ル ん を つけ ず (C END ス テー トメ ント を 使用 す 
る と , 開始 ブロ ッ ク BBLK し か 閉じ られ を い ( 前 記 の 最初 の 規則 
を 参照 ) の で , END SCND と いう ステ ー ト メン ト を 用 いる 。 


後者 の 場合 は , END FRST だ け で 充分 で ある ( END 
ABLK と いう ステ ー ト メン ト は 余分 で ある ) 。 し た が っ て , 上 記 
の 例 は , 次 の よう 書き か える と と が で きる 。 


FRST: PROCEDURE: 
スゲ ー ド メダ っ す 】 
デー トドメ ント で す 2 
ABLK: BEGIN: 
ステ ー ト メン ト 一 a 1 
ステ ー ト メン トーa2 
SCND: PROCEDURE: 
ステ ー ト メン トーs1 
ステ ー ト メン トーs2 
BBLK: BEGIN: 
ステ ー ト メン トーb 1 
ステ ー ト メン トーb2 
END SCND: 
スネ ステー トメント 一 a3 
END FRST: 


複数 終止 を 指定 する PND ステ ー ト メン ト に つけ られ た ラベ ル 接 豆 
語 は , 最後 の PND ステー トメント (適用 され る も の と 作 を され る 。 
し た が っ て , と の よう な を な ステー トメ ント 制御 が 渡さ れる と , その 
間 に あ る すべ て の グル ー プ と プ ブロッ ク は , 終了 する 。 た と え げ ば , 


PROCEDURE 

ステ ー ト メン トーc1 

ステ ー ト メン トーc2 

DGP : DO i = 1 TO 10: 
ステ ー ト メン ト 一 d1 
GO TO LBL: 
ステ ー ト メン ト -d2 

LBL : END CBLK: 


CBLK: 


上 の 例 で は , END CBLK と いう ステ ー ト メン ト は , CBLK と 
いら ブロ ッ ク し 反復 DO グル ー プ DGP を 閉じ る 。 そ の 結果 , DGP 
(C 対 する ラベ ル を な し の END ス テー トメ ント が ステ ー ト メン トーd2 
の 直後 に ある の と 同じ C な る の で , LBL (と 制御 が 移る と , DGP 
の 反復 は 最初 の 回 を の ぞい て すべ て 阻止 され る 結果 (と な り , ステ ー 
トメ ント -d2 は 実行 され を な いと と と な る 。 


ブロ ッ ク の 活用 化 


開始 アプ ロック と プロ シー ジャ ー 人 な は, 物理 的 に は 類似 し て おり, また 
記憶 域 の 割 振り や 解放 , 名 前 の 有効 範囲 の 限定 を どの 点 で も 同じ ょ 
ら 左 働き を する が , その 活用 化 や 実行 の 方 法 の 点 で , 互い (て 異な っ 
て いる 。 


開始 ブ プア ロック は , 単 一 の ステ ー ト メン ト と 同じ ょ うと, ブロ グラ 

ム の 正規 の 流れ の 順序 の 課程 で 活用 化 さ れ て 実行 され (オン ・ ユ ニ 
ッ ト と し て 指定 され た と き は 例外 ) , 一 般 に , 単 一 つの ス テー トメ ン 
ト を 書け る と と ろ で あれ ば ど と に で も $ も 思 く と と が で きる 。 


それ 対し て プロ シー ジャ ー の 場合 は , 正規 の ブロ グラ ム の 流れ 
は , ブロ シー ジャ ー を 避け て , PROCEDURE ス テー トメ ント の 
前 の ステ ー ト メン ト か ら , その ブロ シー ジャ ー の END ステ ー ト メ 
ント の 後 《C あ る ステ ー ト メン ト K 制 御 が 灯 さ れる 。 ブ プロ シー ジャ ー 
を 活用 化す る と と が で きる の は , プロ シー ジャ ー 参 照 だ け で ある 。 
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ブロ シー ジャ ー 参 照 と は , 次 の 文脈 の いずれ か の 中 人 , 入口 式 と 
し て 書か れる も の で ある 。 


1 CALL ス テー トメ ント の CALL と いら キー ワー ド の 後 


2. INITIAL 属 性 の CALL オ プシ ョ ン の 中 の CALL と い 
う 2 キー ワー ド の 後 


3 関数 参照 と し て 


と の 章 で は , 上 記 の うち も 最初 の ゃ の の 例 を 用 いる が , その 題材 は , 
他 の 2 つの 形式 に も 関連 し て いる 。 さ ら (C く わし い 点 に つい て は , 
I 節 「 属 性 ] の INITTIAL 属 性 の と と ろ , お よび の? 章 「 サ ブル ァ ー 
チン と 関数 ] を みて いた だ きた い 。 


CALL ス テー トメ ント の 最も 簡単 を 形式 は , 以下 の 通り で ある 。 
CALL 入口 定数 : 


入口 定数 が PROCEDURE ス テー トメ ント の ラベ ル で ある と きけ は, 
それ は , ブロ シー ジャ ー へ の 主要 入口 点 を 表わし て いる 。 ENTRY 
ステ ー ト メン ト の ラベ ル で ある と き は , 副 次 入口 点 を 表わし て いる 。 
次 に あげ る の は 副 次 入口 点 を も る つ プ ロ シ ー ジ ャ ー の 例 で ある 。 


A: PROCEDURE : 
ステ ー ト メン トー1 
ステ ー ト メン トー2 

ERRT: ENTRY: 
ステ ー ト メン トー3 
ステ ー ト メン トー4 
ステ ー ト メン トー-5 
NEXT: RETR: ENTRY: 
ステ ー ト メン トー6 
ステ ー ト メン トー/ 
ステ ー ト メン ト -8 


END A: 


と の 例 で は , A が ブロ シー ジャ ー へ の 主要 入口 点 で あり , ERRT, 
NEXT, お よび RETR は 一次 入口 点 を 指定 する も る の で ある 。 実際 
(て は , NEXT と RETR は 同じ ENTRY ス テー トメ ント の ラベ ル 
で ある か ら , と これ ら は 両方 と も 同じ 副 次 入口 点 を 指定 し て いる 。 
と の プロ シー ジャ ー は , 以下 の ステ ー ト メン ト の いずれ か よっ て 
活用 化す る と と が で きる 。 


CALL A: 

CALL ERRT: 
CALL NEXT: 
CALL RETR: 


か わり た , 適当 な 入口 名 の 値 を 入口 変数 割り当て て , と の 入口 


変数 を プロシージャー 参照 の 中 で 使用 する と と が で きる 。 以下 の 例 
で は , 2 つの CALL し ステ ー ト メン ト は 同じ 効果 を も っ て いる 。 
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DECLARE ENT1 ENTRY VARIABLE: 


ENT1 王 ERRT: 


CALL ENT1: 


CALL ERRT: 


ブ プロシージャー 参照 が 実行 され る と , 指定 され た 入口 点 を 含む プ 
ロジ シー ジャ ー が 活用 化 さ れる が , この と と は , 呼び 出さ れる と も い 
2。 その 結果 , 制御 は 指定 され た 入口 点 に 移る 。 プロ シー ジャ ー 参 
同 が 行なわ れ て いる 地点 は , 呼出 し 点 と 呼ば れ , 参照 が 行なわ れ て 
いる ブロ ッ ク は , 呼出 し 側 ブ ロッ ク と 呼ば れる 。 呼出 し 側 ブ ロッ ク 
人 は, それ が 呼び 出し た ブロ ッ ク K 制 御 が 移っ て も , 活用 化 さ れ た ま 
まで ある 。 


主要 入口 点 で プロ シー ジャ ー が 呼び 出さ れ た と き は つね し と , 呼び 
出さ れ た プロシージャー の 中 で 最初 実行 可能 な & ス テー トメ ント か 
ら 実行 が 始ま る 。 


し か し , 次 入口 点 で ブロ シー ジャ ー が 呼び 出さ れ た と き は , そ 
の 一次 入口 点 を 定義 し て いる ENTRY ステ ー ト メン ト の 次 に ある 。 
最初 の 実行 可能 & ス テー トメ ント か ら 実 行 が 始ま る 。 


し た が っ て , 最後 に と あげ た 例 の 中 で 番号 の つけ られ た ステ ー ト メ 
ント が すべ て 実行 可能 で ある と すれ ば , CALL A と いう ステ ー 
トメ ント は , その 主要 入口 点 で プロ シー ジャ ーA を 呼び 出し , ステ 
ー ト メン トー1 か ら 実 行 が 始ま る 。 CALL ERRT と いう ステ ー 
トメ ント は , 副 次 入口 点 EERRT で ブロ シー ジャ ーA を 呼び 出す の 
で , ステ ー ト メン ト -ー3 か ら 実 行 が 始め られ る 。 CALL NEXT 
また は CALL RETR と いう ら ス テー トメント は いずれ も , も 1 
つの 副 次 入口 点 で プロシージャーA を 呼び 出す の で , ステ ー ト メン 
トー6 か ら 実 行 が 始め られ る 。 


順次 的 を 流れ の 最 中 (C ENTRY ステ ー ト メン ト を を 出合 っ て も , 
それ は 実行 され を いと と KK 注意 し て いた だ きた い 。 制御 は ENTRY 
ステ ー ト メン ト を , 注 彼 と み を し て 飛び 越し て ゆく 。 


どの よう を ブロ シー ジャ ー も (外部 , 内 部 の いずれ も ) , 外部 プ 
ロジ シー ジャ ー は つね を 呼び 出す と と が で きる が , 何 か 他 の プロ シー 
ジャ ー を 含ま れ て いる 内 部 プロ ンー ジ ャ ー を つね 呼び 出す と と が 
で きる と は 限ら を たい 。 外側 の ブ プロシージャー か ら み て 第 1 の レベ ル 
で ネス ティ ング され て いる 内 部 プロ ンー ジャ ー は , つね に その 外側 
の ブロ シー ジャ ー か ら , ある い は 互い 呼び 出し 合う と と が で きる 。 
た と えば げ , 


PRMAIN: PROCEDURE : 

ステ ー ト メン トー1 

2 が トド グー スタ 

スゲ ケー トメ ント ー3 

A: PROCEDURE : 
ステ ー ト メン ト 一 a 1 
ズ ベ デ チート メジ トー92 
B: PROCEDURE : 

ステ ー ト メン トーb1 
ステ ー ト メン トーb2 

END A: 

ステ ー ト メン トー 4 

ステ ー ト メン トー5 

C: _ PROCEDURE : 
ステ ー ト メン ト -c1 
ステ ー ト メン トーc2 
END C: 

ステ ー ト メン トー6 

ステ ー ト メン ト 一 / 

END PRMAIN: 


と の 例 で は , PRMAIN は ブ プロシージャーA お よび C を 呼び 出す 
と と が で きる が , B を 呼び 出す こと と は で き な を ない 。 ブロ ジー ジャ ーA 
は プロ シー ジャ ーB お ぉ お よび C を 呼び 出す こと が で きる 。 ブ ロジ シー ジ 
ャ ーB は ブロ シー ジャ ーC を 呼び 出す と と が で きる 。 また, ブロ ジ 
ー ジ ャ ーC は ブロ シー ジャ ーA を 呼び 出す と と は で きる が , B を 呼 
び 出 すこ と は で き な い 。 


プ ブロッ ク の 活用 化 C 関 する これ まで の 説明 は , ブロ グラ ム が す で 
人 活用 化 さ ん て いる と と を 前 提 と し た も の で あっ た 。 PL プ T ブロ グ 
ラム は , 呼出 し プロ グラ ム が 第 1 ブロ シー ジャ ー を 呼び 出し た と き 


活用 化 さ れる 。 と の 呼出 レプ ログ ラム は は 通常, オペ レー ティ ング ・ 


シス テム で ある ( 他 の プロ グラ ム で あっ て も よい が )。 第 1 ブロ シ 
ー ジ ャ ー( 主 プロ シー ジャ ー と も ゃ も いう ) は , 外部 ブロ シー ジャ ー で 
を けれ ば な を な ら ず , 次 の 例 で 示す ょ うと, その PROCEDURE ス テ 
ー ト メン ト は , OPTIONS (MAIN) の 指定 を も つも の で な け 
れ ば を ら な い 。 


CONTRL : PROCEDURE OPTIONS(MAIN) : 
CALL A: 
CALL B: 
CALL C: 
END CONTRL : 


ム 内 の 他 の ブ プロシージャー を 呼び 出し て いる 。 


ブロ ッ ク の 活用 化 に つい て す で K 述 べた と と , ある い は 暗 二 し た 


* オペ レー ティ ング ・ シ ステ ム て よっ て 第 1 プロシージャー が 
活用 化 さ れ た と き に , ブロ グラ ム は 活用 化 さ れる 。 


s。 第 1 プロシージャー を 除い て , ブロ グラ ム の 中 含ま れ て い 
る 外部 お よび 内 部 ブ プロシージャー は , ブロ シー ジャ ー 参 照 と 
ょ っ て 呼び 出さ れ を た と きだ けり 活用 化 さ れる 。 


* 開始 アブ ロック は , 正規 の 順次 的 を 流れ を 通し て , ある い は オ 
ン ・ ユ ニッ ト と し て 活用 化 さ れる 。 


。 第 1 ブ プロシージャー は, その ブロ グラ ム の 間 中 , 活用 化 さ れ 
た まま で ある 。 


es 活用 化 さ れ た ブロ ッ ク は すべ て , それ ら が 終了 させ られ る ま 
で (以下 参照 ) , 活用 化 の 状態 ある 。 


ブロ ッ ク の 終 Y ず 


通常 , プロ シー ジャ ー・ ブ ロッ ク は , ブロ シー ジャ ー 参 照 以外 の 方 
法 で , 呼出 し 側 ブ ロッ ク ま た は 活動 中 の 他 の ブロ ッ ク K 制 錠 が 移っ 
た と き (C, 終了 する 。 同様 と, 開始 プ ブロック は , プロ シー ジャ ー 参 
照 以外 の 方 法 で , 別 の 活動 中 の ブロ ッ ク K 制 爺 が 移っ た と き , 終 
子 す る 。 と の よう な 制 件 の 移動 の 方 法 は 幾 通り ゃ ある が , その 解釈 
は , 終了 する プロ ッ ク の タイ プ に よっ て 異な っ て いる 。 


開始 ブロ ッ ク の 終了 
開始 プロ ッ ク は , 次 の いずれ か が 起 っ た と き K 終 了 す る 。 


1. その ブロ ッ ク を 対す る END ス テー トメ ント K 制 御 が 達し た 
と き 。 と の よう な 場合 は , その プロ ッ ク が オン ・ ユ ニッ ト で 
ある と き を 除い て , 物理 的 に END の 次 と あ る ステ ー ト メン 
ト 制御 が 移る 。 


2. 開始 アデ ロック (また は その 開始 ブロ ッ ク の 中 で 活用 化 さ れ た 
ブロ ッ ク ) の 中 で GO TO ステ ー ト メン ト が 実行 され た 結果 , 
その ブロ ッ ク の 中 含ま れ て いな い 地 点 C 制 件 が 移っ た と き 。 


3 STOP ス テー トメ ント が 実行 され た (それ よっ て 実行 が 
停止 し た ) と き 。 


4. 開始 ブロック の 外側 な よび それ が 含ん で いる プロ シー ジャ ー 
の 外側 (制御 を 移す RETURN ステ ー ト メン ト (, 制御 が 
達し た と き 。 


項目 の と ころ で 述べ た タイ ブ プ の GO TO ステ ー ト メン ト 人 は , 次 の 
よら うら, 他 の ブロ ッ ク を 終了 させ る と と も ある 。 


移動 の 地点 が , 終了 させ られ た ブロ ッ ク を 直接 活用 化し た の で は 
な い ブ ロッ ク 人 含ま れ て いる と き 人 は , 活用 化 の 順序 の 中 介在 し て 
いる ブロ ッ ク 付 すべ て , 終了 する 。 


た と えば, 開始 ブロ ッ ク B が 開始 プア ロッ ク AC 含 まれ て いる と す 
れ ば , AC も BC も 含ま れ て いな い 地 点 く 制御 を 渡す GO TO ステ 
ー ト メン ト が B の 中 で 与え を られ る と , A と B 両 方 と も 実質 的 終 
了 さ せら れる 。 と の よう な 例 が , 次 と 示 し て ある 。 
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FRST: PROCEDURE OPTIONS(MAIN): 
ステ ー ト メン トー1 
ステ ー ト メン ト 一 2 
ステ ー ト メン トー3 
A: BEGIN: 
ステ ー ト メン トーa 1 
ステ ー ト メン ト 一 a2 
B: BEGIN: 
ステ ー ト メン トーb1 
ステ ー ト メン トーb2 
GO TO LAB: 
ステ ー ト メン ト 一 b3 
END B: 
ステ ー ト メン ト 一 a る 3 
END Aj 
ステ ー ト メン トー-4 
ステ ー ト メン トー-5 
LAB: ステ ー ト メン トー6 
ステ ー ト メン トー/ 


END FRST: 


FRST が 呼び 出さ れ た あと , 最初 の うつ の ステ ー ト メン ト が 実行 
され , 次 人 開始 ブロ ッ ク A が 活用 化 さ れる 。 A の 中 ある 最初 の 2 
つの ステ ー ト メン ト が 実行 され , 次 (開始 ブロ ッ ク B が 活用 化 さ れ 
る ( A は 活用 化 さ れ た まま で ある ) 。 B の 中 の GO TO ステ ー ト メ 
ント が 実行 され る と , FRST の 中 の ステ ー ト メン トー6 KK 制御 が 移 
る 。 ス テー トメ ント ー6 は AC も BC も 含ま れ て いな い の で , A と 
B は 両方 と も 終了 する 。 と の よう MC, 開始 ブロック B の 外 K 制 件 が 
移る と , ブロ ッ ク B が 終了 する と と も る, 間 人 介在 する ブロ ッ ク A 
も 終了 する 結果 (に を る 。 


プロ シー ジャ ー の 終了 
次 の いずれ か が 起こ と る と , プロ シー ジャ ー が 終了 する 。 


1 その プロ シー ジャ ー の 中 代 あ る RETURN ステ ー ト メン ト 
と 制御 が 達し た と き , RETURN ステ ー ト メン ト が 実行 さ 
れる と , 呼出 し 側 ロ シー ジャ ー 内 の 呼出 し 地点 制御 が 戻 
る 。 呼出 し 地点 が CALL ス テー トメ ント の 場合 は , 呼出 し 側 
プロ シー ジャ ー の 実行 は , CALL の 次 ある ステ ー ト メン ト 
か ら 再 開 さ れる 。 呼出 し 地点 が , 他 の 形式 の ブ プロシージャー 
参照 (CALL オ ォ オプション また は 関数 参照 ) で ある 場合 は , そ 
の 参照 を 含ん で いる ステ ー ト メン ト の 実行 が 再開 され る 。 


2. その ブロ シー ジャ ー の END ステー トメ ント KK 制御 が 達し た 
と き 。 と れ は , RETURN ステ ー ト メン ト を 実行 し た の と , 
実質 的 に 同じ に を る 。 


3 その ブロ シー ジャ ー( ま た は その プロシージャー の 中 か ら 活 
用 化 さ れん た ブロ ッ ク ) の 中 で GO TO ステ ー ト メン ト が 実行 
され て , その プロシージャー の 中 含ま れ て いな を い 地点 人 制 
伯 が 移っ た と き 。 
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4. STOP ステ ー ト メン ト が 実行 され た ( その 結果 , 実行 が 停 
止 さ せら れ た ) と き 。 


項目 1 と 2 は , プロ シー ジャ ー の 正常 を 終了 で ある 。 項目 3 と 4 
は , 異常 終了 で ある 。 


開始 プア ロック の 場合 と 同様 , 項目 3 で 述べ られ て いる タイ ズブ の 停 


止 が ある と , いく つか の プロ シー ジャ ー お よび また は け 開 始 ブ ロッ 


ク が 終了 し て し まう と と も ある 。 とく, GO TO ステ ー ト メン ト 
(C よ っ て 指定 され た 移動 の 地点 が , 終了 させ られ た ブロ ッ ク を 直接 
活用 化し た の で は を い ブ ロッ ク K 含 まれ て いる と きせ は , 活用 化 の 用 
序 の 中 KK 介在 する すべ て の ブロ ッ ク が 終了 する 。 次 の 例 C つ いて 考 
えて 人 みよう 。 


A: PROCEDURE OPTIONS(MAIN): 
ザー トメ ジン ト そ 1 
ステ ー ト メン ト 2 
BE: BEGIN: 
デー トド ト メジ ト ドーb 1 
ステ ー ト メン トーb2 
CALL C: 
ステ ー ト メン トーb3 う 
END B: 
デー ポメ ント ドー3 
ステ ー ト メン トー4 
C: PROCEDURE: 
ステ ー ト メン トーc1 
ステ ー ト メン ト 一 ec2 
ステ ー ト メン ト 一 e3 
D: BEGIN: 
ステ デー ド テ メシ ドーq1 
ス デ ー ト メン トー す Z 
GO TO LAB: 
ステ ー ト メン ト 一 d3 
END D: 
2 の っ ド メ ジ ト デ な 
END C: 
ステ ー ト メン トー5 
LAB: ステ ー ト メン トー6 
テー トドメ シト ー ア 
END A: 


上 の 例 で は , A が B を 活用 化し , その B が C を 活用 化し . さら K 
その C が D を 活用 化す る 。 D の 中 で , GO TO LAB と らい らら ステー 
トメ ント て と よって, A の 中 の ステ ー ト メン トー6K 制 伯 が 渡さ れる 。 
と の ステ ー ト メン ト は , D, C, ま を は B の いずれ に と も 含ま れ て い 
を い の で , と の 3 つの ブロ ッ ク は すべ て 終了 する 。 A は 活用 化 の 状 
態 の まま で ある 。 と の よう に , D の 外 K 制 件 が 移る と , ブロ ッ ク D 
が 終了 する と と も , 間 低 介在 する ブロ ッ ク B と C も 終了 する と と 
低 を る 。 


プロ グラ ム の 終了 
次 の いずれ か が 起 っ た と き は , ブ プログ ラム が 終了 する 。 


1. プログ ラム の 制御 が STOP ステー トメ ント 達し た と き , 
と れ は 異常 終了 で ある 。 


2. 主 ブ プロシージャ ー の 中 の RETURN ステ ー ト メン ト ま た は 
最後 の や ND ス テー トメ ント K 制 御 が 達し た と き 。 こ とれ は け は 正 
常 を 終了 で ある 。 


3 ERROR 条件 人 C 対 する オン ・ ユ ニッ ト が 実行 され て , 正常 
戻っ た と き ( つまり, GO TO ステ ー ト メン ト 低 よっ て , 
オン ・ ユ ニッ ト の 外 % 制 御 が 移ら を か っ た と き )。 


プロ グラ ム が 終了 する と き は 正常 を 場合 も 異常 た 場合 も , 呼 
出し プロ グラ ム ( 通常 は . オペ レー ティ ング ・ シ ステ ュ の 制 
御 ブ ログ ラム ) 制御 が 戻る 。 


記憶 域 の 割 振り 


記憶 域 の 割 振り は , 変数 C ょ っ て 表わさ れる デー タ 項 目 を 内 部 的 
記録 する と と が で きる よう (, 記憶 域 と 変数 と を 結び つけ る た め の 
処理 で ある 。 変数 (記憶 域 が 結び つけ られ た と き , その 変数 は 割り 
振ら れ た と いう 2。 ある 変数 に 対す る 割 振り は , 静 的 に (つまり , プ 
ログ ラム の 実行 の 前 C ) 行なう と と も , また 。, 実行 中 に 動 的 < 行 を 
うと と も で きる 。 静 的 割り 振ら れる 変数 は , プロ グラ ム の 間 中 , 
割り 振ら れ た まま (て を っ て いる 。 動 的 割り 振ら れる 変数 は , 記憶 
域 の クラ ス K 応 し て , その 変数 が 含ま れ て いる プロ ッ ク が 終了 し た 
と きか , ま を は プロ グラ マー が 要求 し た と き C そ の 記憶 域 を 放棄 す 
る 。 


変数 対し て 記憶 域 が 割り 振ら れる 方 式 は , その 変数 の 記憶 域 
クラ ス C ょ よっ て 決ま る 。 記憶 域 ク ラス C は , 静 的 , 自動 , 被 制 件 , 
おぉ お よび 基底 付 の 4 つが ある 。 各々 の 記憶 域 ク ラス は , それ ぞ れ , 設 
当 す る 記憶 域 ク ラス の 属性 STATIC, AUTOMATIC, 
CONTROLLED お よび BASED を 用 いて 指定 する 。 後 の 3 つ 
は , 勤 的 を 記憶 域 割 振り を 定義 する も る の で ある 。 


要素 , 配列 , な ぉ ょ び 大 構造 の 各 変 数 に 対し て , 記憶 域 ク ラス 属性 

を 明示 的 宣言 する と と が で きる 。 変数 が 配列 , ま た は 大 構造 変数 
で ある 場合 は , その 変数 K 対 し て 宣言 され た 記憶 域 ク ラス が , 配列 
また は は 構造 の 中 の すべ て の 要素 適用 され る 。 


記憶 域 ク ラス の 属性 に つい て 明示 的 (と 宣言 され て い を い 変 数 に は 
すべ て , AUTOMATIC 属 性 が 与え を られ る 。 た だ し , 例外 が 1 つ 
あり , EXTERNAL 属性 を も つ 変 数 に は , STATIC 属性 が 
与え られ る 。 


第 8 章 で , 各種 の 記憶 域 ク ラス の 用 法 に つい て 説明 する 。 


活用 状態 に ある プロ シー ジャ ー の 再 活用 化 ( 回帰 ) 


す で K 活 用 状態 CK ある プロ シー ジャ ー の うち , 自分 自身 また は 活用 
状態 に ある 別 の プロ シー ジャ ー か ら 再 び 活 用 化す る と と が で きる も 
の を , 回 帰 的 ブ プロシージャ ー と いう 。 と の よら な 再 活用 化 は 回 帰 と 
呼ば れる 。 


PROCEDURE ス テー トメ ント の 中 で RECURSTIVE オ プシ 
ョ ン が 指定 され て いる と き (C て だ け , その プロシージャー を 回 帰 的 
呼び 出す と と が で きる 。 と の オプ ショ ン は , プロシージャー が 重 次 
入口 点 を も っ て いれ ば , その 名 前 に も 適用 され る 。 


回 帰 的 プア ロン シー ジャ ー が 呼び 出さ れる た びに , その 環境 記録 ( 自 
動 変数 の 値 , みな ど ) が と っ て お か れる 。 つまり, と の 環境 は , 回 帰 
的 呼出 し の と き 押 し 下げ られ , その 呼出 し が 終了 し た と き 人 浮か 
び 上 が る も の と 考え る と と が で きる 。 ラベ ん 定数 に は , その ラベ ル 
が 入っ て いる ブロ ッ ク の 現在 の 呼出 し を 識別 する 情報 が つね 入っ 
て いる と と 注意 し て いた だ きた い 。 


RECURS: PROCEDURE RECURS IVE: 
DECLARE X STATIC EXTERNAL INITIAL(O) : 


メー テ 十 1: 

PUT DATA 0: 

IF メメ テ 5 THEN GO TO LAB: 
CALL AGN: 

ズー ヌー 1 

PUT DATA ⑳: 


LAB: END RECURS: 


AGN: PROCEDURE RECURSIVE: 
DECLARE X STATIC EXTERNAL INITIAL(0) : 


生ま 
PUT DATA ⑳: 


CALL RECURS: 
えー テー メー 1 
PUT DATA ⑳: 
END AGN:: 


上 の 例 の , RECURS と AGN は 両方 と も 回 帰 的 プロ ンー ジャ ー 
で ある 。 又は 静 的 変数 で あり , TNIT1IAL 属 性 を も っ て いる の で , 
プログ ラム の 実行 が 始ま る 前 人 C 割 振り が 行なわ れ , 初期 値 化 され る 。 
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最初 C RECURS が 呼び 出さ れる と き , XX は 1 だ け 増 や され , 
PUT ス テー トメ ント (て よ っ て メー 1 が 転送 され る 。 が 5 より 小 
さい の で , AGN が 呼び 出さ れる 。 AGN の 中 で , が 1 だ り 増 や 
され , メー 2 が 転送 され る (や は り , PUT ス テー トメ ント よっ 
て )。 そ の あと , AGN は RECURS を 再び 呼び 出す 。 


2 度 上 日 の RECURS の 呼出 し は , RECURS が ま だ 活用 状態 
(C あ る の で , 回 帰 的 呼出 し で ある 。 前 と 同じ ょ うら C 又 が 増やさ れ , 
その あと , ーー3 が 転送 され る 。 又は まだ 5 より 小さ い の で , AGN 
が 再び 呼び 出さ れる 。 と の 呼出 し の と き AGN は 活用 化 さ れ て いる 
の で , AGN の と の 呼出 し ゃ 回 帰 的 で ある 。 双 が また 増やさ れ , 
ーー 4 が 転送 され , さら と RECURS の 3 回 目 の 呼出 し が 行 を われ 
る 。 


RECURS の 3 回 目 の 呼出 し で は , メー 5 が 転送 され る 。 し か 
レ , 双 が も は や 5 より 小さ く な く を っ た の で , GO TO LAB が 
実行 され , RPCURS は 終了 する 。 し か し , と れ は , RECURS 
の 3 度目 の 呼出 し だ けが 終了 し た の で あっ て , 制御 は , RECURS 
を 3 度目 呼び 出し た プロ シー ジャ ーKC 戻 る と と (と を る 。 つ まり , 
AGN の 2 度目 の 呼出 し の 中 (に ある CALL RECURS の 後に あ 
る ステ ー ト メン ト K 制 御 が 戻る 。 と の 地点 で , X が 1 だ け 減 ら さ れ , 
メー 4 が 転送 され る 。 そ の あと , AGN の 2 回 目 の 呼出 し が 終了 レ し, 
2 回 目 (C AGN を 呼び 出し た プロ シー ジャ ーK 制 御 が 戻る 。 つ まり , 
RECURS の 2 回 目 の 呼出 し の 中 CC あ る CALL AGN の 後 の ス 
テー トメ ント K 制 件 が 戻る わけ で ある 。 と と で , 又は また 減ら され , 
メー 3 が 転送 され , その あと , RECURS の 2 回 目 の 呼出 し が 終 
了 し て , AGN の 最初 の 呼出 し < 制御 が 戻る 。 が 再び 減ら され , 
メー2 が 転送 され , AGN の 最初 の 呼出 し が 終了 し , RECURS 
の 最初 の 呼出 し K 制 御 が 戻る 。 双 が 減ら され て , メー 1 が 転送 され , 
RECURS の 最初 の 呼出 し が 終了 する 。 と の あと , 最初 (C 
RECURS を 呼び 出し た ブロ シー ジャ ー 制 爺 が 戻る 。 


特定 の 呼出 し の 中 で ラベ ル 変 数 K ラ ベル 定数 が 割り 当て られ る 場 

合 は , 別 の 呼出 し の 中 で その 変数 を 指名 する GO TO ステ ー ト メン 
ト を 用 いれ ば , 割当 て が 行 を われ た と き の 環 境 を 復元 する こと が で 
きる と と 注意 し て いた だ きた い 。 


プロ ロー グ と エピ ロー グ 


ブロ ッ ク を 活用 化す る た び K, 行なわ を けれ ば を ら な いあ る 種 の 作 
業 が あり , と の あと で 始め て , その ブロ ッ ク 内 の 最初 の 実行 可能 
ステ ー ト メン ト K 制 御 が 達する と と が で きる 。 と の よう な 一 連 の 作 
業 を ブロ ロー グ と いう 。 同様 CK, ブロ ッ ク が 終了 する と きも ゃ も, 制作 
を その ブロ ッ ク の 外出 す た め に は , ある 種 の 作業 を 行なわ を な けれ 
ば を ら な い 。 と の よう な 一 連 の 作業 を エピローグ と いう 。 
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プロ ロー グ と エピ ロー グ は , コン バイ ラー が 行 を うら べき 仕事 で あ 
り , ブロ グラ マー の 貢 任 で は を い 。 し か し , と れ ら に と つい て 知っ て 
お く と , ブロ グラ ム の 人 性能 を 上 げ る 上 で ブロ グラ マー の 役立つ こと 
と も ある の で , と と で 説明 する 。 


プロ ロー グ 


プロ ロー グ は , ブロ ッ ク の 活用 化 の 最初 の 段階 で 実行 され る , コン 
ベイル さ れ た コー ド で ある 。 一 般 (C, プロ ロー グ て よっ て 行 を われ 
る 作業 は , 次 の よう を た も の で ある 。 


s 自動 変数 な よび DEFINED 変数 の 次 元 の 限界 と スト リン 
グ の 長 さ を 計算 する 。 


・ 自動 変数 の 記憶 域 の 割 振り と 初期 値 化 (指定 され て いれ ば ) 
を 行なう 。 


。 現在 活用 化 さ れ て いる ブロ ッ ク の らち , どれ が と の ブロ シー 
ジャ ーKC 知 られ て いる か を 調べ て , 自動 記憶 域 じ 関し て 正 し 
い 世 代 の も の を アク セス する と と が で きる よう 人 K, また , 正 
し い オ ン ・ ユ ニッ ト 入 る と と が で きる よう する 。 


・ と の ブロ ッ ク か ら 見 か け 引 数 が 渡さ れる と き は , それ KK 対し 
て 記憶 域 を 割り 振る 。 


プロ ロー グ は , 式 で 表わさ れ た 初期 値 ( 反復 央 数 も ゃ 含む ) や , 配 
列 の 限界 , スト リン グ の 長 さ , エリ ア の 大 き さ な ど を 評価 し を けれ 
ば な ら な いと と も ある 。 


プロ グラ ム の 中 に ある 各 プ ロック 対し て , コン バイ ラー は , 区 
の よう な 順序 で と れ ら の 値 を 割り 当て る 。 


1. プロ ッ ク 内 の 他 の 宣言 と は 無関係 の 値 (外側 の ブロッ ク か 
ら そ の 値 が と られ る とこ と も ある 。 ) 


2. ブロ ッ ク 内 の 他 の 宣言 に よっ て 決ま る 値 。 プ ロッ ク 内 の 2 つ 
以上 の 他 の 宣言 に ょ っ て 値 が 決ま る 場合 は , 正しく 初期 値 化 
で きる か どう か 保証 で き な い 。 た と えば , 次 の 例 で は , 
DCL {I INIT(10), J INIT(I), K INIT(J) : 
KK の 初期 値 化 は , 正しく で きる か どう か 保証 で き を い 。 

デー タ 項 目 の 宣言 は , 互い 《C 依 存 し 合う も ゃ の で あっ て は な ら な を ない 


と と 注意 し て いた だ きた い 。 たとえ ば, 次 の よう な 宣言 は 誤り で 
ある 。 


DCL A(B(1) ), B(A(1) )j: ル さ れ を た コー ド で ある 。 一 般 (C, エビ ロー グ 人 よっ て 行なわ れる 作 
業 に は , 次 の よう な も の が ある 。 
互い 区 依存 し 合う と いう 関係 は , 3 つ 以 上 の デー タ 項 目 の 間 で 起 と 


り 得 る こと 注意 し て いた だ きた い 。 を たとえば, 次 の よら な 宣言 も ・ その ブロック が 活用 化 さ れる 前 存在 し て いた オン ・ ユ ニッ 
誤り で ある 。 ト の 環境 と 設定 し 直す 。 
DCL A(B(1) ). B(C(1) う ). CCA(1) ): ・ その プ ブロック の 中 で 割り 振ら れ た すべ て の 自動 変数 に 対す る 
記憶 域 を 解放 する 。 
エピ ロー グ ゲ グ 


エピ ロー グ は , ブロ ッ ク の 終了 の 最終 段階 で 実行 され る . コン バイ 
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PL ノ IT プログ ラム は , 識別 名 , 定数 . な よび 演算 子 や 区 切り 符号 と 
し て 用 いら れる 特殊 文字 か ら 構 成 さ れる 。 識別 名 自体 は . キー ワー 
ド で あっ て も , ブロ グラ マー が 指定 し た 意味 を も つ 名 前 で あっ て も 
よい 。 PL プ ] 言語 は , ある 識別 名 が キー ワー ド で ある か どう か ュ コン 
バイ ラー が 文脈 か ら 判 断 で きる よう 作ら れ て いる の で , ブロ グラ 
マー が 定義 する 名 前 と し て 使用 で き を いよ ょ うらみ な 予約 語 の リス ト は 存 
在 し を い 。 どの よら な 議 別名 も . 名 前 と し て 使用 する こと が で きる 。 
と の 場合 の 制約 は , プロ グラ ム 内 の ある 任意 の 地点 で は , ある 1 つ 
の 名 前 は 1 つの 意味 し か も っ て いて は な ならない, と いう と と だ け で 
ある 。 た と え を ば, ファ イル 変数 と 浮動 小数 点 変 数 の 両方 , 同じ 名 
前 を 使用 し て は な ら な い , と いう と と で ある 。 


注 : 上 で 述べ た と と は , 6 0 文字 セッ ト を 使用 し て いる 限り 正しい 
が , 4 8 文字 セッ ト を 用 いて 書か れる プロ グラ ム の 場合 は . ブロ グ 
ラ ャ ィ ー が 定義 す る 識別 名 と し て 使用 で き を い 識 別名 が いく つか ある 。 
と の よら みな 識 別名 は , GT, GE, NE, LT. NG, LEB, NL, 
CAT, OR, AND, NOT, お よび PT で ある 。 


し か し , ある 名 前 が , プロ グラ ム 全 体 を 通じ て 同じ 意味 を も っ て 
いる 必要 は を い 。 ある ブロ ッ ク の 中 で 宣言 され た 名 前 は , その プロ 
ッ ク の 中 で だ け 1 つの 意味 を も っ て いる 。 同じ 名 前 が 外側 の ブロ ッ 
ク で も る 宣言 され て いな を い 限 り . ブロ ッ ク の 外側 で は その 名 前 付知 ら 
れ な を ない 。 と の よう な 場合 , 外側 の プロ ッ ク あ る 名 前 は , 別 の も の 
を 指し て いる 。 と の よう な を と と か ら , ブロ グラ マー は , 局部 的 を 定 
義 を する こと と が 可能 で あり , し た が っ て , ブロ グラ ム の 別 の 部 分 を 
書い て いる 他 の プロ グラ マー が 使用 し て いる 名 前 を すべ て 知っ て い 
な く て も , プロ シー ジャ ー や 開始 ブロ ッ ク を 書く と と が で きる 。 


1 つの 名 前 が 2 つ 以 上 の 意味 を も つと と も で きる の で , ある 特定 
の 意味 は . ブロ グラ ム の どの 部 分 適用 され る か 定義 むせ る と と が 重 
要 な 問題 に な っ て くる 。 PL ノ T で は , 宣言 て よっ て (必ず し も ゃ 明示 
的 で ある 必要 は な を ない ) , 名 前 属性 と 意味 が 与え られ る 。 その 意味 
が 適用 され る プロ グラ ム の 部 分 を , その 名 前 の 家 言 の 有効 範囲 と い 
2 。 多く の 場合 , 名 前 の 有効 範 胃 は .。 ブロ グラ ム の 中 で その 名 前 が 
宣言 され た 位置 (または, 明示 宣言 され を い 場 合 は 宜 言 さ れ た と 信 
を され る 位置 ) に よっ て , 完全 (C 決 まる 。 同じ 名 前 を も つ デ ー タ KC 
関し て , 2 つ 以 上 の 世代 が ある 場合 (た と えば , 回 帰 の 場合 ) も あ 
る が , と の よう な 場合 は , 別々 (と 考慮 され る 。 


名 前 の 有効 範囲 上関 する 規則 を 理解 する た め (C は , 「……( 低 含ま 
れ て いる | と いう 9 語 と 「…… の 内 部 に ある | と いら 92 語 (C つ いて 理解 


PROCEDURE ま た は BEGIN ステ ー ト メン ト か ら 該 当 
する END ス テー トメ ント まで の 間 に あ る 。 プ ロッ ク の テキ 
スト は すべ て 。 その ブロ ッ ク 作 含ま れ て いる と いう 。 た だ し 。 
その ブロ ッ ク の 先頭 ヒ あ る BEGIN また は PROCPEDURE 
ステ ー ト メン ト の ラベ ル と 。 その ブロ ッ ク KK 適 用 され る 

ENTRY ステ ー ト メン ト の ラベ ル は ,. その ブロ ッ ク の 中 区 
は 含ま れ を な いと と 注意 し て いた だ きた い 。 ネ スト され て い 
る ブロ ッ ク 信 , それ が 入っ て いる ブロ ッ ク を 含ま れ て いる 。 


ブロ ッ ク 人 含ま れ て は いる が ,. その 中 に ネス ト さ れ て いる 他 
の ブロ ッ ク K 付 含ま れ て いな を ない テキ スト は , その ブロ ッ ク の 
内 部 に ある と いり 9。 ブ プロシージャー の 入口 名 ( ぉ お よび 
BEGIN ステ ー ト メン ト の ラベ ル ) は , その ブロ ッ ク 放 含 
まれ な いと と 人 注意 し て いた だ きた い 。 し た が っ て , こと れ ら 
は それ を 含ん で いる ブロ ッ ク の 内 部 (C あ る わけ で ある 。 外部 
ブ プロシージャー の 入口 名 は , 外部 ブ プロシージャー の 外側 と あ 
る も の と し て 取り 扱わ れる 。 


こと これら の 用 語 の ほか に. いろ いろ を タイ ズブ の 宣言 も 重要 で ある 。 


宣言 の タイ ブ と は , 明示 宣言 , 文脈 宣言 . な よび 暗示 宣言 の 3 つが 
ある が , これら と つい て は , 次 の モク ショ ン で 説明 する 。 


名 前 が 次 の も ゃ の の 中 に あっ た 場合 は , 明示 宣言 され た と と に を る 。 
1 DECLARE ス テー トメ ント の 中 
2. ベラ メー タ ・ リ スト の 中 
る スゲ デー トメ ジャ キッ ラベ ペル と し で 


4 PROCEDURE ま た は ENTRY ステ ー ト メン ト の ラベ ル 
と し て 


バラ メー ター・ リ スト の 中 (名 前 が か ある と いう と と は . その 名 前 
対す る DECLARE ステ ー ト メン ト が ,. バラ メー ター・ リ スト 
が 人 っ て いる PROCEDURE ま た は ENTRY ステ ー ト メン ト の 
直後 (ある の と 同じ で ある (た だ し , 同じ ブロ ッ ク の 内 部 (て ある 
DECLARE ステ ー ト メン ト の 中 で 同じ 名 前 を 宣言 し て も よい )。 
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PROCEDURE ま た は ENTRY ステ ー ト メン ト の ラベ ル と し 
て 名 前 が 記入 され て いる と いう と と は , それ が 参照 し て いる ブロ ジ 
ー ジ ャ ーK 対 する PROCEDURE ス テー トメ ント の 直前 に , 
DECLARP ス テー トメ ント を 置き , その 中 で 宣言 し た の と 同じ で 
ある 。 


ステ ー ト メン トラ ベル 接頭 語 を つけ る と と は . ラベ ル を 明示 宣 
言 す る の と 同じ レ で ある 。 


明示 宣言 の 有効 範囲 


ある 名 前 の 明示 宣言 の 有効 範囲 は . その 中 と 含ま れ て いる すべ て の 
プロ ッ ク も る 含め て .。 その 宣言 が その 内 部 に ある プ ブロック で ある 。 
た だ し , 同じ 識別 名 (C 関 する 別 の 明示 宣言 が その 内 部 (と ある よう な 
プ ブロッ ク ( ぉ よび その 中 (含ま れ て いる ブロ ッ ク ) は の ぞ く 。 


た と えば , 


PABBICCDQR 
P: PROCEDURE : ] 
DECLARE A, B: 
Q: PROCEDURE : ] 
DECLARE B, C: 
R: PROCEDURE : 
DECLARE C,. D: | 
END Ri: ] 
END Q: ] 
END P: 


右側 の 線 は , 名 前 の 有効 範 胃 を 示し て いる 。 B と B' は . B と いう 


名 前 の 2 通り の 用 法 を 表わし て お なり, C と C' は, C と いう 名 前 の 
2 通り の 用 法 を 表わし て いる 。 


文脈 宣 


名 前 が 特定 の 文脈 に あら われ た と き は , その 属性 の いく つか は 明示 
定 言 を し を なく て も , 判定 する と と が で きる 。 と の よう な 場合 (C, 名 
前 の あら われ た 位 置 が , 同じ 名 前 C 対 する 明示 宣言 の 有効 範囲 内 で 
な けれ ば , その 名 前 は , 文脈 的 C 宜 言 され た と いう 。 


明示 的 宣言 され を か っ た 名 前 は , 次 の よう な 場合 文脈 的 (< 認 
定 さ れ , 宣言 され る 。 


1 CALL ステ ー ト メン ト ま た は CALL オプ ショ ン の 中 (て あ 
る 名 前 , また は 引数 リス ト が 後に ある 名 前 に は , BUILTIN 
ぉ よび INTERNAL 属 性 が 与え られ る 。 の ちと その 名 前 が 
PL ン { の 組込み 関数 また は サブ ルー チン の 名 前 で を いと と が 
わか っ た 場合 C は . その 属性 は ENTRY と EXTERNAL 
変え られ る 。 
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た だ し , PL ン I チ ェ ッ クア ウゥ ウト ・ コ ン バ イ ラー の 場合 は , 

PL ン 1 の 組込み 関数 名 て 似 た 名 前 は , スペ ル の 誤り と みな を さ 
れ て , 「 困 正 さ れる | と と 注意 し て いた だ きた い 。 引数 を 
も た な た い 組 込み 関数 と 擬似 変数 ( ONCHAR と ONSOURCE 


な を ど ) は , BUILTIN 属性 を つけ て 明示 的 と 宜 言 す る か 。 


ナル 引数 リス ト を 用 いて 文脈 的 (C 宜 言 す る か (た と えば 
ONCHAR( ) と いう 5 形 で ) , ある い は DEFAULT ステ 
ー ト メン ト を 用 いて . た と えば 次 の 例 の よら と, 暗示 的 《 宣 
言 し を けれ ば な ら な い 。 


DEFAULT RANGE(ON. DATE) BUILTIN: 


2. FILEP ま た は COPY オ プシ ョ ン の 中 て ある 名 前 , また は フ 
ァイル 名 を 必要 と する 条件 'C 対 する ON, SIGNAL. また 
は REVERT ス テー トメ ント の 中 (ある 名 前 CC は, FILE 
属性 が 与え られ る 。 


3 ON CONDITION, SIGNAL CONDITION., 
また は REVERT CONDITION ステ ー ト メン ト の 中 
(CC ある 名 前 は . プロ グラ マー が 定義 し た 条件 名 と し て 認定 さ 
れる 。 


4.。 PVENT オ ォ オプション また は WAIT ステー トメント の 中 
ある 名 前 CC は, EVENT 属性 が 与え られ る 。 


5. BASED 属性 の 中 , SPDT オプ ショ ン の 中 , また は ロケ グー 
ター 修飾 記号 の 左側 に ある 名 前 C は , POINTER 属性 が 
与え られ る 。 


6 IN オォ オプション, また は OFFSET 必 性 の 中 に ある 名 前 に 
は , AREA 属 性 が 与え られ る 。 


次 に あげ る の は 。, 文脈 宣言 の 例 で ある 。 


RPAD FILE (PREQ) INTO (@⑩): 
ALLOCATE X IN (S): 


上 記 の ステ ー ト メン ト で は , PREQ (C は FILE 属性 が 与え られ 。 


SC は AREA 履 性 が 与え られ る 。 
文脈 宣言 の 有効 範囲 


文脈 宣言 の 有効 秀 界 は , その 名 前 が 出 て きた 外部 プロ シー ジャ ー の 
PROCEDURE ス テー トメ ント の 直後 に DEBCLARE ステ ー ト 
メン ト を 人 財 き , その 中 で 宣言 され た 場合 と 同じ ょ う (C 決 め ら れる 。 


文脈 宣言 は , その 名 前 が 外部 プロ シー ジャ ー の 中 で 宣言 され た 場 
合 と 同じ 効果 を も つと と 注意 し を けれ ば な を ならない 。 と れ は , その 
文脈 宣言 の も ゃ と (と な っ た を た ステー トメント が , 外部 プロシージャー の 
中 (て 入っ て いる ブロ ッ ク (たとえ ば, B と いう 名 前 と する ) の 内 部 
(と ある 場合 で あっ て も 同様 で ある 。 


し た が っ て , と の 名 前 は , 同じ 名 前 が 明示 的 と 宣言 され て いる プロ 
ッ ク を の ぞい て , 外部 プロ シー ジャ ー 全 体 C て わた っ て 知ら れる と と 
(て を な る 。 と れ は , ブロ ッ ク B を 含ん で いる 外部 プロ ンー ジャ ー か ら 
その 宣言 を , ブロ ッ ク B が 受け つい だ の と 同じ で ある 。 


明示 宣言 の 有効 範囲 内 で , 文脈 宣言 が 行 た われ る と と は あり 得 な 
い の で , 明示 宣言 た よっ て その 名 前 と 与え られ た 属性 に, 文脈 に エ 
っ て 追加 を する と と は で き な い 。 たとえば, 次 の プロ シー ジャ ー は 
誤り で ある 。 


P: PROC (PF): 
READ FRILE(F) INTO( 又 ): 
END P: 
識別 名 下 は , パラ メー ター・ リ スト の 中 (CC て ある の で , 明示 宣言 され 
た と と な る 。 とれ に 対す る 標準 の 省略 時 解釈 の 属性 は REAL 
DECIMAL FLOAT で あり , FILE オ プシ ョ ン の 中 に ある 


場合 CFPIC 対 し て 通常 与え られ る 属性 と は 矛盾 する 。 と の よう な 識 
別名 の 使い 方 は , 誤り で ある 。 


暗 


引 | 
加 
中 


ブロ グラ ム の 中 低 出 て くる 名 前 が , 明示 的 に も ゃ 文脈 的 に も 宣言 され 
て いな い 場 合 は , と の 名 前 は 暗示 宜 言 され て いる と いう 。 暗示 宣言 
の 有効 範囲 は , その 名 前 が 使用 され て いる 外部 プロ シー ジャ ー の 
PROCEDURE ス テー トメ ント の すぐ 後 で , DECLARE ス テー 
トメ ント よっ て 宣言 され た の と 同じ ょ うに し て , 決め られ る 。 
中 (て 含ま れ て いる ブロ シー ジャ ー の 中 で だ け 用 いら れる 名 前 は , 外 
側 の プロ シー ジャ ー の 中 で 知ら れる と と な る 。 


DEFAULT ス テー トメ ント を 用 いて , 標準 の 省略 時 人 解 羽 が . プ 
ログ ラマ ー が 定義 し た 省略 時 解釈 と 加 き 換え られ て いな を い 限 り , 暗 
示 宣 言 が 行なわ れる と , 名 前 の 頭 娘 字 に したがって, 標準 の 省略 時 
解釈 の 属性 が 適用 され る 。 名 前 が I か ら N の いずれ か の 文字 で 始ま 
っ て いる 場合 は , RPAL FIXED BINARY (15,0) 
と いら 属性 が 与え を られ る 。 それ 以外 の 娘 字 (英文 の 拡張 で ある $, 
#, @ も 含め て ) で 始ま る 名 前 に は , REAL FLOAT 
DEC IMAL (6 と いら 属性 が 与え られ る 。 


各種 宣言 の 例 


デー タ の 宣言 の 有効 奥 囲 が 図 7 1 C 示 され て いる 。 左側 の 大 括弧 は 
ブロ ッ ク の 構造 を 示し て ぉ り , 右側 の 大 括弧 は それ ぞ れ の 名 前 の 宣 
言 の 有効 範囲 を 示し て いる 。 と の 図 の 中 で , Q と RK 関 する 2 通り 
の 宣言 の 有効 範 胃 は . Q と Q . R と R' と いう よら 表わし て ある 。 


P は . ブロ ッ ク A で 宣言 され て ぉ なり, し か も 再 宣 言 さ れ て いな を い 


Q は ,. A で 宣言 され . B で 再 宣 言 さ れ て いる 。 最初 の 宣言 の 有効 
範囲 は B を の ぞい た A 全 体 で あり , 2 番目 の 宣言 の 有効 範囲 は プロ 
ツ ク B だ け で ある 。 


R は , ブロ ッ ク C で 宣言 され て いる が , ブロ ッ ク B の 中 で も R へ 
の 参照 が 行 を われ て いる 。 ブ ロッ ク B の 中 で R を 参照 する と , 外部 
ブ プロシージャー で ある A の 中 で R を 暗示 宣言 し た と と (と な る 。 し た 
が っ て , 有効 範囲 の 異な る 2 つの 別 の 名 前 が 存在 する と と な る 。 
明示 宜 言 され た R の 有効 範男 は C で あり , 暗示 宣言 され た R の 有効 
範囲 は . ブロ ッ ク C を の ぞ く A 全 体 で ある 。 


IT は . ブロ ッ ク C の 中 で 参照 され て いる の で , 外部 プロ シー ジャ 
ーA の 中 で 暗示 宣言 が 行 を われ る と と (て な る 。 そ の 結果 , と の 宣言 
は , A 全 体 ( その 中 CC 含ま れ て いる プロ シー ジャ ーB, C, Dt 含 
め て ) 適用 され る 。 


S は ,. ブロ シー ジャ ーD の 中 で 明示 宣言 され て ぉ ふり, D の 中 で だ 
け 知 られ て いる 。 


入口 定数 な よび ステ ー ト メン ト ・ ラ ベル の 宣言 の 有効 秋 囲 が , 図 
7 2 (と 示し て ある 。 と の 例 で は , 2 つの 外部 プロ シー ジャ ー が 示さ 
れ て いる 。 と れ ら の プロ シー ジャ ーA お よび E の 名 前 は , それ が 適 
用 され る プロ シー ジャ ー の 中 で EXTERNAL 属性 を つけ て 明示 
宣言 され て いる も の と みな され る 。 さら. EE は A の 中 で る 人 外部 入 
口 定数 と し て 明示 宣言 され て いる 。 E の 明示 宣言 は . ブロ ッ ク A 全 
体 (適用 され る も の で あっ て , ブロ ッ ク E 全 体 C 適 用 され る 世 の 明 
示 宣 言 に は 連結 され ない 。 名 前 EE の 有効 範囲 は . ブロ ッ ク A 全 体 と 
ブロ ッ ク RE 全体 で ある 。 名 前 A の 有効 範囲 は , ブロ ッ ク A 全 体 だ け 
で あり , E は 有効 範 界 で は を い 。 し か し , と れ は , の 中 で 外部 入 
口 宣言 記入 する と と も 可能 で あり ,. と の よう (て する と , A の 有効 
範 胃 は , A 全 体 と EE 全体 に な る 。 


ラベ ル L 1 は, A の 内 部 (ある ステ ー ト メン ト と C の 内 部 に ある 
ステ ー ト メン ト の と と ろ K 出 て 来 て いる 。 したがって, 別々 の 2 つ 
の 宣言 が 設定 され る 。 最初 の 宣言 は . プ ブロック C を の ぞ く ブ ロッ ク 
A 全 体 (< 適用 され , 2 番目 の 宣 斉 は ブロック C だ け (《 適 用 され る 。 

し た が っ て , ブロ ッ ク B の 中 の GO TO ステ ー ト メン ト が 実行 され 
る と , ブロ ッ ク A の 中 の L 1 多 制 伯 が 移り . ブロ ッ ク B が 終了 する 。 


D と B は . ブロ ッ ク A の 中 で 明示 宣言 され て いる の で , A の 中 で 
を ら ば ど と か ら で も る 参照 する と と が で きる 。 しかし, これ ら は 
INTERNAL を の で ,. ブロ ッ ク E の 中 で 参照 する と と は で き な い 
( へ の 引数 と し て 渡さ れ を い 崩 り )。 
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A: PROCEDURE : 
DECLARE P, Q: 
B: PROCEDURE : 

DECLARE Q: 
R 0: 
C: _ BEGIN: 

DECLARE Ri: 

DO 1 = 1 

END: 

END C: 
END B: 
PROCEDURE: 
DECLARE S: 
END Dj: 

END A: 


A: PROCEBDURE : 
DECLARE E ENTRY: 
L1: P デー Q: 

B: PROCEDURE: 
L2: CALL C: 
C: PROCEDURE: 
1 の 
CALL Ei: 
END C: 
GO TO L1: 
END B: 
D: PROCEDURE : 
END D: 
CALL B: 
END Ai: 
瞳 PROCEDURE : 
END E: 


図 メ 2 入口 宣言 な よび ラベ ル 宣 言 の 有 効 範囲 


C は , B の 中 で 明示 宣言 さん て いる の で , B の 中 か ら 参 照 す る と 
と は で きる が , B の 外側 か ら 参 照 す る と と は で き な い 。 


L 2 は , B の 中 で 宣言 され て いる の で , C( B の 中 (CC 含 まれ て い 
る ) も 含め て ブロ ッ ク B の 中 で 参照 する と と が で きる が , B の 外側 
か ら 参 照 す る と と は で き な い 。 


INTERNAL 属 性 と EXTERNAL 属性 


INTERNAL 属 性 を も つ 名 前 の 有効 範囲 は , その 宣言 の 有効 範囲 
と 同じ で ある 。 同じ 名 前 対し て 別 の 明示 宣言 が 行なわ れる と, 有 
効 範囲 の 重複 し たい, 別 の 新 し い 対 象 を 指す と と (な る 。 


EXTERNAL 属 性 を も つ 名 前 は , 同じ アプ ログ ラム の 中 で 2 回 以 
上 宣言 する と と が で きる (別々 の 外部 アロ シー ジャ ー の 中 , また は 
外部 プロ シー ジ ャ ー の 中 人 含ま れる いく つか の ブロ ッ ク の 中 の い ず 
れ で も る 可 )。 名 前 が 宣言 され る を たび (と, 有効 秀 囲 が 設定 され る 。 
と れ ら の 宣言 は いっ し ょ 結び つけ られ , 1 つの プロ グラ ム の 中 で 
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は , EXTERNAL 属性 を も つ 同 じ 識 別名 に 対す る 宣言 は すべ て , 
同じ 名 前 を 指す よう (て を る 。 名 前 の 有効 範囲 は プロ グラ ム の 中 で 
その 名 前 と 対し て 行なわ れ た すべ て の 宣言 の 有効 範囲 を 合計 し た も 
の で ある 。 


注 ・ PL ン I で は , デー タ の 外部 名 の 長 さ は 7 桁 を 起 え て は な ら ず , 


また , _ と いら 文字 ( 分 割 文 字 ) を 含ん で いて は を ならない 。 


と れ ら の 宣言 は すべ て 同じ も ゃ の を 指し て いる の で , 与え られ る い 
くつ か の 属性 は すべ て 同じ に を ら を けれ ば な を ならない ( ただし, 
INITIAL 属性 が 必要 を と き は , 1 回 だ け 指 定 する 必要 が ある 
と いら 点 は 例外 ) 。 コ ン バ イ ラー が すべ て の 宣言 を チェ ッ ク す る と 
と は 不可 能 を 場合 も ある の で (とく, 別 の ブロ シン ー ジ ャ ー で 名 前 
が 宣言 され て いる 場合 は ) , EXTERNAL 属 性 を も つ 同 じ 名 前 
対す る 宣言 は それ ぞ れ , 合致 する 属性 を も つよ ょ うら 注 意 し な けれ ば な 
ら な い 。 と の コン バイ ラー で は け , 任意 選択 の 出力 と し て 属性 リス ト 
を と る と と が で きる の で , とれ を 使用 すれ ば , 名 前 の 使い 方 を チェ 
ッ ク す る と と が で きる 。 人 次 の 例 は , 上 で 述べ た 点 を , ブロ グラ ム の 
中 で 例 と し て 示 し た も の で ある 。 


A: PROCEDURE : 
DECLARE S CHARACTER (20): 
DCL SET ENTRY(FLOAT DECIMAL ), OUT 
ENTRY(LABEL ) : 
CALL SET (3): 
EE: GET LIST (S,M,N): 
B: BEGIN: 
DECLARE X(M,N), Y(M) : 
GET LIST ( 叉 ,Y): 
CALL C( 丈 ,Y): 
C: PROCEDURE (P,Q): 
DECLARE P(*,*), Q(*), 
S BINARY FIXED EXTERNAL : 
S 0: 
DO [I = 1 TO Mi: 
IF SUM (P(1I, ょ ) ) = Q(1i) 
THEN GO TO B: 
SS 十 1 
IF S 3 THEN CALL OUT (E): 
CALL D(1): 
B: END: 
END C: 
D: PROCEDURE (NO): 
PUT LIST ('ERROR IN ROW リ り 
N TABLE NAME 「, S): 
END D: 
END B: 
GO TO Ei: 
END A: 
OUT: PROCEDURE (R): 
DECLARE R LABEL, 
(M,L) STATIC INTERNAL INIT(0), 
S BINARY FIXED EXTERNAL, 
Z FIXED DECIMAL( 1): 
M テ M 十 1j: S 三 0O: 
IF M ぐ L THEN STOP: ELSE GO TO Ri 
SET: ENTRY ( 必 ) : 
L ーー ク グ : 
RETURN: 
END OUT: 


A は , 外部 プロシージャー 名 で , その 有効 範囲 は ホ 。 ブロ ッ ク A 全 
体 と , A が 外部 名 と し て 宣言 され て いる ( DECLARE ステ ー ト 
メン ト 低 よる か , また を は ブロ シー ジャ ー 名 と し て 用 いる と と よっ 
て ) 他 の ブロッ ク と を 合せ た も の で ある 。 


S は , プ ブロック A と ブロ ッ ク C の 中 で 明示 的 宣言 され て いる 。 
と の 文字 スト リン グ の 宣言 は , プ ブロック C を の ぞい た ブロ ッ ク 4A 全 
体 (適用 され る 。 プ ロッ ク C の 中 で だ け は , 固定 2 進数 の 宣言 か 適 
用 され る 。D は , ブロ ッ ク C の 中 か ら 呼 び 出 され て は いる が , D の 
中 (CC あ る PUT ステー トメ ント で 参照 され て いる S は ブロ ッ ク C で 
宮 言 され て いる S で は な く , 文字 スト リン グ S を 参照 する 。 


N は , ブロ ッ ク D の 中 で パラ メー ター と し て 用 いら れ て いる が , 
と の ブロ ッ ク の 外側 で も 使用 され て いる 。 N は ベラ メー ター と し て 
記入 され て いる の で , N は D の 中 で 明示 的 (宣言 さ れ た と と て な る 。 
また , D の 外側 で N を 参照 する と , ブロ ッ ク A の 中 で N が 暗示 的 
宣言 され る と と (な る 。 N と いう 名 前 (に 対す る と の 2 つの 宣言 は , 
と の 例 で は 偶然 , この 2 つの 対象 は と も と , 省略 時 解 息 に と ょ っ て , 
FIXED (15,0), BINARY と TINTERNAL と いう 属性 
を も っ て は いる が , 別 の 対象 を 指す も の で ある 。 


と Y は , B 全 体 C 知 られ て いる の で , B の 中 に ある ブロ ッ ク C 
また は D の 中 で 参照 する と と は で きる が , B の 外側 の A の 部 分 で は 
参照 で き ない 。 


P と Q は バラ メー ター な の で , バラ メー ター・ リ スト の 中 CC とれ. 
ら を 記入 すれ ば , 充分 明示 宣言 の 働き も ゃ する 。 し か し , P と Q が 
配列 で ある と と を 指定 する た め と は , 別 の DECLARE ステ ー ト 
メン ト が 必要 で ある 。 5| 数 叉 と Y は 配列 と し て 宣言 され て いる し, 
プ ブロッ ク C の 中 で 知ら れ て は いる が , それ で も な ぉ お , P と Q る 配列 
で ある と と を 指定 する た め と , DECLARE ス テー トメ ント の 中 で 
P と Q を 宣言 する 必要 が ある 。 ( 星 印 の 表記 は , バラ メー ター の 限 
界 が , 引数 の 限界 と 同じ で ある と と を 表わし て いる 。 ) 


の で , と れ ら は は 暗示 的 宣言 され , A 全 体 (C 知 られ ん る よう (CC な る 
( IT は ブロ ッ ク C の 中 で し か 使わ れ て い を ゆい が )。 


と の 例 の 2 番目 の 外部 プロ シー ジャ ー は , SET と OUT と い 5 
2 つの 入口 名 を も っ て いる 。 と これら は , ENTRY お よび EXー 
TERNAL 属 性 を つけ て 明示 的 (宣言 され て いる と み を され る 。 と これ ら 
は また , ブロ シー ジャ ーA の 中 で も ENTRY 属性 を つけ て 明示 宣 
言 し を なけれ ば な を ならない 。 し た が っ て , 2 つの 入口 定 数 SET と 
OUT は, 2 つの 外部 プロ シー ジャ ー 全 体 と わた っ て 知ら れる よう 
(て な る 。 


ラベ ル B は , と の ブロ グラ ム の 中 と 2 回 出 て き て いる 。 1 回 は , 
開始 プロ ッ ク の ラベ ル と し て , す を わ ち A の 中 に ある ラベ ル と し て , 
明示 宣言 され て いる 。 次 (C と また, END ス テー トメ ント の 接頭 語 と 
し て 用 いら れ て , ブロ ッ ク C の 中 の ラベ ル と し て 再 宣言 され て いる 。 
し た が っ て , ブロ ッ ク C の 中 ある GO TO ステ ー ト メン ト の 中 で 
B を 参照 する と , ブロ ッ ク C の 中 の END ス テー トメ ント の ラベ ル 
を 指す と と (て と な る 。 ブ ロック C の 外側 で , B を 参照 し た と き は , 開 
始 ブ ロッ ク の ラベ ル を 指す よう (C な る 。 


C と D は , B の 中 で あれ ば どの 地点 みか ら で も 呼び 出す と と が で き , 
る が , B の 外側 の A の 部 分 や 別 の 外部 プロ ンー ジャ ー か ら は 呼び 出 
す と と が で き な を ない 。 同じ ょ よう, E は 外部 ブ プロシージャーA 全 体 C 
知ら れ て いる の で , A の 中 の どの 地点 か ら で も ゃ も , BC 制 件 を 移す と 
と が で きる 。 
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し か し , プ ブロック C の 中 の ラベ ル B は , C の 中 か らし か 参照 する こと 
と が で き な い 。 GO TO ステ ー ト メン ト 低 よって, ブロッ ク の 外側 
と 制御 を 移す と と は で きる が , ネス ト さ れ た プ ブロック へ の と の よう 
な 制御 の 移動 は , 通常 は で き を い 。 とれ 対す る 例外 が 外部 プロ シ 
ー ジ ャ ーOUT の 中 (示さ れ て いる が , と と で は , ブロ ッ ク A か ら 
の ラベ ル E が , ラベ ル ・ バ ラメ ー タ ーRK 対 する 引数 と し て 渡さ れ 
て いる 。 


は, A の 中 で 宣 斉 され て おり, OUT の 中 で は 知ら れ て いな い 
が 。 GO TO R と いう 9 ス テー トメ ント は , ラベ ルル EK 制御 を 渡す 。 


変数 M と し は , ブロ ッ ク OUT の 中 で STAT1IC と 宣言 され て 
いる 。 とれ ら の 値 は , OUT へ の 呼出 し と 呼出 し の 間 で 保存 され る 。 


プロ シー ジャ ーOUT の 中 に ある S を , プロ シー ジャ ーC の 中 
ある S と 同じ で ある と 議 別 する た め に , と の 両方 は , 履 性 
EXTERNAL を つけ て 宮 言 され て いる 。 


外部 構造 の メン バー 名 の 有効 範囲 


大 構造 名 が 2 つ 以 上 の ブロ ッ ク の 中 で EXTERNAL 属性 を つけ 
て 宣言 され て いる と き は , 対応 する メン バー の 名 前 は 同じ で を く て 
も よい が , 対応 する 構造 の メン バー の 属性 は それ ぞ れ , 同じ で を け 
れ ば な ら な い 。 構造 の メン バー の 名 前 は , つね に INTERNAL 属 
性 を も っ て お り , 有効 範囲 の 属性 を つけ て 宣言 する と と は で き な い 。 
し か し , 外部 構造 の メン バー を 参照 する と き , その 参照 を 含ん で い 
る ブロ ッ ク 多 知ら れ て いる メン バー 名 を 使っ て 参照 すれ ば , 対応 す 
る メン バー の 名 前 が 同じ で ある か どう か と は 無関係 に , その 外部 名 
が 知ら れ て いる すべ て の ブロ ッ ク の 中 で その メン バー を 参照 し た の 
と , 実質 的 に 同じ と と に な る 。 た と えば げ , 


PROCA: PROCEDURE: 


DECLARE 1 A EXTERNAL, 
2 B, 
グ 、 CGC: 
END PROCA: 
PROCB: PROCEDURE: 
DECLARE 1 A EXTERNAL, 
2 B, 
D : 
END PROCB: 


と の 例 で は , PROCA の 中 で A. B が 変更 され れ ば , PROCB 
で も 変更 され , その 逆 も る また 同じ で ある 。 ま た , PROCA で A. 
C が 変更 され れ ば , PROC B で も A. D が 変更 され , その 逆 も ま 
た 同 じ で ある 。 
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多重 宣言 と 不明 確 な 参照 


同じ ブロ ッ ク の 内 部 に ある 同じ 識別 名 に つい て 2 つ 以 上 の 宣言 が 行 
な われ て いる と き は , 少な を く と も その 1 つが , その 名 前 を 唯一 無 二 
の も の に する よう ら な 名 前 の 修飾 を 使う 9 と と が で きる 形 で 構造 の 中 で 
宣言 され て いな い 限 り , それ は 多重 宜 言 で ある 。 

同じ 識別 名 < 関し て , 異な る 属性 を つけ て EXTERNAL 名 と 
し て , ブロ グラ ム の 中 の ど と か で 2 度 以上 宮 言 する と , 多重 宣言 と 
を る (た だ し , INITIAL 属 性 は すべ て の 宣言 の 中 で 指定 する 必 
要 は な い の で 例外 )。 


多重 宣言 は エラ ー で ある 。 


修飾 され る 名 前 は , その 名 前 が 唯一 無 二 に な る 範囲 で 修飾 を すれ 

ば よい 。 あ る 名 前 を 参照 する と , つね に その 参照 を 含ん で いる も の 
の うわ 最 も 内 側 に ある プ ブロック で 宣言 され て いる 識別 名 < 適用 され 
る も の と みな され る 。 不明 確 を 参照 と は , その 名 前 を 唯一 無 二 の も ゃ 
の て す る た め の 修 節 が 不 充 分 な 名 前 で ある 。 


次 に あげ る いく つか の 例 は , 多重 宣言 と 不明 確 な 参照 の 両方 の 例 
で ある 。 


DECLARE 1 A 2 C, 2 D, 3 ぅ BE: 
BEGIN: 
DECLARE 1 A, 2 B, 3 C, ぅ 3 B: 
A.C デ D.Eij 


と の 例 で は , A. CH 内 側 の ブロ ッ ク の C を 参照 し て な お り , D. 
は 外側 の ブロック の EE を 参照 し て いる 。 


DECLARE 1 A42B2Z2 BZ2 CSD2ZD: 


と の 例 で は , B は 多重 宣言 さん た と と (と を る 。 A. D は , 2 番目 の 
D の 場合 に だ け 修 飾 と し て 完全 な の で , 2 番目 の D を 参照 する と と 
(て を る 。 最初 の D は , A. C. D と し て 参照 すれ ば よい 。 


DECLARE 1 A2B3 CZ2 DS3 Ci 


と の 例 で は , C は どちら も ゃ も, と の 参照 で は 完全 C 修 飾 さ れ て いな を な い 
の で , A. C は 不明 確 で ある 。 


DECLARE 1 A,2 A3 A: 


と の 例 で は , A は 最初 の A を 参照 し , A. A は 2 番目 の A, A. A. 
A は 3 番 日 の A を 参照 する 。 


DECLARE 欠 : 
DECLARE 1 YY2 所 うう 用 3 ん 
2 YY3 紀 う 5 Ai: 


と の 例 で は , 又は 最初 の DECLARE ステ ー ト メン ト を 参照 し て 
いる 。 


Y . Z へ の 参照 は 不明 確 で ある 。 双 . Y. Z は 2 番目 の 用 を 参照 し 
て ぉ ふり, Y. 又 . 乙 け 最初 の を 参照 し て いる 。 


省略 時 解釈 の 属性 の 適用 


PL ノ T の 原始 アロ グラ ム で は , どの よう な 議 別 名 も , 一 揃い の 必 人 性 
を 完全 (CC も っ て い を けれ ば ならない 。 し か し , PL ノバ T に は , ブロ グ 
ラマ ー が プ ブログ ラム の 中 で 使用 する デー タ の タイ ズブ を 容易 て 記述 で 
きる よら を な 機能 が ある 。 実際 CC, DECLAREP ス テー トメ ント の 中 
で 指定 され て いる 属性 が , その 識別 名 必要 を 属性 を すべ て 網 維 し 
て いる 必要 が ある と と は 殆 ん ど を い 。 さ らし, 文脈 宣言 の 場合 も , 
識別 名 に 関し て 宣言 され る の は , 一 部 分 だ け で ある 。 と の ょ よう, 
一 部 分 の 属性 だ けが 宣言 され た 議 別 名 の 各々 (ついて, コン バイ ラ 
ー は , 省略 時 解釈 の 規則 を 適用 し て , 嗜 示 的 C, 一 組 の 属性 を 完全 
(て す る 。 


PL ノ 1 言語 む な よ び シ ステ ュ ム ュ ブ 3 6 0 ぉ よび シス テ ュ グ 3 7 0 の 実 
施 面 で 決め られ て いる 省略 時 解釈 の 規則 を , 標準 の 省略 時 解 札 の 規 
則 と いう 。 と の 標準 の 省略 時 解釈 の 規則 を 修正 し た り , 完全 を 一 科 
い の 新 し い 省 略 時 解釈 の 規則 を 作り た い 場 合 は , ブロ グラ マー は , 
か わり の 省略 時 解釈 の 規則 を 定義 せ する と と が で きる 。 DEFAULT 
スネ ステー トメ ント は , と の よら な 目的 C 用 いら れる も の で ある 。 その 
用 法 C つ いて は , と の 章 の 後 の モ セク ション で 説明 する 。 
属性 の 適用 の 過程 
コン ペイ ラー に よる 属性 の 処理 は , 次 の よう な 順序 で 行なわ れる 。 

1. 属性 の 因数 化 を は ず す 。 

2. LIKE 属性 を 適用 する 。 


3 構造 の メン バー 対し て , ALIGNED ま を た は UN- 
ALTIGNED 属 性 を 適用 する 。 


4. 明示 宣言 を 設定 し , 適用 する 。 

5. 文脈 宣言 を 設定 し , 適用 する 。 

6. 暗示 宣言 を 設定 する 。 

7 明示 的 , 文脈 的 , ぉ よび 暗示 的 宣言 さ れ た 識別 名 C 対 し て , 
DEFAULT ス テー トメ ント (使用 され て いれ ぱぴ ) で 指定 さ 
れ た 属性 を 適用 する 。 ま た は , 標準 の 省略 時 解釈 の 属性 を 適 


用 する 。 


8. 属性 の 中 で 使用 され て いる 識別 名 , また は 別 の ブロ シー ジャ 


ーー・ プ ロッ ク で 宣言 され て いる 議 別 名 も 含め て , 同一 の 識別 
名 を 解決 する 。 


以上 の と と か ら , 明示 宣言 また は 文脈 宣言 に よっ て 識別 名 与え 
られ た 属性 を , 同じ クラ ス の 属性 (C 関 する 省略 時 解 釈 の 属性 (て と よっ 
て 冒 き 換 える と と は で き な い と と が , わか る は ず で ある 。 さ ら ( ま 
た , 省略 時 解釈 が 適用 され る 履 性 は , す で 適 用 され た 属性 (C よ っ 
て 大 きく 左右 され る 。 と の と と は , DEFAULT ス テー トメ ント の 
用 法 を 理解 する 上 で , 重要 を と と で ある 。 


標準 の 省略 時 解釈 の 適用 


標準 の 省略 時 解釈 の 属性 は , 特定 の クラ ス の 属性 (たとえば, 有効 
範囲 ,。 スケール, 基数, また は モー ド な を ど ) が , 明示 宣言 た よっ て 
も る, 文脈 宜 言 に エ っ て も 与え られ て い を いと き (C, その クラ ス の 属 
性 (C 対 し て 適用 され る 。 


ラ ァ イル 属性 (C 対 す る 標準 の 省略 時 解釈 の 要約 は , 第 1 0 章 「 和 人 
力 と 出力 | の と と ろ に あげ て ある 。 問題 デー タ お よび プロ グラ ュ ス 制 
件 デー タ (C 対 し て 想定 され る 標準 の 省略 時 解釈 の 要約 は , 以下 (と 示 
し て あぁ る 。 標準 の 省略 時 解釈 に つい て の 詳細 は , 【 節 「 属 性 ] の と 
と ろ を みて いた だ きた い 。 


問題 デー タ 


問題 デー タ が , 文字 タイ プ で ある か 算術 タイ プ で ある か わか ら を な い 
場合 は , 算術 タイ プ と み を され る 。 


算術 デア データ: その デー タ K 対 し て 指定 され た 情報 C よ っ て , 省略 
時 解 釈 が 異な る 。 


1 算術 デー タ 項 目 に つい て , 明示 宣言 で は 一 部 分 だ けが 指定 さ 


れ て いる 場合 は , 省略 時 解釈 に よっ て 次 の ょ うな 属性 が 想定 
され る 。 
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明 示 宣 言 想定 され る 省略 時 解釈 の 属性 
BINARY REAL, FLOAT 
DECIMAL REAL, FLOAT 
FIXED REAL, DECIMAL 
FLOAT REAL, DECIMAL 
REAL FLOAT, DEC IMAL 
FIXED BINARY REAL 

FIXED DECIMAL REAL 

FLOAT BINARY REAL 


FLOAT DECIMAL REAL 


REAL FIXED DECIMAL 
REAL FLOAT DECTIMAL 
REAL BINARY FLOAT 
REAL DECTIMAL FLOAT 


REAL の か わり COMPLEX が 指定 され て いる と きけ は, 


諸 属性 は REAL の 場合 と 同じ で あり , 2 つの 部 分 の 各々 
適用 され る と と 注意 し て いた だ きた い 。 


2. スケ ー ル で は を く 基 数 が 指定 され て いる 場合 は , 精度 の 属性 
の 中 の スケ ー ル 因数 の 存在 (よって, スケ ー ル が 決ま る 。 ス 
ケー ル 因 数 が ある 場合 は , FIXED と みな を され, を いと き は 
FLOAT と みな され る 。 た と えば げ , 


DCL A BINARY(5), 
B BINARY(5,2): 


AK 対 し て 想定 され る 属性 は , REAL FLOAT で あり , 
B の 場合 は , RPAL FIXED で ある 。 


3 。 モード, スケ グ ケール, お よび 基数 が , DECLARE また は 
DEFEAULT ステ ー ト メン ト し よって, 指定 され て いな い 
場合 は , 識別 名 の 頭 娘 字 C に よっ て 属性 が 想定 され る 。 


頭 交 字 想定 され る 省略 時 解 羽 の 必 性 

b, 凌 ,@, A-H REAL FLOAT DECTIMAL 
T - N REAL FIXED BINARY 
0 - REAL FLOAT DECIMAL 


関数 参照 か ら 返 され る 値 低 つい て , その 基数 , スケ ー ル , お よび 
モー ド を 決め る た め の 省 略 時 解釈 の 規則 を 設け する と と が で きる 。 返 
され る 値 (C 対 する 省略 時 解釈 の 属性 は , 識別 名 の 場合 と 同様 , 関数 
名 省略 時 解釈 の 規則 を 適用 する と と よっ て , 得 ら れる 。 


算術 デー タ の 精度 : 算術 デー タ K 対 する 標準 の 省略 時 解釈 の 精度 
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属 性 精度 


FIXED BINALY (15,0) 
FIXED DECIMAL (5,0) 
FLOAT BINARY に 9 
FLOAT DECIMAL ($) 


算術 デー タ の 他 の 属性 : INTERNAL の 場合 は ALIGNED 
ぉ お よび AUTOMAT1IC 属 性 , EXTERNAL の 場合 は STATIC 
属性 が 想定 され る 。 


スト リン グ ・ デ ー タ : 文字 また は ビッ ト ・ ス トリ ング の 長 さ が 定 
義 さ れ て いな を い 場 合 は , 長 さ は 1 と み を され る 。 INTERNAL の 
と き は UNALIGNED と AUTOMAT1IC 属 性 , EXTERNAL 
の と き は STAT1IC 属 性 が 想定 され る 。 


構造 な ょ び 構 造 の メン バー: レベ ル 1 の 構造 は 。 INTERNAL 
の と き は AUTOMATIC, EXTERNAL し の と き は STATIC 
と みな され る 。 小 構造 な よび 構造 の メン バー は , 記憶 域 ま た は 有効 
範囲 の 属性 を る た を い 。 


配列 お よび デー タ 有 要素 : スト リン グ ・ タ イプ の デー タ 要 素 (C 対 し 
て は , UNAL TIGNED が 想定 され る 。 と れ 以 外 の すべ て の デー タ 
・ タ イプ つい て は , ALIGNED が 想定 され る 。 有効 範囲 な よ 
び 記 憶 域 は , デー タ の タイ ブ 低 よっ て 異な る 。 


プロ グラ ム 制 御 デ ー タ 


人 入口: DECLARE ス テー トメ ント の 中 , また は 外部 ブロ ッ ク の 
PROCEDURE プ ENTRY ステ ー ト メン ト の ステ ー ト メン ト 接 
頭 請 と し て 宣言 され た 入口 定数 は , EXTERNAL と みな され る 。 
入口 変数 は , INTERNAL と みな され る 。 


ラベ ル , ポイ ンタ ー, オフ セッ ト , エリ ア , 事象 , 入口 の 各 変 数 ほ 
た は ファ イル 変数 : と れ ら の 属性 の いずれ か を つけ て 宣言 され た 
識別 名 は , INTERNAL の と き は ALIGNED と AUTOMATIC, 
EXTERNAL の と き は STATIC と みな され る 。 エ リブ 変数 
対し て サイ ズ が 指定 され て いな いと きけ , 省略 時 解釈 て エエ っ て 1000 
バイ ト の サイ ズ が 適用 され る 。 


DEFAULT ス テー トメ ント 


DEFAULT ステ ー ト メン ト は, 識別 名 割り 当て られ る 属性 K 対 
し て ブロ グラ マー が 制御 を 加 そ える と と が で きる よう する 働き を す 
る 。 明示 宣言 また け は 文脈 宜 言 に よっ て 誠 別 名 (C 割 り 当 て られ た 属 件 
を 人 賀 き 換え る た め C, DEFAULT ステー トメ ント を 使用 する と と 
は で き な い 。 


DEFAULT ス テー トメ ント は , 標準 の 省略 時 解 羽 の 規則 を 修正 
する た め , ま を は ブロ グラ マー が 定義 し た 省略 時 解釈 の 規則 の 一 ま 
と まり 全体 を 指定 する た め 多 使用 する こと が で きる 。 と の ステ ー ト 


メン ト は , 明示 宣言 また は 文脈 宣言 の 後 で も 必要 属性 が 全部 与え 
られ て いな い 識 別名 , 入口 宣言 の 記述 子 , お よび PROCEDURKRE 
お ぉ お よび ENTRY ステ ー ト メン ト の RETURNS オプ ショ ン K 対 
し て , 属性 を 指定 する と と が で きる 。 ブ プロ グラ マー が 定義 し た 省略 
時 解 羽 が プログ ラム の 中 MC 設定 され た あと で , 標準 の 省略 時 解 釈 の 
規則 を 復元 する と と も 可能 で ある 。 | 


次 て 示す の は , DEFEAULT ステ ー ト メン ト の 一 般 形 式 を 簡潔 に 
し た も の で ある 。 


DEFAULT | RANGE (識別 名 1 文字: 文字 1* 
DESCRIPTORS 
〔 属性 の 指定 〕 : 


RANCEB オ ォ オプ ション : RANGE オ プション は , 関連 する 省略 時 
解釈 の 規則 が 適用 され る 識別 名 を 指定 する も る の で ある 。 コロ ン ( よ 
っ て 分 離さ れ た 2 つの 文字 , また は 1 つの 識別 名 の どちら か と し て 
範囲 を 指定 する と と が で きる 。 た と えば , 次 の オプ ショ ン は , 


RANGE (A:J) 


頭 字 が A か ら J の 範囲 に ある すべ て の 識別 名 適用 され る 。 次 の 
オォ オプ ション は , 


RANGE (ABC) 


最初 の 3 文字 が ABC で ある よう な すべ て の 識別 名 (た と えば げ , 
ABC, ABCD, ABCDE を ど ) 適用 され る 。 


RANGCE オ ォ オプ ショ ン は , 次 の よら 指定 する と と も で きる 。 
RANGE (*) 


と これ は , A か ら 必 , お および, @, お よび 手 と いう 文字 を 頭 娘 字 と 
する も の すべ て を 指定 し て いる 。 


DESCRIPTORS オ ォ オプ ション : 。 DESCRIPTORS オプ ショ 
ン は , 関連 する 省略 時 解釈 の 規則 が , ナル 以外 の パラ メー ター 記述 
子 C 適 用 され る と と を 指定 する も の で ある 。 


属性 の 指定 : 属性 の 指定 と は , 指定 され た 範囲 に た あ る 識別 名 と , 
選択 され た 属性 を 適用 する た め の 属 性 の リス ト で ある 。 リ スト の 中 
の 属性 は どの と うな 順序 に な っ て いて も よい が , ブラ ンク で 区 切ら 
な けれ ば な ら な を い 。 


デー タ 項 目 の 宣 言 を 完成 する の 多 必 要 な 属性 だ けが , 属性 の リス 
ト か ら と られ る 。 必要 を すべ て の 属性 が と の リス ト か ら 得 られ を い 
と きけ は, 標準 の 省略 時 解釈 の 属性 が 適用 され る 。 し た が っ て , 標準 
の 省略 時 解釈 と 同じ 属性 は 指定 する 必要 が な い 。 た と えば げ , 


DEFAULT RANGE(T) POINTER: 


と れ は , と いう 文字 で 始ま る 識別 名 が ポイ ンタ ー で ある と と を 意 
味 し て いる 。 これら の 識別 名 適用 され る 属性 の リス ト の 内 容 は , 
POINTER, AUTOMATIC, INTERNAL, お よび 
ALIGNED で ある 。 


デー タ 項 目 て 適用 され た と き (C 矛 盾 する 属性 が , 属性 の 指定 の 中 
(CC ある と きゃ 老 盾 し て いる と は 限ら ちら を い 。 た と えい ば, 


DEFAULT RANGE(S) BINARY VARYING: 


と これ は , S と いう 2 文字 で 始ま きり, BIT ま た は CHARACTER 属 
性 を つけ て 明示 宣言 され て いる 識別 名 に は , VARYING 属性 が 
与え られ る と と を 意味 し て いる 。 そ の 任 か の も の (算術 デー タ 以 外 
の も の と し て 明示 的 また は 文脈 的 (C 宜 言 さ れ て い を いも の ) と は , 
BINARY 属性 が 与え られ る 。 


VALUE オ プシ ョ ン は , 1 0 進 整数 の 定数 また は 式 (C ょ っ て 表 
わ さ れ る 属性 を 指定 す る た め C, 用 いら れる 。 と の よう な も の は , 
長 さ , サイ ズ , お よび 精度 の 属性 が ある 。 た と え ゆ , 


DEFAULT RANGE(* ) VALUE(AREA(2000)) 
とこ の スネ ステー トメ ント は , すべ て の エリ プ 変 数 と 関す る 省略 時 解 羽 の 


サイ ズ を 2 0 0 0 と する も の で ある 。 人 次元 の 属性 は , リス ト の 最初 
(と 記 入 す れ ば , 属性 指定 の 中 で 直接 指定 する と と が で きる 。 


例 1: 


次 の よう な 頭 女 字 の 範 胃 が , それ ぞ れ 右側 (C 与 えら れ て いる 届 性 
と 対応 する も る の と し ょ 29。 


必 要 を 属 性 
REAL FLOAT DECIMAL 
REAL FLOAT BINARY 
REAL FIXED BINARY 
REAL FIXED DECIMAL 


周 
叶 


〇 品 回 と 
| 
NN 選 ロ ピ ロロ | 世 


精度 と し て 想定 され る の は , IBM シス テム ュ /36 0 の 実施 面 で 
取り決め られ て いる 省略 時 解 息 の 精度 で ある 。 とれ ら の 追加 の 省略 
時 解釈 の 規則 を 設定 する た め の DEFAULT ステ ー ト メン ト は , 
次 の ょ うな る 。 


DEFAULT RANGE(E:H) BINARY, 
RANGE(O: の の)FIXED: 


と の ステ ー ト メン ト の 中 で は , 2 つの 範囲 の 頭 文 字 が , 追加 の 省略 
時 解釈 の 規則 と し て 指定 され て いる 。 E 一 時 お よび 0 一 の 範囲 外 
の 頭 文字 を も つ 議 別名 C 関 する 標準 の 省略 時 解 釈 の 規則 は , 変ら を 


Wo 
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例 2・ 


暗示 宣言 され た すべ て の デー タ が 指定 され た も の と 同じ 属性 を も 
つと と を , DEFAULT ステ ー ト メン ト で 指定 する と と が で きる 。 


DEFAULT RANGE (*) PICTURE 「99999!: 


この ステ ー ト メン ト は , 暗示 宣言 され た すべ て の 議 別名 は , 
PICTURE 99999! と いう 属性 を も る つ 数 字 タ イプ で ある と 想 
定 す る た め の も の で ある 。 


標準 の 省略 時 和解 釈 以外 の 値 が 必要 を 場合 は , 特定 の 省略 時 解釈 の 
属性 (C 対 する 精度 , スト リン グ の 長 さ , また は エリ ア の サイ ズ を 規 
定 す る た め の 属 性 を , VALUD オ プション の 引数 C つ ね (CC 入 れ て 
ぉ か を けれ ば な ら な い 。 た と えば げ , 


a. DEFAULT RANGE (S:T) CHARACTER VALUE 
(CHARACTER (10)): 

b. DEFAULT RANGE (*》 VALUE (FIXED 
BINARY(31), FLOAT DECIMAL(16), FLOAT 
BINARY(5 ぅ ), FIXED DECIMAL( 15)) : 


最初 の 例 は , 暗示 宜 言 され た , 頭 文 字 が S と の 識別 名 に は すべ て , 
CHARACTER と いら 省略 時 解釈 の 属性 と , 1 0 桁 の 長 さ を も つ 
スト リン グ と いう 省略 時 解釈 を 与え を る る の で ある 。 2 番目 の 例 は , 
精度 が 定義 され て いな い 算 術 タ イプ の すべ て の 識別 名 は , VALUE 
と いう キー ワー ド K 対 する 引数 の 中 で 定義 され て いる 精度 を も つと 
と を 指定 する も る の で ある 。 ( と の 例 で 指定 され て いる 精度 は , 許さ 
れる 最大 の 精度 の も の で ある 。 ) 


標準 の 省略 時 解釈 の 復元 
炊 の ステ ー ト メン ト は , 
DEFAULT (RANGE(⑭) DESCRIPTORS) : 


外側 の プロ ッ ク の 中 で 設定 され て いる プロ グラ マッ ー 定 義 の 省略 時 解 
釈 の 規則 と 伸 き 換わる も の で ある 。 と れ は , 外側 の ブロ ッ ク の 中 KC 
ある 省略 時 解 息 の 指定 を いずれ も 思 き 換え て し まう の で , 標準 の 省 
略 時 解 羽 の 規則 を , 現在 の ブロック の 中 の 明示 宣言 戻す た め 人 使 
用 する と こと が で きる 。 


DEFAULT ス テー トメ ント の 有効 範囲 


前 (CC ブロ グラ マー が 定義 し た 省略 時 解釈 の 規則 を 復元 し た り , 修正 
し た り し て いる よう な , 内 側 の プロ ッ ク の 中 で DEFAULT ステ 
ー ト メン ト が 指定 され て いる の で な い 限 り , DEFAULT ス テー ト 
メン ト の 有効 懲 肝 は , それ が 指定 され て いる ブロ ッ ク , お よび その 
プ ブロック 含ま れ て いる ブロ ッ ク 人 て な る 。 た と えば げ ば, 
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A:PROC: 
DEFAULT RANGE(A:I) FIXED BINARY: 


B:PROC:. 
DEFAULT RANGE(I) DECIMAL: 


END Ai: 


ブロ シー ジャ ーB の 中 で は , 1 で 始ま る 識別 名 の 場合 は , DECT - 
MAL が BINARY KC 儲 き 換わり , FIXED は 受け つが れ な い 。 
境界 合せ , 有効 範囲 , 記憶 域 ク ラス , お よび 精度 ヒ つ いて は , 標準 
の 省略 時 解釈 も 適用 され る 。 


内 部 ブロ ッ ク K 対 し て DBFRAULT ステ ー ト メン ト が 与え られ 
て いる 場合 は , その 有効 範囲 た は , 明示 宣言 され た 識別 名 だ け を 含 
むと と が で きる 。 と れ は , 文脈 的 お ょ び 暗 示 的 C 宜 言 さ れ た 識別 名 
の 有効 範囲 は , その 名 前 が 出 て いる 外部 プロ シー ジャ ー の PRO - 
CEDURE ス テー トメ ント の 直後 に ある DECLARE ステ ー ト メン 
ト の 中 で 宮 言 され た 場合 と 同じ ょ うし て 決め られ る た めで ある 。 


省略 時 解釈 指定 の 因数 化 


省略 時 解釈 の 指定 は , 因数 化す る こと と が で きる 。 た と えば , 次 の ス 
と の ドド メジ (トド 仁 。 


DEFAULT (RANGE(A:C) FIXED, RANGE 
(D:F) FLOAT) DECIMAL : 


暗示 宣言 され た 算術 的 を 識別 名 の うち , 頭 文 字 が A か ら C ま で の も 
の C は , FIXED DECIMAL と いう 属性 が 与え られ , 頭 交 字 
が D か ら F ま で の も の は , FLOAT DECIMAL と いう 属性 
が 与え を られ る と と を 指定 し て いる 。 


パラ メー ター の 記述 子 に 対す る プロ グラ マー 定義 の 省略 時 解釈 


ズバ ラメ ー タ ー の 記述 子 と 対し て 必 性 を 指定 する た め (C, DEFAULT 
ステ ー ト メン ト を 使用 する と と が で きる 。 DESCRIPTORS と 
いう キー ワー ド は , バラ メー ター の 記述 子 (C 対 する 属性 の 指定 と し 
て , その 人 後 C 属 性 の リス ト が 続く と と を 指定 する も る の で ある 。 た と 
えば , 


DEFAULT DESCRIPTORS BINARY: 
DCL X ENTRY (FIXED, FLOAT) : 


上 の 例 で は , リス ト 内 (ある 各々 の バラ メー ター 記述 子 多 対し て 
BINARY と いら 属性 が 追加 され , 次 の リス ト と 同じ ゃ の が 作り 
出さ れる 。 


(FTXED BINARY, FLOAT BINARY) 


DESCRIPTORS の 省略 時 解 羽 の 属性 は , ナル 記述 子 を も ゃ つ 
パラ メー ター( す を わ ち , バラ メー ター 記述 子 の 中 で 属性 が 何 も 指 
定 さ れ て お ら ず , し た が っ て , その 属性 は 対応 する 引数 の 属性 と 同 
し で を けれ ば を ら な いよ うな ベラ メー ター ) は , 適用 され な い 。 


RETURNS オプ ショ ン に 対す る プロ グラ マー 定義 の 省略 時 
解釈 


関数 プロ シー ジャ ー か ら 返 され る 値 の らち , 諸 示 宣言 され て いる も 
の の 属性 は ,. その プロ シー ジャ ー を 呼び 出す の 用 いら れ た 入口 名 


(て し た が っ て 決め られ る 。 DEFAULT ステ ー ト メン ト を 用 いて , 


と の よら な 属性 を 指定 する と と も で きる 。 た と えば , 次 の ステ ー ト 
メン ト は , 


DEFAULT RANGE (X) FIXED BINARY: 
X メ : PROC(Y): 


以下 の よう KC 解 和 局 さ れる 。 


XX : PROC(Y) RETURNS (FIXED BINARY) : 


DEFAULT ステ ー ト メン ト の 用 法 に 関す る 制約 


DEFAULT ス テー トメ ント で , ENTRY, ENVIRONMENT, 
RETURNS, LIKE, VARIABLE の 諸 属性 ., また は FILE 
以外 の ファ イル 属性 を , 指定 し て は な ら な らい 。 構造 を 指定 する た め 
(て , と の ステ ー ト メン ト を 使用 する と と は で き な を ない が , 構造 の 要素 
の 属性 に は , RANGE 応 し て , 省略 時 解釈 を 適用 する と こと が で 
きる 。 


明示 的 (と 宣言 され て いな い 識 別名 C 対 し て , DEFAULT ステ 

ー ト メン ト で 次 元 属性 を 指定 する と と が で きる が , 添字 を つけ た 識 
別名 は , BUILTIN 属性 を つけ て 文脈 的 (と 家 言 され る と と な 
る 。 し た が っ て , 省略 時 解釈 C ょ っ て 次 元 属性 を 適用 する の は , 明 
示 宣 言 さ れ た 識別 名 CK 対 し て だ け K 限 る べき で ある 。 た と えば, 


DEFAULT RANGE (ARRAY) (10,10) 
FIXED BINARY: 
DCL ARRAY1, ARRAY2: 


ARRAY 1 と ARRAY 2 は 両方 と も , 1 0 0 個 の 素 か ら を る 。 


明示 宣言 され た 2 次 元 の 配列 で あり , その 要素 は それ ぞ れ , FIXED 
お よび BINARY と いら 属性 を も っ て いる 。 
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記憶 域 の 制御 


山 


第 8 


と の 章 で は , どの よら (て す れ ば , PL プ [ の プロ グラ マー は , 記憶 域 
の 割 振り を 制御 する と と が で きる か と いら と と を 解説 する 。 割 振り 
と は け , 変数 対し て 記憶 域 を 取得 する 課程 を い 5。 変数 の 世代 と は , 
その 変数 に対する 特定 の 割 振り を 指し て いる 。 記憶 域 ク ラス (CC は, 
STATIC( 静 的 ), AUTOMATIC( 自 動 ), CON- 
TROLLED ( 被 制御 ), な よび BASED( 基 底 付 ) の 4 つが あり , プ 
ログ ラッ ー は , 特定 の ブ プログ ラム で の 必要 MC 応じ て , 制 件 を 行なう 
と と が で きる 。 あ ら ゅ ゆる 変数 に, 記憶 域 が 必要 で ある 。 と の と と は , 
スト リン グ や 算術 を どの 問題 デー タ C も , ラベ ル 変 数 や 入口 変数 , 
ファ イル 変数 を どの ブロ グラ ュ 制 件 デー タ に る 適用 され る 。 変数 の 
宣言 に は, 必ず 記憶 域 ク ラス の 属性 を 含め を けれ ば な ら な い ( 省略 
時 解 釈 < よっ て だ け で も )。 変数 の 名 前 は , 実際 C は 変数 の アド レ 
ス で あり , 変数 (C 対 し て 指定 され た 属性 は , 必要 な 記憶 域 の 量 や , 
その 解釈 の 仕方 を 記述 する も る の で ある 。 た と えば げ , 


DECLARE X FIXED BINARY(31,0 ) AUTOMATIC: 


と いう 名 称 は , フル ワー ド を 占め る 値 , すなわち , 固定 小数 点 2 
進 整 数 と し て 解 収 され る 4 バイ ト の 値 を アド レス し て いる 。 静 的 変 
数 や 自動 変数 の 場合 は , と の 概念 は さして 重要 で は な い が , 被 制 伯 
変数 , と く 基 底 付 変数 に つい て 考え る と き は , と の 概念 は 非常 
関係 を も ね っ て くる 。 


PL で は , 変数 対す る 記憶 域 の 割 振り は コン ペイ ラー が 行 な 
う 2 ので , ブログ ラム 内 の ど と を と っ て も , ブロ グ ム マー 自身 が 主 記 
憶 域 内 に お ける 変数 の 絶対 アド レス を アク セス する と と は な い 点 を 
理解 し て お ぉ おく 必要 が ある 。 し た が っ て , ブロ グラ マー が 記憶 域 の 割 
振り 関し て 行 を う 制 件 は , 記憶 域 の 必要 量 と その 記憶 域 を 割り 振 
る 時 点 に 関す る こと と だ け で あり , 主 記憶 域内 の ど と 割り 振る か と 
いう と と は 指定 し な い 。 た だ し , エリ プア 変数 の 中 で 基底 付 変数 を 割 
り 振 る と き は , す で 人 割り 振ら ちら れ て いる 記憶 域 か ら 相対 的 に みて ど 
と 割り 振る か を 指定 する こと が で き る 。 


どの 程度 記憶 域 の 制御 を する と と が で きる か と いら と と は , 使 
用 され る 記憶 域 の クラ ス (C て よっ て 異な る 。・ 


静 的 記憶 域 


STATIC 属性 を つけ て 宣言 され て いる 変数 は , ブロ グラ ム が 実 


行 さ れる 前 (C 割 り 振 られ , プロ グラ ム が 終了 する まで その まま 割り 
振ら れ て お ぉ お か れる 。 実行 中 に C, プロ グラ ム で 静 的 変数 の 割 振り を 制 
爺 す る 手段 は な い 。 多く の 場合 アロ グラ ム の 中 で は , 実行 中 に いつ 
で も 使用 され る デー タ が か が 必要 で ある 。 た と えば , ブロ グラ ム の 中 で 
指定 され る すべ て の 算術 定数 は , STATIC が 宣言 され て いる 変 
数 と 同じ ょ うに し て 貯え られ る 。 両者 の 相違 は , 静 的 変数 の 値 は ブ 
ログ ラム の 実行 中 (C 変 た る と と が で きる の 対し て , 定数 は 変え る 
と と が で き な を ない と と で ある 。 静 的 変数 は , ブロ グラ ム 内 の ど と で も 
宣言 する と と が で きる が , と これ は な , 実行 の 前 (と 割り 振ら れる 。 
し か し, 静 的 変数 へ の 参照 を 有効 を も る の する た め (C は , 通常 の 有 
効 範囲 の 規則 に し た が うら よう , 充分 注意 し な けれ ば な ら な い 。 
た と えば げ , 


A:PROC OPTIONS(MAIN): 


B:PROC: 
DECLARE STATIC INTERNAL : 


END B: 
END Aij: 


変数 肥 は , プロ グラ ム の 間 中 割り 振ら れ て は いる が , と れ を 参照 
で きる の は , ブロ シー ジャ ーB の 中 , また は B の 中 (人 含ま れる ブロ 
ッ ク の 中 だ け で ある 。 


INITIAL 属性 を 用 いて 静 的 変数 を 初期 値 化 する 場合 は , ポ 
イン ター 変数 の 場合 を の ぞい て ( と れつ いて は 後 で の べ る ), 初 
期 値 を 定数 と し て 指定 し を けれ ば を ら な い 。 また, 範囲 の 指定 (た 
と えば, 配列 の 限界 ) も 定数 で を けれ ば な ら な を な い 。 し た が っ て , 静 
的 記憶 域 を 使用 す る 場合 は , ブログ ラム を 書く と き K 指 定 し た 割 振 
り は , それ が どの よら を な も の で あろ うら と も , ブロ グラ スム 実行 の 間 中 
その まま (な っ て いる と と を , つね ん 心 と 留め て お か を けれ ば を なら 
を い 。 ブロ グラ ム 内 の ど と か ら も ゃ 必要 と され る よう を デー タ は すべ 
て , 静 的 記憶 域 を 使用 し な けれ ば な を ならない 。 STATIC ポイ ンタ 
ー ま を た は オォ オフセット 変数 は , NULL 組込み 関数 に ょ っ て の み , 初 
期 値 化 する と と が で きる 。 


と の 他 の 形式 の 記憶 域 の 割 振り は すべ て , 動 的 で ある 。 つま り , 


ブロ グラ ム の 実行 中 記憶 域 が 得 ら ん れん る 。 と の よう な と と か ら , プ 
ログ ラマ ャ マー は , 静 的 変数 の 場合 以上 C 制 件 を 働か みせ る と と が で きる 。 
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目 動 記 憶 域 


AUTOMATIC 属 性 を つけ て 宣言 され て いる 変数 は , その 変数 が 
宜 言 さ れ た ブロ ッ ク K 入 る と き K 割 り 振 られ る 。 と の よう な 変数 
は , プロ グラ ム の 実行 中 何 度 で も 割 振 り し 直す と と が で きる 。 
プロ グラ マー は , ブロ グラ ム の デブ ロック 構造 の 設計 の 仕方 如何 に ょ 
っ て , その 割 振り を 制 件 する 。 た と えば , 次 の 例 で は , 


Ai:PROC: 


CALL B: 
B:PROC: 
DECLARE , Y AUTO: 


END Bj: 
CALL B: 


ブ プロシージャーB が 呼び 出さ れる た び (C, 変数 メ と YK 記憶 域 が 割 
り 振 られ , B が 終了 する と , 記憶 域 が 解放 され る 。 し た が っ て , 
それ ら が も っ て いた 値 は 失 を われ る 。 解放 され た 記憶 域 は , 他 の 変 
数 へ の 再 割 振り (C 使 用 する と と が で きる 。 し た が っ て , ブロ ッ ク 

(プロシージャー また は 開始 ) が 活用 化 さ れ て いる と き は つれ ね, 
その プロ ッ ク の 中 で 自動 変数 と し て 宣言 され て いる すべ て の 変数 
記憶 域 が 割り 振ら れ て あおり, ブロ ッ ク が 活用 化 さ れん て い を いと き 
は つね に , その ブロ ッ ク 内 に ある 自動 変数 記憶 域 は 割り 振ら れ 
て いな い 。 RECURS IVE オォ オプション を も つ ブ プロシージャ ー の 場 
合 を の ぞい て , ある 特定 の 自動 変数 'C 対 する 割 振り は , 1 つ し か 存 
在 し を い ゆい 。 


自動 変数 KC 対す る 配列 の 限界 ,. スト リン グ の 長 さ , お よび エリ ア 
の サイ ズ を , 式 と し て 指定 する と と が で きる 。 と の と と は , 必要 な 
と き (記憶 域 を 割り 振る と と が で きる と いう と と ば か り で を く , 人 ほ 
ん と う 必要 な 量 の 記憶 域 を 割り 振る と と が で きる と いら と と も ゃ 意 
味 し て いる 。 た と えい ぱぴ, 


A:PROC: 
DECLARE N FIXED BIN: 


B:PROC: 
DECLARE STR CHAR(N): 


文字 ストリ ング STR は , ブロ シー ジャ ー B が 呼び 出さ れ た を た とき 
存在 し て いた 変数 N の 値 C ょ っ て 定義 され て いる 長 さ を も つと と 
な る 。 し か し , と の よう な 式 を 評価 する た め K 余 分 を 操作 が 必要 
な る の で , 実行 の 速度 を ある 程度 般 牲 ぺ し て 記憶 域 が 保存 され る 。 
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自動 変数 に お ける 回 帰 の 影響 


す で K 活 用 化 さ ん て いる と き 記 呼び 出す と と の で きる ブロ シー ジャ 
ー を 回 帰 的 と いう 。 と の よう を ブロ シー ジャ ー の 中 で 特定 の 活用 化 
対し て 割り 振ら れ た 変数 の 値 は , 他 の 活用 化 か ら 変 えら れ を い 
ェ う KC 保 護 し な けれ ば を ら を い 。 と の よう な 保護 は , 積 重ね と 呼ば 
れる 処理 法 を 用 いて , 他 の 呼出 し の 値 を 参照 する と と が で き な を な いよ 
うら (C て する と と に よっ て 行なわ れる 。 積 重ね は , 後 入 先 出 方 式 で 操作 
され る 。 あ る 時 点 で 参照 可能 自動 変数 は , 最新 の 世代 の 自動 変数 
だ け で あぁ る 。 静 的 変数 は , 回 帰 の 影響 を 受け を いと と 注意 し て い 
た だ きた い 。 し た が っ て , 静 的 変数 は , 回 帰 の 状況 の も ゃ と で , 回 帰 
的 を 呼出 し 相互 の 間 の 連絡 に 用 いる と 有効 で も ある 。 と の と と は また , 
回 帰 的 を プロ シー ジャ ー を 含ん で いる プロ シー ジャ ー の 中 で 宣言 さ 
れ て いる 自動 変数 に つい て も , 被 制 御 変数 と 基底 付 変数 に つい て も ゃ 
いえ る 。 た と えば げ , 


AI:PROC: 
DCL : 


B:PROC RECURSIVE: 
DCL 

Y STATIC: 
CALL B: 


END B: 
END Ai: 


変数 の 場合 は , 1 つの 世代 だ けが , ブロ シー ジャ ーB の 呼出 し の 
間 中 存在 し て いる 。 変数 ク は , プロ シー ジャ ーB を 呼び 出す た び 
別 の 世代 を も つと と に な る 。 変数 Y は , プロ シー ジャ ーB の 中 で だ け 
参照 可能 で あり , 呼出 し の た び 再 割 振 りさ れる と と は を い 。 ( 変 
数 の 積 重ね の 概念 は , 被 制 人 秀 変数 の 説明 の と き (C る 重要 な と と で あ 
る 。 ) 


被 制御 記憶 域 


CONTROLLED と 宣言 され て いる 変数 は , ALLOCATE ステ 
ー ト メン ト の 中 で それ ら が 指定 され た と き (C だ け 割 振ら れる 。 ' 
被 制 倒 変 数 の 各々 < 対し て , プロ グラ マー が 個々 C 制 件 を する 。 被 
制御 変数 の 有効 範囲 は , 内 部 的 と 宣言 され て いる 場合 は , それ が 宮 
言 さ れ て いる ブロ ッ ク と その 中 含ま れ て いる ブロ ッ ク で ある 。 被 
制 人 変数 の 宣言 で は , 変数 を 割り 振る と き K 記 憶 域 が どれ だ けり 必 
要 か , また それ を どの よう KC 解 選 す る か と いう と と KC 関 する 属性 だ 
け を 記述 する 。 た と えば , 


A:PROC: 
DCL XX CONTROLLED: 


CALL B: 


B:PROC: 
ALLOCATE 丈 : 


END B: 
END A: 


変数 XX は, ブ プロシージャー B, お よび ブロ シー ジャ ーA の うち 
CALL ステ ー ト メン ト の 後 C あ る 部 分 の 中 で は , 正しく 参照 する 
と と が で きる 。 CALL ステ ー ト メン ト の 前 で , と の 変数 の 値 を 参 
照 し て も エラ ー な る 。 一 旦 被 制御 変数 が 割り 振ら れ た あと は , 
その 変数 を 指名 する EREE ステ ー ト メン ト K 出 会 うか , また は ブ 
ログ ラム が 終了 する まで , 割り 振ら れ た まま の 状態 と を た っ て いる 。 
被 制 件 変数 の 有効 範 朋 は , プロ グラ ム 全 体 で な いと と も ある 点 注 
意 し て いた だ きた い 。 と れ は , 前 と 「 静 的 記憶 域 」 の 項 で 説明 し た 
STATIC INTERNAL 変 数 の 場合 と 似 た 状況 C を る 。 つま り , 
存在 し て は いる が , 参照 で き な い わけ で ある 。 


FREE ステ ー ト メン ト は , 被 制御 変数 に 対し て 割り 振ら れ た 
記憶 域 を 解放 る も の で ある 。 と の あと , 記憶 域 は , 他 の 割 振り を 
する た め 再 使用 する と と が で きる 。 


一 般 (C, 範囲 が 調節 で きる よう な , 大 き を デー タ 集 合体 が ブロ グ 
ラム の 中 で 必要 な 場合 に , 被 制作 変数 は 有益 で ある 。 た と えば ぴ ば , 


DCL A(N,M) CTL: 


GET LIST(M,N): 
ALLOCATE A: 
GET LIST(A): 


FREE Aij: 


と の プログラム の 手順 は , 入力 デー タ の 状況 (応じ て 本 当 (C 必 要 な を 
量 の 記憶 域 を 割 振り, 不要 に を っ た 時 点 で デー タ を 廃棄 する ( そ 
の 記憶 域 を 解放 する ) 。 と の 方 法 の 場合 せ は, エピ ロー グ も ブロ ロー 
- グ ゃ 不要 で ある か ら , 開始 アロ ッ ク を 設定 する も う 5 1 つの 方 法 ょ り 
も , 効率 が よい 。 


被 制御 変数 に 対す る ALLOCATE ス テー トメ ント 


被 制御 変数 は , ALLOCATE ステ ー ト メン ト に よっ て の 信 , 割り 
振る こと が で きる 。 檎 制御 変数 に 対す る ALLOCATE ステ ー 
トメ ント の 一 般 形式 は , 以下 の 通り で ある 。 


ALLOCATE 〔 レ ベル 〕 識別 名 
〔 次 元 属性 〕 〔 必 性 〕 
し ,【[ レベ ル 〕 議 別名 
〔 次 元 属性 ] 
〔 必 性 〕 〕… 
ド ま NE 上 人 AE] ) 


「 議 別名 | は, CONTROLLED 属 性 を も つ 変 数 で ある 。 と れ は , 
要素 , 配列 , また は 構造 の いずれ で あっ て も よい が , 添字 を つけ た 
り , 修飾 し た りす る と と は で き な い 。 属性 と し て 指定 で きる の は , 
次 元 の 範囲 , スト リン グ の 長 さ , エリ テア の サイ ズ を 指定 する も の だ 
け で ある 。 ( エリ ア C つ いて は , と の 章 の 後 の 方 で 説明 する が , と 
の 文脈 で は , こと れ は 単に , 記憶 域 の 調節 が 可能 を 変数 と し て 扱 2。 ) 
と の と と (CC よっ て , ブロ グラ マー は , 変数 の 特定 の 世代 ど と (と 記憶 
域 の 量 を 変え る と と が で きる よう (て な る 。 と の よう な 属性 (て は, 次 
の も の が ある 。 


次 元 
CHARACTER( 長 さ ) 
BIT( 長 さ ) 
AREA( サ イズ ) 


次 元 属 性 は , 他 の いずれ と で も いっ し ょ 指定 する と と が で きる 。 
た と えば , 


DCL XX(20) CHAR(5) CONTROLLED: 


ALLOCATE X(25) CHAR(6): 


ALLOCATE ス テー トメ ント の 中 で 指定 され て いる 属性 の 値 は つ 
ね と , 同じ 変数 C 対 し て DECLARE ス テー トメ ント の 中 で 与え ら 
れ て いる も の を 略 き 換え る 。 し か し , 属性 自体 は 一 致し て いな けれ 
ば な を ならない 。 し た が っ て , 次 元 属性 は , 同じ 数 の 次 元 を 指定 し な け 
れ ば な ら な い 。DECLARE ス テー トメ ント の 場合 と 同様 , 要素 式 
を 使っ て 限界 , 長 さ ふ , お よび サイ ズ を 指定 する と と が で きる 。 


ALLOCATE ス テー トメ ント の 中 で , INITIAL 属 性 も 指定 
する と と が で きる 。ALLOCATE ス テー トメ ント の 中 で 与え られ 
大 初期 値 が , DECLARE ス テー トメ ント の 中 の 初期 値 (指定 され 
て いれ ば ) と 和紀 き 換わる 。 
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被 制御 変数 に 対す る FREE ス テー トメ ント 


相 制 件 変 数 を 指名 し て いる FREE ステ ー ト メン ト が 実行 され る と, 
その 変数 の 記憶 域 が 解放 され , その 値 が 失 を われ る 。 FREE ステ 
ー ト メン ト の 形式 は , 次 の 通り で ある 。 


FREE 識別 名 , 識 別名 〕…: 


と の 「 識 別名 」 (は , ALLOCATP ス テー トメ ント の 場合 と 同じ ヒ 
制約 が ある 。 


FREEB ステ ー ト メン ト が 指定 し て いる 変数 が , 割 振り の 行なわ 
れ な か っ た も の で ある 場合 は , 何 の 処置 も と られ な い 。 


暗示 的 な 解放 


ブログ ラム が 終了 する まで , 被 制 食 変 数 を 割 り 振 られ た まま し 
て お く 場 合 は , FREE ステ ー ト メン ト 人 よっ て 明示 的 解放 する 
必要 は を ない 。 ブ ログ ラム が 終了 する と , すべ て の 被 制 件 記 憶 域 は , 
自動 的 解放 され る 。 


被 制 御 変数 の 複数 個 の 世代 


被 制御 変数 の 記憶 域 が , 解放 され る 前 KC 再 割 振り され る と , 最初 の 

世代 が 保存 され る (すなわち, 積み 重ね られ る )。 2 番目 の 世代 が 
現在 の 世代 (に な を り , 最初 の 世代 は , 現在 の 世代 が 解放 され る まで , 
アク セス で き な く な る 。 と れ は け は , 回 帰 的 ブロ ンー ジャ ー の と と ろ で 
自動 変数 CK つ いて 述べ た 処理 法 と 似 て いる 。 し か し , 被 制 件 変数 の 
場合 は , 変数 の 積 重 ね な よび 積 重ね か ら の 解放 は , ブロ ッ ク の 境界 
の と ころ で は な を なく, ALLOCATDP お よび FREE ステ ー ト が 与え 
られ た と と ろ で 起こ と こる よう (CC な っ て お り , プロ シー ジャ ー の 呼出 し 
と は 無関係 で ある 。 


被 制御 変数 の 連続 する 世代 の 値 は , 積 重 ね られ る が , て の 値 を 最 
新 の 世代 か ら と り 出 し て , 新しい 世代 を 作る の (役立て る と と が で 
きる 。ALLOCATE ま た は DECLARE ステ ー ト メン ト の 中 で , 
境界 , 長 さ , また は サイ ズ が , その 変数 へ の 参照 を 含ん で いる 式 C 
ょ っ て 指定 され て いる 場合 は , その 前 の 最も 新しい 世代 か ら 値 が と 
られ る 。 た と えば , 
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DCL X(20)FIXED BIN CTL: 
ALLOCATE 贅 : 
ALLOCATE 区 (※(1)): 


又 の 最初 の 割 振り の 中 で は , 上 限 は , DECLARE ステ ー ト メン 
ト て よっ て 指定 され る ( つま り , 2 0 な る )。 2 番 日 の 割 振り で 
は , 上 限 は , 双 の 最初 の 世代 の 最初 の 要素 の 値 《〈 よ っ て 指定 され る 。 


旦 印 の 表記 


ALLOCATE ステ ー ト メン ト の 中 で , 区 元 , 長 さ ,。 また は サイ ズ が 
星 印 て よっ て 表示 され て いる 場合 は , その 値 は , その 前 の 最 も 新 し 
い 世 代 か ら 受け つが れる 。 配列 の 場合 は , 配列 の どの 次 元 に 対し て 
も ( 1 つ だ け で な く ), 星 印 を 使わ を な けれ ば な ら な い 。 


DCL X(10,20) CHAR(5) CTL: 
ECO 2 

Bee 2(10。 0. す 5 
PB 文 (* ょ *): 


と の 絢 で は , 双 の 最初 の 世代 の 限界 は , (1 0 , 20 ) で あり , 2 
番目 と 3 番目 の 世代 の 大 界 は , ( 1 0 , 1 0 ) で ある 。 双 の 各 世 代 
の 要素 は すべ て , 長 さ が 5 の 文字 スト リン グ で ある 。 


DPECLARE ス テー トメ ント の 中 で る 星 印 の 表示 を 用 いる と と が 
で きる が , と れ は 別 の 意味 を も っ て いる 。 たとえば, 


DCL Y CHAR($ ぉ CTL, 
N FIXED BIN: 
N 王 20: 
ALLOCATE Y CHAR(N): 


と れ せ は 単 (C, 文字 スト リン グ Y の 長 さ を , ALLOCATE ス テー ト 
メン ト の 中 で 指定 する と と を 意味 し て いる 。 と の 方 法 を 使う と , プ 
ログ ラマ ー は , 記憶 域 が 実際 (C 割 り 当 て られ る まで スト リン グ の 長 
さ の 指定 を 延期 する こと と が で きる 。 


被 制 御 構造 


構造 を 被 制 御 C す る と , その 中 (含ま れる 配列 , スト リン グ , また 
は エリ ア は いずれ $ ゃ , 調節 可能 ((〈( を る 。 と の よう な 理由 か ら , 
ALLOCATE ステ ー ト メン ト の 中 で 相対 的 構造 の 記述 が で き 
る よら CC な る 。 た と えば げ , 


DCL 1 A CTL, 
の 浅 人 三 0 50 
2 C CHAR( ゞ VARYING: 


ALLOCATE 1 A, 
2 B, 
2 6 で GAC5S う : 


FREE A: 


構造 が 割り 振ら れる と , A . B の 範 罰 は オー10 か ら 十 1 0 なり, 
A .C は , 最大 の 長 さ が 5 で , 値 が ナル の , 長 さ の 変わ る 文字 スト 
リン グ に な る 。 と の 構造 が 解放 され る と き は , 大 構造 名 だ けが 与 を 
られ る 。 被 制作 構 造 の すべ て を いっ し ょ 解放 する か , 割り 振る 
か し な を けれ ば な ら た ない 。 構造 の 一 部 分 (対し て 記憶 域 を と っ て お く と 
と は , エラ ー で ある 。 


組込み 関数 の 割 振り 


相 制 御 変数 の 現在 の 状況 - "割り 振ら れ て いる "か “解放 され て 
いる か ”- が , ブロ グラ ム が 通る 経路 次 第 で 決ま る 場合 は , 変数 が 
割り 振ら れ て いる か どう か 判断 で きる よう に する と 便利 で ある 。 
ALLOCATTION 組 込み 関数 は , そ の 被 制御 変数 に 対す る 存在 の 中 
で , 世代 の 番号 を 示す 2 進数 値 を 戻す 。 変数 が 割り 振ら れ て いな 
いと き は , ゼロ の 値 が 戻さ れる 。 関数 参照 は , 次 の よう を 形式 を し 
て いる が , 


ALLOCATION(a) 


a は , 被 制御 変数 で を けれ ば を ら な い 。 


ALLOCAT ION 組 込み 関数 の ほか に も ゃ , 役立つ 組込み 関数 
が いく つか ある 。 と の よう な 関数 と は, 配列 C 対 し て 指定 され た 次 
元 の 範囲 を 判定 する 配列 取扱 い 関 数 D IM, 所 与 の 配列 指定 され 
た 次 元 の 上 限 と 下限 を それ ぞ れ 判定 する LBOUND と HBOUND, 
が ある 。 同様 C, スト リン グ を 対し て も , スト リン グ の 現在 の 長 さ 
を 返す 組 込 関 数 ENG TH が ある 。 


基底 付記 憶 域 


基底 付 変 数 と , その 他 の すべ て の 記憶 域 ク ラス と の 基本 的 を 相違 は , 
基底 付 変数 の 名 前 は , 主 記憶 域内 C お ける 世代 の 位 國 を 識別 し な い 
と いう と と で ある 。 し た が っ て , 基底 付 変数 の 宜 言 で は , その 世代 
を 記述 する だ け , す を わ ち 記憶 域 の 必要 量 と 記憶 域 の 解釈 の 仕方 を 
記述 する だ け で ある 。 その 世代 の 位置 は , ロケ ー タ ー 変 数 と 呼ば れ 
る 別 の 変数 に よっ て 識別 され る 。 ロ ケー ター 変数 は , ポイ ンタ ー 変 
数 また は オフ セッ ト 変 数 の いずれ か で ある 。 オフセット 変数 に つい 
て は , エリ プア 変数 と 結び つけ て , 本 章 の 後 の 方 で 説明 する 。 


被 制 御 変数 の 宣言 も , 記憶 域 を 記述 する だ け で ある が , その 変数 
MC 対し て 一 旦 ALLOCATE ステ ー ト メン ト が 実行 され た あと は , 
その 名 前 は , 変数 の 位置 も 識別 す の ム エ う (CC を な る 。 と の よう な 理由 か 
ら , ブロ グラ ム 内 の 特定 の 一 地点 で , 被 制御 変数 の 2 つ 以 上 の 世代 
を 参照 する と と は 不可 能 で ある 。 事実 , 基底 付 変数 対し て ALLO- 
CATE ステ ー ト メン ト を 使用 する と と も で きる が , どの 世代 の 位 
置 も 独立 し た ロケ ー タ ー 変 数 C よ っ て 識別 され る の で , 適当 な ロケ 
ー タ ー 値 を 使用 すれ ば , ブロ グラ ム 内 の どの 地点 か ら も ゃ , 基底 付 変 
数 の どの 世代 で も ゃ 参照 する と と が で きる 。 


基底 付 変数 


基底 付 変数 の 宣言 で は , BASED と いう キー ワー ド と , 任意 選択 
で , その 基底 付 変数 と 結び つけ られ る ロケ ー タ ー 変 数 の 名 前 を 指定 
する 。 た と えば, 


DCL 又 FIXEBD BIN BASED(P): 
と の 宣言 の 場合 , 変数 P の 値 《 ょ っ て , 変数 双 の 位 賀 が 識別 され る 。 


と の よら を ポイ ンタ ー 変 数 の 結び つけ 方 は , 特別 を 関連 づけ で は 
を い ぃ い 。 P を 用 いて , 他 の 基底 付 変数 の 位置 を 識別 する こと と が で きる 
し , また , 他 の ログ ケ ー タ ー を 用 いて 又 の 他 の 世代 を 識別 する こと も 
で きる 。 


ロケ ー タ ー の 修飾 


基底 付 変数 の 値 の 参照 は 2 つの 部 分 か ら な っ て いる の で , と れ は 修 
飾 さ れ た 参照 に を り , 構造 の メン バー へ の 参照 と 区 別 す る た め と , 
ロケ ー タ ー 修 飾 参照 と 呼 ば れる 。 合成 記号 一 > ( 負 符 号 の すぐ 後 
「 ょ より 大 」 の 記号 を つづ けり て 書く ) は , | C エ より 修飾 され た | また 
は 「~ て を 指す 」 と いう と と を 表わし て いる 。 た と え げ , 
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テラ テース 


又 信 基底 付 変数 , P は ロケ ー タ ー 式 で を けれ ば な ら な い 。 と の 参照 
は , ロケ ー タ ーP の 値 (C よ っ て 識別 され る の 世代 を 意味 し て いる 。 


基底 付 変数 が , 宣言 の 中 で ロケ ー タ ー 変 数 と 結び つけ られ て いる 
場合 は , プロ グラ マー 付 , 参照 の 中 で は , 基底 付 変数 の 名 前 だ け を 
指定 すれ ば よい 。 た と えば げ , 


DCL X FIXED BIN BASED(P): 


ALLOCATE 欠 : 


( と の ALLOCATE ス テー トメ ント は , XX の 参照 が , 割り 振ら 
れ た 記憶 域 C 適 用 され る よら (CC, ポイ ンタ ー 変 数 P の 値 を モッ ト す 
る 。 ) 割 当て ステ ー ト メン ト の 中 で 双 を 参照 する と , 暗示 的 に PC 
よっ て ロケ ー タ ーー 修飾 され る 。 次 の よう (と, 明示 的 (と 参照 を ロケ ー 
ター 修飾 する と と も で きる 。 


P->X = P->X 十 1: 


と の 割当 て ステ ー ト メン ト は , 前 の 例 と 同じ 効果 を も っ て いる 。 基 
底 付 変数 は . ポイ ンタ ー 変 数 を 指名 せ ず 宣言 する と と が で きる 。 
と の よう な 場合 は , 基底 付 変数 を 参照 すみ と き は つね (と , 明示 的 
ロケ グー ター 修飾 し し な けれ ば を ら な い 。 


(PL ン I で は , と と で 述べ た も の より ゃ も っ と 一 般 的 を ロケ ー タ ー 
修飾 の 形式 が 許さ ん て いる と と 注意 し て いた だ きた い 。 と の と と 
CC つ いて は , と の 章 の 終り の 方 の 「 複 数 個 の ロケ ー タ ー 修 飾 」 の と 
と ろ を みて いた だ きた い 。 し か し , と の 章 の 残り の 部 分 を 理解 する 
上 で , と の 一 般 形 式 は あま り 重 要 で は な い 。 ) 


ポイ ンタ ー 変 数 

ポイ ンタ ー 変 数 は , それ が 基底 付 変数 の 宣言 の 中 に 出 て きた と き , 
ロケ ー タ ーー 修飾 と し て 出 て きた と き , あるいは ALLOCATE, 
LOCATE, また は READ ス テー トメ ント の SET オ プシ ョ ン の 
中 (C 出 て きた と き し , 文脈 的 (て 宣言 さ れる 。 と れ は また , 次 の 便 の 


場合 の よら, 明示 的 (C 宜 言 す る と と も で きる 。 


DCL Q POINTER: 
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Q は 変数 を の で , 記憶 域 ク ラス を も っ て いな を なけれ ば な ら な い 。 と の 
場合 C は , 省略 時 解 息 に エリ り AUTOMATTIC が 適用 され る 。 ボ ポイ 
ンタ ー 変 数 は プロ グラ ュ 制 伯 変 数 で ある か ら , 算術 値 と 同じ ょ う 
扱う 9 こと こと は で き な い 点 C 注 意 し て いた だ きた い 。 ポ イン ター 変数 を 
集め て , 配列 や 構造 上 する と と が で きる 。 

ポイ ンタ ー 式 


ポイ ンタ ー 式 と は , ポイ ンタ ー 変 数 ( 修飾 また は 添字 を つけ る と と 
が で きる ), また を は ポイ ンタ ー 値 を 返す 関数 参照 の いずれ か で ある 。 


ボイン ター 式 は , 次 の よう CC し て 使用 する と と が で きる 。 
1. ロケ ー タ ー 修 飾 と し て ( 基底 付 変数 の 宣言 と 結び つけ て )。 


2. 比較 演算 の 中 で , た と えば , IF ステ ー ト メン ト の 中 で ( ポ 
イィ ンタ ー 値 は , 等 , 不 等 の 比較 し か で き な い )。 


3 プロ シー ジャ ー 参 照 の 中 の 引数 と し て 。 
ポイ ンタ ー 変 数 の セッ ト 
ポイ ンタ ー 修 飾 変数 を 参照 する 前 に , ボイン ターKC 値 を 与え を て お か 
な けれ ば な を ならない 。 ポイ ンタ ー 値 は , 次 の いずれ か か ら 得 る と と が 
で きる 。 

1. NULL 組込み 関数 

2. ADDR 組込み 関数 

3 READ また は LOCATE ステ ー ト メン ト 

4. ALLOCATE ス テー トメ ント 
すべ て の ボイン ター 値 は , 最初 は , これら の 4 つの 方 法 の いずれ か 
か ら と られ る 。 そ の あと で , と の よう な 値 は , ポイ ンタ ー 変 数 に ポ 
イン ター 値 を 複写 する 割当 て の 方 法 や , オフ セッ ト 値 を ポイ ンタ ー 
値 (変換 す る ( ある い は その 逆 の 変換 ) コロ ケー ター 変換 の 方 法 , プ 
シー ジャ ー か ら ボ ポイ ンタ ー 値 を 戻す 方 法 , と よっ て 処理 する と と が 
で きる 。 


ADDR 組込み 関数 


ADDR 組込み 関数 は , 変数 の 最初 の バイ ト を 識別 する ポイ ンタ ー 
値 を 返す 働き を する 。 と の 変数 は , どの よう を デー タ ・ タ イプ また 


は 構成 の も の で よい し , どの よう な 記憶 域 ク ラス の も の で も よい 。 
た と えば げ , 


P 三 ADDR(): 
と と で , P は , ポイ ンタ ー 変 数 で あり , 又は 連結 され る 変数 で ある 。 


と の 組込み 関数 へ の 引数 は , 磯 字 付 の 修飾 され た 参照 で あっ て も よ 
い 。 た と えば , 


DCL A(3,2) CHARACTER(5) BASED(P), 


B CHAR(5) BASED(Q), 
C(3,2) CHARACTER(5): 


P = ADDR(C): 
Q 三 ADDR(A(2,1) ) : 


と の 例 で は , 配列 A お よび C は , 同じ 記憶 域 を 参照 し て いる 。 要素 
B と C( 2 , 1 ) も 同じ 記憶 域 を 参照 し て いる 。 


と の よら みか 方 法 で 基底 付 変 数 が オー バー レー され る と き は , 新 し 
ぃ い 記憶 域 は 割り 振ら ちら れ を いと と ん 注意 し て いた だ きた い ー- 基 底 
付 変数 は , 基底 付 変 数 が その 上 (C と オー バー レー され る 変数 ( と の 例 
で は A( 3 , 2 ) ) と 同じ 記憶 域 を 使用 する 。 


と の ォ オー バー レー の 技法 は , DEF INED 属 性 を 用 いて 行なう と 
と も で きる が , DEF INED 属 性 の 場合 の オー バー レー は 永久 的 で 
ある と いら 点 が , 重要 を 違い で ある 。 基底 付 変数 が オー バー レー され 
る と き は , ポイ ンタ ー 変 数 C 新 し い 値 を 割り 当て る と と (よっ て , 
プロ グラ ム の 中 で いつ で も , その 結び つき を 変え る と と が で きる 。 
普通 , PL ルン 1 では, データ ・ タ イプ の 異な る 変数 で オー バー レー 
(た と を えば, ビッ ト ・ ス トリ ング て よっ て 整数 を オー バー レー ) す 
る と と は 許さ れ を い が , と の コン バイ ラー で は , 特別 < 可能 (C な っ 
て いる 。 た だ し , 基底 付 変数 の 属性 と + ォ オー バー レー され る 変数 の 本 
性 と の 間 の 矛盾 を 認識 する 手段 を コン バイ ラー が も っ て いる わけ で 
は を な いと と を 理解 し て お な いて いた だ きた い 。 


ADDR 組込み 関数 で は , 変数 の 構成 に つい て の 情報 は 与え られ 
を い 。 し た が っ て , 変数 が 集合 体 で も ある と き (, 全体 と し て 参照 し 
た けれ ば , 連続 する 記憶 域 に 入れ て お か な けれ ば を ら な い 。 たとえ 
ば , 変数 が 配列 の 断面 で ある 場合 は , それ ら の 要素 を イン ター リー 
プ し て は な ら を な い 。 し か し , と の コン バイ ラー で は , 変数 が 長 さ の 
変わ る ストリ ング また は エリ ア で ある と まき は, 制御 情報 は 変数 の 必 
須 の 部 分 で ある 。 長 さ の 変わ る スト リン グ の 前 (て は , 2 バイト の 長 
ささ フィー ルド が つけ られ て お ぉ お り , エリ ア の 前 に は 1 6 バイ ト の 制 飼 
情報 が つけ られ て いる 。 し た が っ て , これら の タイ ズ の 変数 (と 対 し 
て ADDR 関数 が 実行 され た と き は , ポイ ンタ ー 値 は 制御 情報 の 先 
頭 を 指し て いる 。 


ADDR 関数 の 使い 方 関す る その 他 の 規則 は , G 節 | 組込み 関 


数 と 擬似 変数 ] の と と ろ で 述べ る 。 


基底 付 変数 と 入出 力 


基底 付 変数 は , スト リー ム 方 式 ま を た は レ ュ コード トド 方 式 転 送 の いずれ か 
を 用 いて , 転送 する と と が で きる 。 


リス ト 指 示 形 式 の スト リー ム 方 式 転送 で は , 基底 付 変数 が ロケ ー 
ター 修飾 (暗示 的 また は 明示 的 (C ) され て いれ ば , 他 の タイ プ ブ の 変 
数 と 同じ ょ うら に し て 処理 され る 。 た と えば げ , 


GET LIST (Pー> 丈 ): 


し か し , デー タ 指 示 転 送 で は , 宣言 の 中 で ロケ ー タ ー 式 と 結び つけ 
られ た 基底 付 変数 だ け を 転送 する と と が で きる 。 たとえ ばば, 


DCL Y BASED(Q⑳⑩), 必 BASED: 
PUT DATA(Y): 


変数 Z は , PUT DATA ま た は GET DATA ス テー トメ ント 

( つま り , デー タ 指 示 の 入出 力 ) で は , 転送 する と と が で き な を い 。 
スネ スト リー ム 方 式 の 転送 の 技法 と 機能 に つい て は , 第 1 1 章 で 説明 す 
る 。 


レコ ー ド 方 式 の 転送 に は , 2 つの 処理 モー ド が ある 。 移動 モー ド 
は , 緩衝 域 を 使っ て , 変数 の 割り 振ら れ た 世代 の 中 へ (また は そ . 
の 中 か ら ) 直 接 的 また は 間接 的 に デー タ を 移動 する る の で ある 。 
位置 指定 モー ド は , 緩衝 域 へ ( また は 緩衝 域 か ら ) デー タ を 移動 し , 
緩衝 域 の 中 (割り 振ら れ た 記憶 域 を 識別 する だ け の 働き を する 。 
基底 付 変 数 は , どちら の モー ド を 用 いて る 転送 する と と が で きる が , 
本 来 は , 位置 指定 モー ド を 使用 する ょ 2 設計 され た も の で ある 。 位 
置 指 定 モー ド で は , 基底 付 変数 は 緩衝 域 の 内 容 を 記述 する た め 用 
いら れる の で , デー タ が 緩衝 域 の 中 に ある 間 は , 処理 する と と が で 
きる 。 


位置 指定 モー ド は , BUFFERED フ ァイル 対し て だ け 適 用 さ 
れる と と 注意 し て いた だ きた い 。 ま た , と の ファ イル は は, キー の 
順序 に な っ て いる VSAM デー タ ・ セ ッ ト K 関 連 づ けら れ た 
INPUT ぉ および UPDATE フ ァイル の 場合 以外 は SEQUENT TI AL 
で を けれ ば を ら な い 。 


第 1 2 章 「 レ ュー ド 方 式 の 転送 ] の と と ろ で , と の 2 つの モー ド 
(て つい て , 詳し く 説 明 す る 。 
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SET を 伴 な う READ ステ ー ト メン ト 


位置 指定 モー ド で は , REPAD ステ ー ト メン ト は 次 の よう を 形式 を 
し て いる 。 


READ FILE( フ ァイル 式 ) 
SET (要素 ポ イン ター 変数 ) : 


と の ステ ー ト メン ト は , 緩衝 域 に と レコ ー ド を 入れ , 指定 され た ポイ 
ンタ ー 変 数 を セッ ト す る と と よっ て , その 位置 を 識別 する 。 と の 
ポイ ンタ ー 変 数 C よ っ て 修飾 され た 基底 付 変数 は いずれ も , 緩衝 域 
の 内 容 を 記述 する 。 た と えば げ , 


DCL XX CHAR(20) BASED(P), 
Y(20) CHAR(1) BASED(P): 


READ FILE(IN) SET(P):j: 


と の プロ グラ ム ・ セ グ メ ント で は , 1 つの レコ ュー ド が 緩衝 域 (C 読 人 
込ま きれ, ポイ ンタ ー 変 数 P が その 位置 を 識別 する 。 緩衝 域 の 中 の レ 
コー ド は , 基底 付 変数 X(C ょ っ て , 固定 長文 字 ス トリ ング と し て , 
また 基底 付 変 数 YC よ っ て , 1 桁 の 文字 の 配列 と し て , 同時 取り 
扱わ れる 。 P は , 文脈 的 に , ポイ ンタ ー 変 数 と 推論 され る と と , 
また は Y へ の 参照 は , 暗示 的 に CP(C よ っ て 修飾 され る と と 注意 し 
て いた だ きた い 。 


LOCATE ス テー トメ ント 


LOCATE ステ ー ト メン ト は , SET を 伴 を た ら READ ス テー ト 
メン ト を 補う も の で あっ て , 緩衝 域 か ら の 出力 対し て 用 いら れる 。 


LOCATE 基底 付 変数 
FILE( フ ァイル 式 ) 
(SET (要素 ポイ ンタ ー 変 数 ) 〕 : 


と の ステ ー ト メン ト 全 , 指定 され た 基底 付 変数 に 対 し て 緩衝 域 の 中 
記憶 域 を 割り 振る も の で ある 。 SET オ プシ ョ ン は , 基底 付 変 
数 が , 宣言 の 中 で ポイ ンタ ー 変 数 と 結び つけ られ て いな いと きだ 
け 指 定 す れ ば よい 。 


LOCATE ステ ー ト メン ト は , 他 の すべ て の 転送 スチ テー トメ ン 
ト と は 異な る 働き を する 。 と の ステ ー ト メン ト は , 記憶 域 ア ドレ ス 
を 指す サポ イン ター を セッ ト す る も の で ある か ら , その 記憶 域 へ の 値 
の 割付 けが 終了 する まで ,- 転 送 す る も の は 何 も を い 。 LOCATE 
ステ ー ト メン ト は , 前 の レコ ー ド ( つまり, 前 の LOCATE ステ 
ー ト メン ト (て よっ て 得 ら れ た 記憶 域 の 内 容 ) を 転送 し , その レコ ュー 
FC 対す る 記憶 域 を 解放 し て , その 記憶 域 を 次 の レコ ュー ド K 割 り 振 
る 。 同じ ファ イル 対し て WRITE また は CLOSE ステ ー ト 
メン ト が 実行 され た と きじ と も, 現在 の レコ ュー ド が 転送 され る 。 次 の 
例 は , LOCATE ステ ー ト メン ト の 用 法 を 示す も る の で ある 。 
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LOCATE ステ ー ト メン ト の 操作 方 式 の 性 格 か ら , いく つか の 
ファ イル を グル ー プ し C し て いる 場合 は , 装置 と 関連 づけ られ た ファ 
イィ ル 対し て と の 方 式 を 使 2 と き は , 注意 する 必要 が ある 。 と の よ 
う な 場合 は , グル シープ 内 の いずれ か が 閉じ られ た あと は , 転送 を 行 
な ら と と が で きた な い 。 (第 1 2 章 「 装 置 と 関連 づけ られ た ファ イル | 
を 参照 の こと と )。 


DCL 1 STR BASED(P), 
2 NAME CHAR(20), 
2 RATE FIXED(5,2 ): 


OUTPUT :LOCATE STR FILE(OUT): 
プ *ASSIGN VALUES TO STR* ブ 


GO TO OUTPUT : 


位置 指定 モー ド を 用 いる と , プロ グラ マー は , いく つも の 半 を る 形 
式 の レコ ュー ド を 同じ ファ イル 入れ て ぉ く よう , 指定 する と と が 可 
能 ( な る 。 た と えば , 


DCL 1 STR1 BASED(P), 
2 CODE CHAR(1), 
2 X CHAR(30), 
1 STR2 BASED(Q), 
2 CODE CHAR(1), 
2 X(8) FIXED BIN: 


READ FILE(1IN) SET(P): 
IF STR1.CODE 王 !2!) THEN DO: 
QーP : 
1 デ Q->XX( 1 ): 


と の プロ グラ ム ・ セ グ メ ント で は , 各 基 底 付 構造 は それ ぞ れ , その 
構造 を 識別 する た め の 要 素 CODE を も っ て いる 。 レコ ー ド が 読み 
込 を れ , その 位置 が P の 中 に モッ ト さ れる 。 CODE の 値 V と 応じ て , 
レ ュ ー ド を STR2 と 解釈 で きる よう (人 C, P の 値 が QC 割 り 当 て ら 
れる 。 


長 さ の 変わ る 要素 スト リン グ を , 位置 指定 モー ド を 用 いて 転送 す 
る 場合 は , ENVI RONMENT 属 性 の SCALARVARYING オ 
プシ ョ ン を その ファ イル 対し て 指定 し を けれ ば を ら な い ( 第 1 2 章 
「 レ ュー ド 方 式 の 転送 」 を みて いた だ きた い ) 。 レコ ー ド は , 長 
さ 2 バイト の 接頭 語 が 含ま れる 。 


自己 定義 の デー タ (REFER オ プシ ョ ン ) 


自己 定義 の レコ ュー ド と は , その 中 含ま れる フィ ー ル ド K 関 する 情 
報 , た と を ば スト リン グ の 長 さ な を ど , 自分 の 中 含ん で いる レ ュ ー 
ド で ある 。 基底 付 構造 は , と の よう を な デー タ を 処理 する と と が で き 
る よう 宣言 する と と が で きる 。 ス トリ ング の 長 さ , 配列 の 限界 , 
お とび エリ ア の サイ ズ は すべ て , 構造 の 中 で 宣言 され て いる 変数 
ょ っ て 定義 むせ る こと と が で きる 。 その 構造 が 割 り 振 られ る と き 
(ALLOCATE ス テー トメ ント , また は LOCATE ステ ー ト メ 
ント の どちら か と エ っ て ) と , 長 さ , 限界 , また は サイ ズ を 定義 す 
る 変数 (C, 式 の 値 が 割り当て られ る 。 とれ われ 以外 に それ ら の 構造 が 参 
照 さ れ た 場合 は , 定義 され た 変数 の 値 が 用 いら れる 。 


REFER ォ オプ ショ ン は , 基底 付 構造 の 宣言 の 中 で 用 いら れる も 
の で , その 構造 の 割 振り が 行なわ れる と き , その 構造 内 の 変数 に 
式 の 値 を 割り 当て る と と , また その 式 の 値 は , その 構造 内 の 別 の 変 
数 の 長 さ , 限界 , また は サイ ズ を 表わし て いる と と を 指定 する も の 
で ある 。 REFER オォ オプ ショ ン の 一 般 形 式 は , 次 の 通り で ある 。 


要素 式 REFER 
( 要素 変数 ) 


要素 式 の 値 は , 整数 (て 変換 で きる も の で な けれ ば な ら な い 。 式 の 中 
で オォ ペラ ンド と し て 用 いら れる 変数 は , REFER オ ブシ ョ ン を 含 
ん で いる 構造 KC 属す る も る の で あっ て は な ら を ない 。 


要素 変数 ( RPFER オ プシ ョ ン の 目的 語 と も いう ) は , 宣言 さ 
れ て いる 構造 の メン バー の 名 前 で を けれ ば な を な ら な い 。 とれ は , ログ 
ー タ ー 修 飾 や 浅 字 の つい て いる も の で あっ て は ならない し, また , 
SN 
STR BASED(P), 

2 XX FIXED BINARY, 
2 Y (L REFER ( 叉 ) ), 
L FIXED BINARY INITIAL(1000): 


DECLARE 1 


と の 宣言 は , 基底 付 構造 STR が 配列 Y と 要素 双 で 構成 され て いる 
と と を 指定 し て いる 。 STR が 割り 振ら れる と き , その 上 限 は 。 


双 C 割 り 当 て られ る し の 現在 の 値 KC モ ッ ト さ れる 。 と の ほか (CY を : 


参照 し た と き は (P を セッ ト す る READ ステ ー ト メン ト な ど ), 
その 限界 の 値 は , 駐 か ら と られ る 。 
次 て あげ る 制約 が 1 つ で も 漬 足 さ れ て いれ ば , 構造 の 宣言 の 中 で 
いく つ で も REFER オ ォ オプション を 使用 する と と が で きる 。 
1 REFEER オプ ショ ン の すべ て の 目的 語 が 論理 レベ ル 2 で 宣 
言 さ れ て いる ( つま り , 小 構造 の 中 で 宣言 され て いな を い )。 
た と えば げ , 


ょ に 
で み 


DECLARE 1 


の: 


DECLARE 1 


3. 


5 * 電 2 YY 


STR BASED, 

2 (M,N), 

2 ARR(1 REFER (M), 
J REFER(N)), 

2 文 : 


と の 構造 が 割り 振ら れる と き , 1I と JK 割 り 当 て られ た 値 
(て よっ て , 2 克 元 の 配列 ARR の 限界 が モッ ト さ れる 。 


構造 の メン バー と メン バー の 間 バ ディ ング が 起 ら を いよ ら 
C, 構造 が 宜 言 され て いる 。 K 節 「 デ ー タ ・ マ ッ プ の と と 
ろ で , 構造 の マッ プ を 作る と き の 規 則 に つい て 述べ る 。 た と 
えば , 


STR UNALIGEND BASED (P), 
2 B FIXED BINARY, 
9 0 
3 D FLOAT DECTIMAL, 
3 E (1 REFER (D) ) 
CHAR(J REFER (B)), 
2 G FIXED DECIMAL: 


と の 構造 は UNALIGNED 尾 性 を も あっ て いる の で , どの 項 
目 も バイ ト 境 界 (C 合 っ て さえ いれ ば よい 。 し た が っ て , B と 
D( REFER の 目的 語 ) の 値 の 如何 C 関 わり な く , パ デ 
ィング は 起ち を い 。 D は , 小 構造 の 中 で 宣言 され て いる と と 
(と 注 意 。 


構造 の 宣言 の 中 で RPRER オプ ショ ン が 1 度 だ け 使 用 され 
て いる 場合 は , 次 の 条件 (C 適 っ て いれ ば げ ば , 制約 1 と 2 を 無視 
する と と が で きる 。 


a. スト リン グ の 長 さ , また は エリ アテ の サイ ズ 底 関し て , 構 
造 の 最後 の 要素 に と の オプ ショ ン が 適用 され て いる 。 


b. 配列 の 限界 C 関 し て , 構造 の 最後 の 要素 , また は 最後 の 
要素 が 含ま れ て いる 小 構造 の どちら か に と の オプ ショ ン 
が 適用 され て いる 。 と の 配列 の 限界 は , 先頭 の 次 元 の 上 
限 で を けれ ば な を ら な い 。 た と え げ , 


DCL 1 STR BASED (P), 


2 XX FIXED BINAKRY, 


B 3 必 み FLOAT DECIMAL, 
Ia 3 M FIXED DECIMAL, 
2 D (L REFER (M)), 
3 EE (50), 
3 FE (20): 


この 宮 言 は , 制約 1 を また は 2 の 条件 を 満足 し て い を い 。 
つま り , REFER の 目的 語 M は , 小 構造 の 中 で 宣言 さ 
れ て いる し , バディ ング も る 起 っ て いる 。 し か し , と の 

REFER オ プション は , 最後 の 要素 が 含ま れ て いる 小 
構造 適用 され て いる の で , 制約 3 が 満足 され て いる 。 
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一 段 高 い レ ベル か ら , 配列 の 先頭 の 次 元 を 受け つぐ と と 
が で きる 点 と 注意 し て いた だ き た い 。 た と えば , 上 の 例 
で , STR(4) と 宣言 し た と すれ ば , D の 先頭 の 次 元 は 
STR(4) か ら 受 けつ が れる と と に を り , D の 中 で 
REFER オプ ショ ン を 使う 9 こと が で き な く な る 。 


REFER オプ ショ ン の 目的 語 の 値 が , プロ グラ ム の 間 変 化す る 
場合 は 「』 


1 目的 語 が , それ が 割り 振ら れ た と き (C て も っ て いた 値 復元 
され る まで , 構造 を 開放 し て は ならない 。 


2. 日 的 語 が , それ が 割り 振ら れ た と き の 値 より も 大 きい 値 を 
も っ て いる 間 は , 構造 を 書き 出し て は を ら を い 。 


3 目的 語 が , それ が 割り 振ら れ た と き (C も っ て いた 値 と 同じ 
か , それ 以下 の 値 を も っ て いる と きけ は , 構造 を 書き 出し て も 
ェ い 。 実際 (C 書 か れる 要素 の 数 , スト リン グ の 長 さ , また は 
エリ ア の サイ ズ は , 目的 語 の 現在 の 値 に たよ エ っ て 表わさ れる $ 
の に C な る 。 た と えば , 


DCL 1 REC BASED (P), 
2 N, 
2 A (M REFER(N)), 
M INITIAL (100): 


ALLOCATE REC: 
N 三 86: 
WRITE FILE (XX) PROM (REC): 


と の 例 で は , REC の 8 6 個 の 要素 が 書か れる 。 N は , 割り 
振ら れ た と きも っ て いた 値 (つま り , 100 ) 復元 し 
を けれ ば な を ならない の で , と の 時 点 で REC を 解放 する と エラ 
ー(C な る 。NC1 0 0 ょ り 大 きい 値 が 割り 当て られ た 場合 は , 
WRITE ステー トメ ント 出会っ た と き , エラ ー が 起 と る 。 


リス ト 処 理 


リス ト 処 理 は , デー タ の 集まり を 操作 する 助け と な る いく つか の 披 
法 に つけ られ た 名 前 で ある 。 PL ノ T の 配列 や 構造 も デー タ の 集まり 
を 操作 する の (CC 用 いら れる も の で は ある が , リス ト 処 理 の 技法 は , 
プロ グラ ム の 実行 中 に デー タ の 集まり を 作成 し た り , 修正 し た りす 
る と と が で きる と いり 9 ら 点 で , さら 柔軟 性 を も づつ 技 法 で ある 。 と と 
で は , これ ら の 技法 の 例 を 詳 述 する の が 目的 で は を く , 単に , と の 
タイ プ ブ の 処理 の 基礎 と を る - も の と し て , 基底 付 変数 と ロケ ー タ ー 変 
数 が 如何 役に立つ か を 示す の が , その 目的 で ある 。 


リス ト の 中 に ある 別 の メン バー の 位 國 を 識別 する ポイ ンタ ー を , 
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各 メ ン バ ベー の 中 最低 1 個 は も っ て いる リス ト は , 連鎖 され た ( ま 
た は 縫い 合わ され た ) リス ト と 呼ば れる 。 と の よう な リス ト を 作る 
た め (C, ALLOCATE お よび FREE ス テー トメ ント が 用 いら れ 
る 。 


基底 付 変 数 に 対す る ALLOCATE ス テー トメ ント 
と の ステ ー ト メン ト の 形式 は , 次 の 通り で ある 。 


ALLOCATE 基底 付 変数 

[ IN( エ リア 変数 ) 〕 
[SET( ロ ケー ター 変数 ) 〕 

[ , 基底 付 変数 〕 

[ IN( ェ リア 変数 ) 〕 
[SET( ロ ケー ター 変数 ) 〕) …: 


基底 付 変数 の デー タ ・ タ イプ また は 構成 は , どの よう を も の で あっ 
て も よい 。 基底 付 変数 が , ボイン ター 変数 と 結び つけ ず 《 宣 言 さ れ 
た 場合 , また は , 基底 付 変数 と いっ し ょ (< 宣 言 さ れ た ポイ ンタ ー を 
固定 し て ぉ き , 割り 振ら れ て いる 基底 付 変数 の 世代 を 指し 示す た 
め に は 別 の ポイ ンタ ー を セッ ト す る , と いう 必要 が ある 場合 に は , 
SEBT オ プシ ョ ン が 必要 で ある 。 


基底 付 変数 に 対す る FREE ス テー トメ ント 
ステ ー ト メン ト の 形式 は , 次 の 通り で ある 。 


FREE [ロケ ター ター 修飾 子 ->〕 
基底 付 変 数 [ IN( ェ リア 変数 ) 〕 

[ ,【 ロ ケー ター 修飾 子 >〕 

基底 付 変数 [ IN( ェ リア 変数 )]〕 … : 


ステ ー ト メン ト の 中 で ポイ ンタ ー 修 飾 子 を 指定 する と と (て よっ て 。, 
基底 付 変数 の 特定 の 世代 が 解放 され る 。 修飾 子 が 省略 され て いる と 
き は , その 宣言 の 中 で 基底 付 変数 と 結び つけ られ て いる ポイ ンタ ー 
変数 が 使用 され る 。 こと の よう な 場合 (C, 基底 付 変数 に ポイ ンタ ー 変 
数 が 結び つけ られ て い を か っ た と き は , エラ ー(C な る 。 


基底 付 変数 の 複数 個 の 世代 


適当 を ボイン ター 変数 を 指定 する と と に ょ っ て , 基底 付 変数 の 現在 
の 世代 の すべ て を 参照 する こと と が で きる 。 リ スト 処理 で は , 多く の 
世代 を も つい くつ も の 基底 付 変数 を , 1 つの リス ト K 組 み 人 入れ る と 
と が 可能 で ある 。 リ スト 内 の いく つか の メン バー は , ある メン バー 
の 中 に あ る , 別 の メン バー の 位置 を 識別 する ポイ ンタ ー に よっ て , 
互い C 連 鎖 さ れる 。 基底 付 変数 の 割 振り で は , その 変数 を 主 記憶 城 
内 の ど と K 割 り 振 る か と いう と と を 指定 する と と は で き な を いと と 
と 注 意 し て いた だ きた い 。 


項目 1 


前 向き の ポイ ンタ ー 


デー タ 


図 8.1 


実際 (C, 項目 の チェ イン (連鎖 ) は , 主 記 憶 域 全 体 (C 散 在 す る と と 
も ある が , 各々 の ポイ ンタ ー を アク セス する と と (て よ っ て , 次 の メ 
ン バ ペー が 見 つけ られ る 。 リス ト 内 の メン バー は , 通常 , ポイ ンタ ー 
変数 を 含む 構造 で ある 。 た と えば , 

DCL 1 STR BASED(H), 
2 P POINTER, 
2 DATA, 
T POINTER: 


ALLOCATE STR: 
TH : 


NEXT:ALLOCATE STR SET(Tー>P): 
イー エー テ P 』: 


GO TO NEXT: 


と の プロ グラ ム ・ セ グ メ ント で は , 構造 の リス ト が 作ら れる 。 とれ 
ら の 構造 は , STR の 世代 で あり , 各 世 代 の 中 (C あ る ポイ ンタ ー 変 
数 PC よっ て 連係 され る 。 リ スト の 作成 中 は , 独立 し た ポイ ンタ ー 
変数 TC よ っ て , 前 の 世代 が 識別 され る 。 最初 の ALLOCATE ス 
テー トメ ント は , それ を 識別 する た め に ポイ ンタ ー 是 を セッ ト す る 
も の で ある 。 最終 的 に , ポイ ンタ ー 耳 は , リス ト の 始ま り ( つ まり 
先頭 ) を 議 別 する 。 2 番目 の ALLOCATE ステ ー ト メン ト は , 

こと の 新 し い 世代 の 位置 を 識別 する た め (C, 前 の 世代 の 中 の ポイ ンタ 
ーP を セッ ト す る 。 Tー ヤ エー>P: と いう 割当 て ステ ー ト メン ト は , 
新しい 世代 の 位置 を 識別 する た め C, ポイ ンタ ー〒 を 更新 する も の 
で ある 。 


図 8 1 は, と の 連鎖 を 図 で 表わし た も の で ある 。 


各 世 代 の 中 CC ある P の 値 が , 別 の ポイ ンタ ー 変 数 (た と を えば, P 
の 上 KK 定義 され て いる ポイ ンタ ー 変 数 ) の 中 (保存 され て いな い 限 
り , STR の 世代 は , リス ト が 作成 され た 順序 で し か アク セス する 
と と は で き な い 。 上 の 例 で は , 次 の よう を な ステー トメ ント を 使用 し 
て , 各 世 代 を 順 々 (と アク セス する と と が で きる 。 


前 向き の ポイ ンタ ー 


前 向き の ポイ ンタ ー 


デー タ 3 


一 方 向 の 連鎖 の 例 


TH : 
NXT: エ ー テ DATA 三 称 : 


Tー ギ キー ジテ P jj 
GO TO NXTT: 


NULL 組込み 関数 


上 で 述べ た 方 法 で リス ト を 作成 する と き は , リス ト の 終り を 表示 す 
る 必要 が ある 。 NULL 組込み 関数 は , 記憶 域内 の 位 加 を 識別 で き 
な い ポ イン ター 値 を 返す 。 し た が っ て , リス ト 内 の 最後 の 世代 の 中 
の ボ ポイン ター を , NULL の 値 《( セ ッ ト す る と と に よっ て , リス ト 
の 終り の 確実 た 表示 を する とこ と が で きる 。 た と え ゆ , 


TH : 
NXT: IF TーーNULL THEN 
DO : 
エー テ DATA デ X : 
Tー テ エージ P : 
GO TO NXT: 
END: 


と の プロ グラ ム ・ セ グ メ ント は , リス ト を 走査 する た め (C, 前 の 例 
の か わり 使用 する と と が で きる 。 STR の 最後 の 世代 の 中 の ポイ 
ンタ ーP は , NULL の 値 《 セ モッ ト さ れ て いる も の と する 。 


一 般 C, NULL 組込み 関数 の 値 は . ポイ ンタ ー( ま た は オフ セ 
ッ ト ) 変 数 が , 記憶 域内 の 位置 を 識別 し て は を ら を な いと き ( 人 用 いら 
れる 。 ポ イン ター( に ナル の 値 を 与え る た め の 唯一 の 方 法 は , NULL 
組込み 関数 の 値 を 割り当て る 方 法 で ある (特別 を 場合 が 1 つ だ け あ 
る 。 と れ に つい て は , G 節 「 組 込み 関数 と 擬似 変数 ] の と と ろ で 
ADDR 組込み 関数 の 項 を みて いた だ きた い )。 基底 付 変数 の 世代 
を も は そ や 識別 し を な く な っ た ポイ ンタ ー 変 数 の 値 (た と えば , 基底 付 
変数 が 解放 され て し まっ た あと な ど ) に つい て は , わか ら な を ない 。 
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リス ト の タイ プ 


こと これ まで (て 上 げた 例 は , 単純 を リス ト 処 理 の 扱 法 ( 一 方 向 の リス ト 
の 作成 ) を 示す も の で あっ た 。 と の 構造 別 の ポイ ンタ ー 変 数 を 加 
える と と (て よっ て , も っ と 複雑 を な リ スト を 作る と と が で きる 。 第 2 
の ポイ ンタ ー を こと れ 加え る と , 前 の 世代 を 指し 示す と と も ゃ 可能 
を る 。 と の よう する と , リス ト は 両方 向 の も る の に な り , 適当 を ポ 
イン ター 値 を 使用 すれ ば , リス ト 内 の どの 項目 か ら ゃ , 前 の 項目 
と 次 の 項目 を アク セス する と と が で きる よう (に て な る 。 最後 の ポイ ン 
ター 値 を NULL の 値 《 に セッ ト す る か わり に C, リス ト の 最初 の 項目 
を 指す よう セッ ト し て , 輪 ま た は 循 舞 の リス ト を 作る と と が で きる 。 


1 つの 基底 付 変 数 の 世代 だ け で リス ト を 構成 する 必要 は を い 。 2 
つ 以 上 の 適当 を ポイ ンタ ー 値 を モット す る と と て よっ て , いく つか 
の 異なる 基底 付 構造 の 世代 を リス ト ほ 組み 入れ る と と が で きる 。 ポ 
イン ター の 値 を 操作 する と と (て よっ て , 項目 を リス ト ( 追 加 し た り , 
削除 し た りす る と と が で きる 。 ポ イン ター を りら まく 操作 する と と 
よっ て リス ト の 構造 を 作り 直す と と が で きる の で , リス ト 内 の デー 
タ の 処理 は , 簡単 に な る 。 


主 記憶 域内 で の デー タ の 移動 の 量 を 減ら じす と と (と よっ て , ブロ グ 
ラマ ー は , 通常 , 処理 時 間 を 大 巾 C 節 減 す る と と が で きる 。 し か し , 
ポイ ンタ ー は 各々 4 ベイト の 記憶 域 を 必要 と し , さら 割り 振ら 
れ た 基底 付 変数 は いずれ も , た と を ば それ が 長 さ 1 バイ ト の ピッ ト 
・ ス トリ ング で あっ て も , 最低 8 バイ ト の 記憶 域 を 必要 と する と と 
と 注意 し て いた だ きた い 。 


。 引 。 デ 


基 克 付 変数 が 割 り 振 られ る と き は , 使用 で きる と と ころ で あれ ば ど 
と か ら で も 記憶 域 が と られ る 。 し た が っ て , 割り 振ら れ た 基底 付 
変数 の リス ト は , 主 記憶 域 全体 C〈 わ た っ て 広く 分 散 し て いる と と も 
あり 得る 。 リ スト 上 で の 内 部 的 を 操作 の 場合 は , 項目 は ボイン ター 
を 使っ て 容易 C に アク セス する と と が で きる の で , 問題 は な い 。 し か 
し , リス ト を デー タ ・ セ ッ ト (転送 する 場合 は , 諸 項 目 は 1 つま 
と め て お か な けれ ば な ら な い 。 エリ ブ 変 数 の 中 割り 振ら れ て い 
る 項目 は , す で 1 つ に まとめ られ て ぉ な り , それ ら は 別々 の 存在 の 
まま で あり な が ら , 1 つの 単位 と し て 転送 し た り , 割り 当て た りす 
る と と が で きる 。 


ェ リ プ ブ 変 数 の 先頭 か ら 相対 的 に みて , エリ プ 変 数 内 C な ける 基底 
付 変数 の 位置 を 識別 する と と が で きれ ば , 都合 が よい 。 オフセット 
変数 は , と の よう な 目的 で 定義 され る 。 ポ イン ター 変数 を 使用 する 
と , エリ プ 変 数 が 主 記憶 域 (C 送 り 返 され る と き , それ ら は 有効 で な 
く な る 可能 性 が 強い 。 
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エリ ア 変 数 


AREA 属性 は , 基底 付 変数 の 割 振 り の た め KX 確 保 さ れる 記憶 域 の 
エリ ア を 定義 むす る る の で ある 。 エリ アブ 変数 の 宣言 は , 次 の よら な 形 
式 を し て いる 。 


DCL 識別 名 AREA〔( サ イズ )〕: 


確保 する 記憶 域 の 量 は , バイ ト 単 位 で 与え る (つま り , 「 サ イズ ]」 
の 整数 値 )。 サ イズ が 与え を られ て いな いと き は け は, 省略 時 解釈 に よっ 
て 1000 ベイ ト と み を され る 。 


エリ テア の サイ ズ は , スト リン グ の 長 さ や 配列 の 限界 と 同じ ょ よう 
調節 可能 で ある た め , 式 ま た は 星 印 に よっ て ( 被 制 御 エ リア また は 
バラ メー ター の 場合 ) , ある い は REFER オ プシ ョ ン (C よ っ て 
( 基底 付 ェ リア の 場合 ) , 指定 する と と が で きる 。 エ リア の 大 き さ 
の 最大 値 せ , その ブロ グラ ム が 使用 で きる 主 記憶 域 の 量 に よっ て の 
み 制 約 さ れる 。 


宣言 され ん た サイ ズ の ほか (CC, さら (C1 6 ベイ ト の 制作 博 報 ( 使用 
中 の 記憶 域 の 量 を どの 詳細 が 含ま れ て いる ) が , 確保 され た サイ ズ 
の エリ ア の 前 C つ けら れる 。 


確保 され た 記憶 域 の うち, 実際 に 使用 され て いる 記憶 域 の 量 を , 
ェ リ ア の 範囲 と いう 。 基底 付 変数 は , 実行 中 いつ で も , エリ ア の 中 
で 割り振っ た り , 解放 し た りす る と と が で きる 。 と の と と は , 記憶 
域 が 使用 され る と き , エリ アカ の 稚 囲 が 変わ る と と を 意味 し て いる 。 
どの よう な 基底 付 変数 も エリ ア の 中 で 割り 振る と と が で きる の で , 
これら は , それ ぞ れ 別 の 量 の 記憶 域 を 要求 する と と も 可能 で ある 。 
基底 付 変数 が 解放 され る と , それ が 入っ て いた 記憶 域 は , 他 の 割 振 
り 人 使用 で きる も の と し て マー ク が つけ られ る 。 実際 に は , と の ュ 
ン バ イ ラー は , エリ ア 内 の 使用 可能 を 記憶 域 の チェ イン を 作っ て 維 
持 し て いる ( チェ イン の 先頭 が , 1 6 ベイ ト の 制御 情報 の 中 に 貯え 
られ て いる )。 記憶 域 の 必要 量 の 異な る 基底 付 変数 が 割り 振ら れ 
た り , 解放 され た りす る と きた , 割 振り が 使用 可能 を スペ ー ス K 収 
容 で き を な けれ ば , エリ ア の 中 (て ギャ ッ プ が で き て し まう と と は 避け られ 
を い 。 し た が っ て , す で C 解 放さ れ て は いる が , まだ 意味 を も っ て 
いる 割 振り が エリ ア の 範囲 C 入 っ て いる と と も ある 。 意味 を も っ て 
いる 割 振り と は , まだ 解放 され て いな を な いか, また は 解放 され て は い 
る が , その 後 C ま だ 解放 され て いな を い 割 振り が 少 を く と も 1 つ は あ 
る 割 振り で ある 。 エ リア が , 意味 を も っ て いる 割 振り を も っ て いな 
いと きけ は , 範囲 は ゼロ に を る 。 


ェ リ プ 変 数 に C 対 し て は , どの よう な 演算 子 (比較 演算 子 で さえ も ) 
も 使う 2 こと は で き な い 。 


オフ セッ ト 変 数 


ォ フ セッ ト 変 数 は , エリ ア 変 数 と いっ し ょ 排他 的 に 用 いら れる 特 
別 な 形式 の ボイン ター で ある 。 オ フェ モッ ト 変 数 の 値 は , エリ ア の 先 
頭 か ら 相対 的 に みた , エリ プ 変 数 内 C ぉ ける 基底 付 変 数 の 位置 を 表 
わし て いる 。 基底 付 変数 は 相対 的 (< 識別 され る の で , エリ ア 変 数 が 
主 記憶 域 の 別 の 部 分 に 割 り 当 て られ る 場合 も , オフ モッ ト 値 は 無効 
(て ならない 。 オフセット 変数 を 使用 し て も , エリ ア 内 で ポイ ンタ ー 
変数 を 使用 する と と が 禁止 され る わけ で は を いと と (注意 し て いた 
だ きた い 。 オフセット 変数 は , 次 の よう し て 宣言 され る 。 


DCL 識別 名 
OFFSET( (要素 エリ ア 変 数 ) 〕 : 


ェ リ アプ 変数 と オフ セッ ト 変 数 の 結び つけ は , 特別 を 関係 で は を い 。 

ォ フ セッ ト 変 数 は , POINTER 組 込み 関数 を 用 いて , どの よう な 
ェ リ プア 変 数 と で も 結び つけ る と と が で きる ( 下 の 「 ロ ケー ター 変換 ] 
の 項 を 参照 ) 。 宣言 の 中 で と の よら な 結び つけ を し て お く と , オフ 
モッ ト 変 数 を 参照 する と , 結び つけ られ た エリ ブ 変 数 を 暗 'C 指 すこ と 
と て な る の で 便利 で ある 。 オフ セッ ト の 宣言 の 中 に エリ ア 変 数 が る 
る と , エリ ア 変 数 を 文脈 的 C 宣 言 し た こと に を る と と に 注意 し て い 
た だ きた い 。 


ロケ ー タ ー 変 換 


ォ フ セット 変 数 が 参照 の 中 で 用 いら れ て いる と き は , と れ は 暗示 的 
(C ポ イン ター 値 (変換 され る ( つま り , 結び つけ られ た エリ アブ 変数 
の アド レス 値 が , オフ セッ ト 値 CC 加 を られ る ) 。 オ フキ セット か ら ポ 
ィ ン タ ー 値 へ の 明示 的 な 変換 は , POINTER 組込み 関数 を 用 い 
て 行なわ れる 。 た と えば げ , 


DCL P POINTER,O OFFSET(A),B AREA: 
P POINTER(O,B): 


と の ステ ー ト メン ト は , ポイ ンタ ー 値 を PC 割り 当て る も の で , エ 
リア B の 中 に ある オフ セッ ト O(C エ っ て 議 別 され る 基底 付 変数 の 位 
軒 が 得 ら れる 。 と の エリ プア 変数 は , オフ セッ ト 変 数 と 結び つけ られ 
た も の と は 違う の で , プロ グラ マー は , その オフ セッ ト 値 が , 別 の 
ェ リ ア に て つい て も 有効 で ある か 確認 し を けれ ば を ら を ない 。 たとえ ぱげ, 
と の 関数 を 呼び 出す 前 に エリ テア A が エリ アナ BK 割り 当て られ た た 場合 
(て も 有効 で ある 。 

OFFSET 組 込み 関数 は , POINTER 組 込み 関数 を 補 2 も の 
で あり , 与え を られ た ポイ ンタ ー と エリ ア か ら 得 られ た オフ キッ ト 値 
を 返す 働き を する 。 与え を られ た ポイ ンタ ー 値 は , 与 を られ た エリ ア 


内 【C ぉ ける 基底 付 変数 の 位置 を 識別 する も る の で を けれ ば な ら な い 。 


実際 問題 と し て , 変換 は ほとん どの 場合 , 暗示 的 (< 行 を われ る の 
で , と れ ら の 関数 を 使 9 こ と は あま りな い 。 


オフ セッ ト 式 


オフ セッ ト は , 暗示 的 に ポイ ンタ ー 値 (変換 され る の で , オフ セッ 
ト 式 は , ポイ ンタ ー 式 と 交換 で きる よう 使用 する と と が で きる 。 
オフ セッ ト 式 は , ロケ ー タ ー 修 飾 子 と し て 使用 し た り , 基底 付 変数 
の 宣言 と の 結び つけ , 比較 演算 の 中 , ある い は ブロ シー ジャ ー 関 数 
の 引数 と し て , 使用 する と と が で きる 。 し か し , READ また は 

LOCATED ステ ー ト メン ト の SET オ プシ ョ ン の 中 で 指定 する と 
と は で き ない の で , 注意 し て いた だ きた い 。 


IN オプ ショ ン を も つ ALLOCATE ス テー トメ ント 


オフ エセ エット 値 は , 最初 は , ポイ ンタ ー 値 を 変換 する と と (にょ っ て , 
ある い は ALLOCATE ステ ー ト メン ト の SET オ プシ ョ ン を 使 
ゥ うと と て と よって, 得る と と が で きる 。 と の 形式 の ALLOCATE 
ステ ー ト メン ト は , 次 の 通り で ある 。 


ALLOCATE 基底 付 変数 
[ IN (要素 エリ ア 変 数 ) 〕 
[SET (ロケータ ー 変 数 ) 〕 


と の ステ ー ト メン ト は , 指定 され た エリ ア の 中 で 基底 付 変 数 (対し 
て 記憶 域 を 割り 振る も る の で ある 。 する と , と の 変数 は ェ リ ア の 先 
頭 か ら の 相対 的 を オフ セッ ト を も つこ と と なり, と の オフ モット 値 
が ,。 SET ォ プシ ョ ン で 指定 され た ロケ ー タ ー 変 数 (C 割 り 当 て られ 
る 。 と の ロケ グー ター 変 数 が ポイ ンタ ー・ タ イプ の 場合 は , 変換 が 行 
を われ る 。 


IN また は SET オプ ショ ン の どちら か 一 方 また は 両方 を 暗示 す 
る と と が で き る 。 た と えば げ , 


DCL X BASED(O), 
Y BASED(P), 
A AREA, 
O_ OFFSET(A): 


ALLOCATE 丈 : 
ALLOCATE Y IN(A): 


エリ ア A と オフ セッ ト O の 記憶 域 ク ラス は , 省略 時 解 和 収 ヒ よって, 
AUTOMATTICC を る 。 最初 の ALLOCATE ステ ー ト メン ト は , 
次 の も の と 同じ で ある 。 


ALLOCATE 又 IN(A) SET(O): 
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2 番目 の ALLOCATE ステ ー ト メン ト は , 次 の も の と 同じ で あぁ 
る 。 


ALLOCATE Y IN(A) SET(P): 


プロ グラ マー は , すべ て の 暗示 が 解決 で きる も の で ある か 確か め を な 
けれ ば な を ら を い 。 た たとえば, オフ セッ ト O が 基底 付 変数 と 結び つけ 
られ て いな か っ た と すれ ば , SET オ プシ ョ ン が 必要 (CC な る 。 


IN お よび SET オプション が 暗示 で を く 指 定 さ れ て いる 場合 は , 
IN オプ ショ ン の 中 て ある エリ ア 以 外 の エリ ア と 結び つけ て , ある 
い は エリ ア を 何 も 結 び つ けず と , 宣言 され た オフ キット 変数 を 使用 
する と と が で きる 。 次 の 例 の ALLOCATE ステ ー ト メン ト は 両 
方 と も 正 し い 。 


DCL T1 OFFESET (A1), 
T2 OFEFESET, 
A2 AREA: 


ALLOCATE 又 IN (A2) SET (T1): 
ALLOCATE Y IN (A2) SET (T2): 


オフ セッ ト 変 数 T1 と T 2 は, それ ぞ れ , 変数 丸 と Y の オフ セッ ト 
の 値 を エリ ア A2 の 中 て も っ て いる 。 


次 の 例 は , オフ セッ ト 変 数 を 用 いて , エリ ア 変 数 の 中 (C リ スト を 
作る 方 法 を 示し た も の で ある 。 と の 例 は , と の 章 の 前 の 方 の 「 基 底 
付 変数 の 複数 個 の 世代 | の と と ろ で あげ た 例 を 書き 直し た も の で あ 
る 。 

DCL A AREA, 
(T,H) OFFSET(A), 
1 STR BASED(H), 
2 P OFFSET(A), 
2 DATA: 


ALLOCATE STR IN(A): 
TH : 


NEXT:ALLOCATE STR SET(Tー> ジ PB ) : 
T デ エー ジテ P : 


GO TO NEXT: 


と れ と 同じ ALLOCATE ステ ー ト メン ト を 使っ て , 複数 個 の 割 
振り を 行 を うり と と が で きる 。 た と えば げ , 


ALLOCATE XX, Y IN(A): 
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基底 付 変 数 と 被 制 側 変 数 の 両方 を , 同じ ステ ー ト メン ト の 中 で 割り 
振る と と が で きる 。 


IN オプ ショ ン を も つ FREE ス テー トメ ント 


エリ プア 変数 の 中 で 割り 振ら れ た 基底 付 変 数 は , IN ォ プ ショ ン KC 
よっ て エリ プア 変数 を 指定 する と と に より , 解放 する と と が で きる 。 


FREE 基底 付 変数 
IN( 要 素 ェ リア 変数 ) 〕 : 


同じ FREE ステ ー ト メン ト を 用 いて , 基底 付 変数 と 被 制 件 変数 の 
両方 を いく つか まとめ て 解放 する こと が で きる 。 エ リプ 変数 の 中 
ある 変数 の 現在 の 割 振り の すべ て を 解放 する と き は , EMPTY 組 
込み 関数 を 使う の が , 最も 便利 で ある 。 


EMPTY 組込み 関数 


ェ リ ア 変 数 が 割り 振ら れる と き , エリ プア 変 数 は 自動 的 空白 の 状 
上 巧 , すなわち , エリ ア の 範囲 が ゼロ, て を る 。 EMPTY 組込み 関 
数 の 値 を エリ ア 変 数 C 割 り 当 て る と と (て よっ て , その 変数 の 中 の す 
べ て の 割 振り を 解放 する とこ と が で きる 。 この 関数 参照 で は 引数 は 不 
要 で ある が , 名 前 が BUILTIN と 宣言 され て いな を い 場 合 (C は , 
ナル 9 引 | 数 リス ト を 与え を な けれ ば を ら な を い 。 た と えば ぱげ , 


DECLARE A AREA, 
I BASED (P), 
J BASED (Q):: 


ALLOCATE TI IN(A), 了 IN (A): 


A デ EMPTY (): 
グ *EQUIVALENT TO: 
FREE TI IN (A),J IN (A): * グ 


エリ プア 変数 自体 は 解放 され ず , その 記憶 域 は , 後 で 基底 付 変数 割 
り 振る た め に その まま に し て お か れる こと と 注意 し て いた だ きた 
の 。 


エリ ア の 玉 当 て 


割当 て ステ ー ト メン ト を 用 いて , エリ プ 式 の 値 を 1 つま た は 2 以 
上 の ェ エリ プア 変 数 割 り 当 て る こと が で き る 。 エ リア テア から エリ ア へ の 
割当 て は , 原 エ リア の すべ て の オフセット が 目標 エリ ア で も 有効 
を る よう (に し て , 目標 エリ テア の すべ て の 割 振り を 解放 し , その あと 
で 原 エ リア の 範囲 を 目標 エリ ア K 割 り 当 て る と いう 効果 を も っ て い 
る 。 たとえば, 


DECLARE 双 BASED (0O(1)), 
0(2) OFFSET (A), 
(A,B) AREA: 


ALLOCATE 駐 IN (A):: 
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ALLOCATE X IN (A) SET (0O(2): 
0(2) ->ー 2: 

B 三 A: 


と の ブロ グラ ム ・ セ グ メ ント が 与え られ て いる と き (CPOINTER 
組込み 関数 を 使用 する と , POINTER(O(2),B) 一 >X ぉ 
よび 0( 2 ) 一 > と いう 参照 は . それ ぞ れ エリ ア B と AM 割り 振 
られ た も の と 同じ 値 を 表わす と と を る 。 


割 振り が 何 も 含 まれ て いな い 原 エリ ア が 目標 エリ ア C 割 り 当 て ら 
れる 場合 は , その 効果 は , 目標 エリ ア 内 の すべ て の 割 振り を 解放 す 
る だ け で ある 。 


ェ リ ア の 割当 て の 用 法 と し て , その も と に な る エリ ア の 限界 を 越 
えて 基底 付 変 数 の リス ト を 拡張 する と と が で きる 。 基底 付 変 数 を ェ 
リア の 中 割り 振る と き , それ を 収容 で きる だ け の 解放 され た 記 
憶 域 が 充分 に を いと, ARPER 条件 が 起こ る (以下 参照 ) 。 と の 
条件 (C 対 する オン ・ ユ ニッ ト は , 不適 当 を エリ ア へ の 参照 を 修飾 し 
て いる ポイ ンタ ー の 値 を 変え て , 別 の エリ ア を 指す よう (て する と と 
も で きる 。 そ し て , オン ・ ユ ニッ ト か ら 戻 っ た と き (C, 新しい エリ 
ア の 中 で 再び 割 振 り を 行なっ て みる 。 か わり (C, オン ・ ユ ニッ ト で 
ェ リ ア を 書き 出し , エリ ア を EMPTY (C リ セッ ト し て も よい 。 


AREA オ ン 条 件 
次 の よら な 状況 の いずれ か で は け は, AREA 条件 が 起こ と る 。 


1. その 割 振り を 行なう た め の 解 放さ れ た 記憶 域 が 充分 で を い ェ 
リア の 中 と, 基底 付 変数 を 割 り 振 ろう と し た と き 


2. エリ ア の 割当 て を 行 な な うら と し た と き (C, 目標 エリ ア が 小さ 
すぎ て 原 エ リア の 範囲 を 収容 で き な を な い とき 


3 SIGNAL AREBA ス テー トメ ント が 実行 され た と き 
割 振り , 割当 て , また は SIGNAL ステ ー ト メン ト 多 よっ て , 
と の 条件 が 起 っ た か どう か 調べ る た め C, ONCODE 組込み 関数 
を 使用 する と と が で きる 。 オ ン ・ ユ ニッ ト か ら 正 常 C 戻 る と き て と 
られ る 女 連 は , 次 の 通り で ある 。 


1. 割 振り 9 にょ っ て と の 条件 が 起 っ た と き は , 割 振り が も 9 一 度 


行なわ れる 。 不適 当 を エリ ア へ の 参照 を 修飾 し て いる ポイ ン 
ター の 値 が 別 の エリ ア を 指す よう , オン ・ ユ ニッ ト 低 よっ て 
変え られ た 場合 は , 新しい エリア の 中 で 割 振り が 再び 行なわ 
れる 。 オ ン ・ ユ ニッ ト が と の 誤り を うま く 訂 正 で き を いと き 
は , ルー が 起 と る 可能 性 も ある と と 人 注意 し て いた だ きた 
い 。 


2. エリ ア の 割当 て , また は SIGNAL ステ ー ト メン ト 多 上 っ 
て と の 条件 が 起 っ た と きけ は , 割込み の 地点 か ら 実 行 が 続け ら 
れる 。 


オン ・ ユ ニッ ト が 指定 され て いな いと き は , シュテ ム が 注釈 を 出 し , 
ERROR 条件 を 引き 起す 。 


エリ ア の 入力 と 出力 


ェ リ ア 機 能 は , 基底 付 変数 の 完全 を リス ト を 1 単位 と し て , 
RECORD フ ァ ィ ル と の 間 で 入力 と 出力 を 容易 (C 行 な うと と が で きる 
よう 設計 され た も の で ある 。 出力 の 場合 に は , 1 6 ベイ ト の 制 件 情 
報 と いっ し ょ に エリ ア の 範囲 だ けが 転送 され る ( と の 午 囲 C は , 解 
放さ れ て は いる が まだ 意味 を も っ て いる 割 振り が 含ま れ て いる が )。 
し た が っ て , エリ ア の 使用 され て いな い 部 分 は , デー タ ・ セ ッ ト 上 
(て と スペ ー ス を と ら な を い 。 エ リア の 範囲 は 変わ る 可能 性 が ある の で ,-~ 
V 一 形式 また は U 一 形式 レ ュ ー ド を 使用 し な けれ ば な を なら な たい 。 レコ 
ー ド 必要 を 最大 の 長 さ は , エリ ア の 長 さ (CC よっ て 左右 され る ( つ 
まま > RU の ザイ 直人 9 すう 9。 


複数 個 の ロケ ー タ ー 修 飾 


ロケ ー タ ーー 修飾 は , 基底 付 変数 の 特別 を 世代 を 識別 する た め C, 基 
旗 付 変数 と 1 つま た は 2 つ 以 上 の ロケ ー タ ー 値 を 結び つけ る と と で 
ぁ る 。 基底 付 変 数 へ の 参照 は , 次 の よう に し て 明示 的 修飾 する と 
と が で きる 。 


要素 ロケ ー タ ー 式 一 > 
[基底 付 ロ ケー ター 変数 一 > 〕) … 
基底 付 変数 


ロケ ー タ ー 修 飾 の 用 法 に つい て , いく つか の 一 般 規 則 を 記述 する 
とこ と が で きる 。 


1. ロケ グー ター 修飾 は , 結び つけ られ て いる 参照 が 適用 され る 基 
底 付 変数 の 世代 を 表示 する た め C 用 いら れる 。 


2. オフ セット 式 ま た は オフ セッ ト 変 数 が ロケ ー タ ー 修 飾 と し て 


用 いら れる 場合 は , 基底 付 変 数 が 参照 され る た びに と, その 値 
は , ポイ ンタ ー 値 暗示 的 (C 変 換 さ れる 。 
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3 1 つの 参照 の 中 で 2 つ 以 上 の ロ ケー ター 修飾 子 が 用 いら れ て 
いる 場合 は , 最初 の (つま り 左 端 の ) 修 飾 子 だ な けが, 関数 参照 
で あっ て よい 。 その他 の ログ ケー ター 修飾 子 は すべ て , それ 自 
身 , 基底 付 変数 で を けれ ば を ら な を い 。 し か し , 入口 変数 は 基 
底 付 で あっ て よく , また ロケ グー ター 値 を 戻す 関数 を 表わす も 
の で あっ て よい と と ん 注意 し て いた だ きた い 。 


4.。 2 つ 以 上 の ロケ ー タ ー 修 飾 を 使用 し て いる と き は , これ ら は 
左 み ら 右 評価 され る 。 


基底 付 変数 へ の 参照 は , 暗示 的 < 修飾 され た も の で あっ て も よい 。 
暗示 的 C 修 飾 さ れ て いる 基底 付 変数 の 世代 を 決め る た め 用 いら れ 
る ロケ ー タ ー 値 は , 基底 付 変数 と いっ し ょ (宣言 され た も の で ある 。 
基底 付 変 数 と いっ し ょ 宮 言 され た ロケ ー タ ー は 基底 付 で あっ て も 
ェ い の で , ロケ ター ター 修飾 子 の 連鎖 を 暗示 する と と も で きる 。 た と 
えば げ , 


DECLARE (P(10),Q) POINTER, 
R POINTER BASED (@⑩), 
V BASED (P(3)), 
W BASED (R), 
Y BASED: 


上 の 宣言 与え られ て いる と すれ ば げ ば , 次 (て あげ る 参照 は 有効 で ある 。 


9?2 DOS PL ノ 1 最適 化 コ セン パイ ラー : 言 語 解説 書 第 1 部 


1 

2. V 

る 介 ーー R 一 ジコ W 
4 民 -ー テ WW 

5 W 


参照 1 と 2 は , 参照 3, 4 お よび 5 と 同じ で ある 。 Y は , ロケ グ ケータ 
一 変数 が それ と 結び つけ られ る まで , 参照 する と と が で き を いと と 
KC 注意 し て いた だ きた い 。 


ロケ ー タ ー 修 飾 の レベ ル 


基底 付 変 数 を 修飾 する ボイン ター は , 1 つの レベ ル の ロケ グー ター 修 
飾 を 表わし て ぉ ふり, オフ セッ ト は , エリ ア の 中 で 暗示 的 修飾 され 
る の で , 2 つの レベ ル を 表わし て いる 。 レベ ル の 数 は , 添字 の つい 
た ロケ クー ター, お よび また は 構造 の 要素 (に よっ て 影響 され る と と 
は た い 。 1 つの 参照 の 中 で 許さ れる ロケ ー タ ーー 修飾 の レベ ル の 最大 
の 数 は , 1 0 で ある 。 た と えば , 


DECLARE X BASED (P), 
P POINTER BASED (Q⑩), 
Q OFFSET (A): 


上 の 宣言 が 与 を らち られ て いる と すれ ば , X, Pー> 双 , お よび Q 一 テ 
P 一 > と いう 参照 は すべ て , 3 つの レベ ル の ロケ グー ター 修飾 を 表 
わし て いる 。 


サブ ルー チン た と 関数 


PL/I の も つ ブ ロッ ク 構 造 の 概念 は . サ プ ル ー チ ン お よび ブロ グラ 
マー 定義 の 関数 を 使用 する と と を 可能 に し て いる 。 サ プルー チン な ぉ 
よび 関数 は , 次 の よう を と と を 行なう と と の で きる ステ ー ト メン ト 
の グル ー プ で ある 。 


1. 頻繁 に 使用 され る 同じ 処理 を 行 を うた め (C, プロ グラ ム の 中 
の いろ いろ な 地点 か ら 呼 び 出 す 。 


2. さま ざま な 地点 の 呼出 し か ら 渡さ れ た デー タ を 処理 する 。 


3 呼出 し 地点 の すぐ 後 の 地点 人 制御 を 戻す 。 さ ら K 関 数 の 場合 
(は , 関数 を 実行 し た 結果 得 ら れ た 値 も 戻す 。 


サ プ ル ー チ ン ぉ よび 関数 は , 呼出 し 側 プ ロッ ク の 内 部 人 C あ っ て る も, 
外部 に あっ て も よい 。 組込み 関数 は つね に , PL プ I の シス テ ュ 環 境 
の 中 と 永久 的 維持 され る 外部 プロ ンー ジャ ー で あり , PL ノ 1 言語 
と 不可 欠 を 一 部 分 を を し て いる 。 


サブ ルーチン お よび 関数 の 用 法 (C 関 し て と の 章 で あげ て ある 規則 
は , その サブ プ ル ー チ ン ま た は 関数 が 外部 また は 内 部 プロ シー ジャ ー 
の どちら で ある か (よっ て 左右 され る 。 と れ は , 呼び 出さ れ た ブロ 
シー ジャ ー が 呼出 し 側 グ ロ ョ シー ジャー の 内 部 (ある と き は , 2 つの プ 
ロジ シー ジャ ー の 間 の 関係 も, その プロ シー ジャ ー 自 体 か ら コ ン バ ベイ 
ラー が 判定 する と と が で きる た めで ある 。 呼び 出さ れ た プロ シー ジ 
ャ ー が 外部 (に あ る と きけ は , 呼出 し 側 デ ロン シー ジ ャ ー の 中 で , その 関 
係 を 明示 的 C 与 を を けれ ば を ら な い 。 し た が っ て , コン ペイ ラー が 
所 要 の 目的 プロ グラ ム を 作成 する と と が で きる よう (て す る た め MC, 
呼出 し 側 プ ロン シー ジャ ー の 中 で 外部 サ プ ル ー チ ン ま た は プロ シー ジ 
ャ ー《K 関 する さら くわ し い 情 報 を 与え る 必要 が ある 。 


サブ ルー チン は , CALL ステ ー ト メン ト , ま 友 付 INITIAL 
属性 の CALL オ ォ オプション よっ て 呼び 出さ れる プロ シー ジャ ー で 


関数 は , プロ グラ マー 定義 の 場合 も , 組込み 関数 の 場合 も , 式 の 
中 “関数 参照 "が ある と , 呼び 出さ れる 。 関数 参照 は , 関数 の 入 
口 名 を 表わす 入口 式 で ある 。 ( 入口 名 は , プロ シー ジャ ー の 特定 の 
入口 点 を 表わす 識別 名 で ある 。 ) 


PL ンプ 1T に お ける サブ ルー チン と 関数 の 決定 的 を 相違 和信 , サブ ルー 
チン は 呼出 し 地点 に デー タ の 値 を 返さ を い の K 対 し て , 関数 参照 は 
通常 , 関数 参照 が 記入 され て いる 式 を 評価 し て , 関数 参照 と 置き 換 
える た め ( 値 を 返す , と いら 点 で ある 。 


サブ プル ー チ ン と 関数 は どちら も ゃ , 呼出 し 側 プ ロッ ク の 中 で 知ら れ 
て いる デー タ を 使用 する と こと が で きる 。 デー タ を 使用 で きる よら 
する た め の 方 法 は , 2 通り ある 。 


1. 呼出 し 側 グ ロッ ク と 呼び 出さ れ た プロ シー ジャ ー の 両方 知 
られ て いる 名 前 に よっ て 表わさ れる デー タ 。 名 前 が 知ら れ て 
いる 場所 を 決め る た め の 規 則 に つい て は , 第 7 章 「 名 前 の 認 
定 ] を みて いた だ きた い 。 


2. 引数 と パラメーター: CALL ステー トメ ント また は 
CALL オプ ショ ン , ある い 紋 関数 参照 に ヒ つ け られ た 引数 リ 
スト の 中 (C 引 数 を 書く と と に よっ て , 呼出 し 側 プ ロッ ク か ら 
の 値 を 呼び 出さ れん を た プロシージャー 渡す と と が で きる 。 と 
れ ら の 値 は , 呼び 出さ れ た プロ シー ジャ ー の 中 で は , バラ メ 
ー タ ー を 用 いて 使用 する と と が で きる 。 


バラ メー ター は は, 呼び 出さ れ た 入口 点 の パラ メー ター・ リ ス 
ト の 中 ある 識別 名 で ある 。 引 数 と パラ メー ター の 数 は , 同じ 
で な けれ ば な ら な ひい 。 2 に 2 
まで ある 。 バ ラメ ー タ ー 人 と は, 記憶 域 は 結び つけ られ な い 。 
と これ は , 呼び 出さ れ を た を プロシージャー が , 呼出 し 側 プ ロ シ ー 
ジャ ー の 中 割り 振ら れ た 記憶 域 を アク セス で きる よら 
する た め の 単 を みる 手段 で ある 。 プロシージャ ー の 中 で バラ メ 
ー タ ー を 参照 する と , 実際 (C は 対応 する 引数 を 参照 する と と 
(て と を る 。 バ ラメ ー タ ー の 値 を 変更 する と , 引数 の 値 も 変更 さ 
れる 。 し か し , ある 特定 の 環境 の 場合 は , 見 か け 引 数 が 作ら 
れ , も と に な る 引数 の 値 は 変更 され な い 。 とれ け は , 次 の よら 
な 場合 で ある 。 


a。 引 数 の 本 性 が , 対応 する バラ メー ター の 属性 と 違っ て 
いる と き 。 も と (な る 引数 の 値 は , 変換 され , 見 か け 
引数 割り 当て られ る 。 


b. 1 つの 値 だ けが 引数 と し て 渡さ れ た と き , た と えば げ , 
引数 が 定数 で ある と き な ど 。 


c. 引数 が iSUB 定 義 の 配列 で ある と き 。 
と の よう な 場合 は , パラ メー ター を 参照 する と , 実質 的 に は 
見 か け 引 数 が 参照 され る 。 見 か け 引 数 と パラ メー ター は , 最 


初 は 同じ 値 を も っ て いる が , の ち に と の バラ メー ターK 変 更 
を 加え て も , も と の 引数 の 値 は 影響 され を い 。 
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見 か り 引 数 対す る 記憶 域 は , 呼出 し 側 プ ロン シー ジャ ーK 属 
する 記憶 域 の 中 に ある 。 


サブ ルー チン と 関数 の 入口 点 


サナ プル ー チ ン ま た は け 関 数 プロ シー ジャ ー は , 1 つま た は 2 つ 以 上 の 
入口 点 を も つと と が で きる 。 


PROCEDURP ス テー トメ ント : プロ シー ジャ ー へ の 主要 入口 
点 は , PROCEDURE ス テー トメ ント (よっ て 設定 され る 。 


ENTRY ステ ー ト メン ト : プロ シー ジャ ー へ の 副 次 入口 点 は , 
ENTRY ステ ー ト メン ト (C よ っ て 設定 され る 。 


PROCEDUREP ス テー トメ ント と 補助 的 を ENTRY ステ ー ト 
メン ト は それ ぞ れ , 自分 自身 の バラ メー ター と , 関数 参照 の 場合 
は 返さ れる 値 の 属性 を 指定 する と と が で きる 。 し か し , PEKO - 
CEDURE ステ ー ト メン ト の 位置 か ら ブ ロッ ク と 入る と き ( 人 設定 され 
る 環境 は , 同じ プロ ッ ク が 副 次 入口 点 で 呼び 出さ れる と き (て 設定 さ 
れる 環境 と 全く 同じ で ある 。 各 入 口 点 は , それ 結び つけ られ た 人 
口 名 を も っ て いる 。 PL ノエ [プロシージャー へ の 外部 入口 点 C 対 する 
名 前 の 長 さ は , 7 桁 'C 眼 られ て いる 。 


入口 名 は , PROCBDURE ま た は ENTRY ス テー トメ ント の 
接頭 義 と し て つけ て ぉ ぶ く と と に よって, 内 部 プロ シー ジャ ーK 対 す 
る 入口 定数 と し て 呼出 し 側 プ ロッ ク の 中 で 明示 的 (宣言 され る 。 
DECLARE ステ ー ト メン ト の 中 で 内 部 入口 名 と し て 宣言 する の 
は , 誤 ま り で ある 。 外部 入口 名 は , ENTRY 属 性 を も ゃ つ 入 口 定数 
と し て 明示 的 に 宣言 し を なけ れ ば を ら た な い 。 入口 変数 は , それ 割り 
当て られ る 入口 定数 を 表わし , ENTRY おぉ よび VARIABLE 属 
性 を も っ て いる 識別 名 で ある 。 入口 変数 を 参照 する と , 最後 割り 
当て られ た 入口 定数 値 が 参照 され る 。 


ENTRY 属 性 の 用 法 
ENTRY 属 性 の 一 般 形 式 は 次 の 通り で ある 。 
識別 名 ENTRY 
[ (ベラ メー ター 記述 り ス ト ) 〕 
(VARIABLEJ 


[ RETURNS (属性 リス ト ) 〕 
[OPTIONS (オプ ショ ン ・ リ スト ) 〕 
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バラ メー ター 記述 子 リス ト は , 識別 名 に よっ て 表わさ れる 人 入口 点 
と 結び つけ られ る バラ メー ター の 属性 を 指定 する た め に 用 いら れる 
も の で ある 。 詳細 CC ついては, と の 章 の 「 バ ベラ メー ター 記述 リスト] 
の と と ろ で 説明 し て ある 。 


関数 プロ ンー ジャ ー か ら 返 され る 値 の 属性 を 指定 する た め , 
RETURNS 属 性 を 与え を る と と が で きる 。 


入口 点 が , 外部 関数 の 中 , また は COBOL ま た は FORTRAN 
コン バイ ラー よっ て コン ペイ ル さ れ た サブ プル ー チ ン の 中 に ある 場 
合 は ,OPTIONS 属 性 が 必要 で ある 。 詳細 C つ いて は , 第 1 7 章 
[言語 間 の 連絡 機能 ] の と と ろ で 説明 する 。 


関数 また は サ プ ル ー チ ン が 外部 の も の で ある 場合 は , 入口 宣言 を 
与 を な けれ ば を ら た な い 。 内 部 サ プ ブルー チン や 内 部 関数 C 対 し て 入口 
宜 言 を する の は 誤り で ある 。PROCEDURE ま た は ENTRY ス 
テー トメ ント の 中 名 前 を 記入 すれ ば , と の 場合 , 外部 宣言 を し た 
の と 同じ と と C を な る 。 


入口 宣言 の 中 (CC ある バラ メー ター 記述 子 リ スト と は , 引数 の 変換 
と 見 か け 引 数 の 作成 を 制御 する た め の パ ラメ ー タ ー の 属性 を 人 れる 。 
コン バイ ラー が 正しい 見 か け 引 数 を 作る と と が で きる よう 低 , ベラ 
メー ター 記述 子 C は , バラ メー ター の 属性 (C 関 する 正確 を 情報 を 人 
れ て ち ぉ か を けれ ば な ら な い 。 外部 入口 宣言 の 中 ( ヒ ペ ベラ メー ター 記述 
子 リ スト が な を い 場 合 は , コン バイ ラー は , 引数 の 属性 は 対応 する バ 
ラメ ー タ ー の 属性 と 一 致し て いる も の と みみ を な さ を な けれ ば な を な ら な い 。 
変換 は 行 を われ を ない 。 


サブ ルー チン と 関数 の 出口 点 


呼出 し 地点 の すぐ 後 の 地点 (制御 を 戻す た め C, RETURN ステ 
ー ト メン ト が 用 いら れる 。 ど と か 別 の 地点 C 制 御 を 移す と き は , 
CO TO ステ ー ト メン ト が 用 いら れる 。 END ス テー トメ ント を 用 
いて , RETURN ステ ー ト メン ト と 同じ ょ うら (て サブ ルー チン ・ ブ 
ロ シ ー ジ ャ ー か ら 制 伯 を 返す こと と も で きる 。 関数 プロ ンー ジャ ー の 
場合 は , 関数 参照 が 出 て くる 式 の 中 で , 関数 参照 に 与え られ る 値 を 
も つ 要 素 式 を 指定 し を けれ ば を ら な い 。 


RETURNS 属 性 と RETURNS オプション 


RETURNS 属性 は , 関数 プロ ンー ジャ ー か ら 受 け と る 値 の 属性 
を , 呼出 し 側 プ ロッ ク 対 し て 指定 する る の で ある 。 RETURNS 
ォ プ シュ ョ ン は , 返す 値 が も っ て いる べき 届 性 を , 関数 プロ シー ジャ 
ーKC 対 し て 指定 する も る の で ある 。 該当 する 値 が これ ら の 属性 を も っ 


ーーー 


て いな い 場 合 は , 適当 な 変換 を 行なっ て か ら , 関数 は , 制御 を 引き 
渡し , 値 を 返す よう する 。 


RETURNS オ ォ オプション が 指定 され て い を い 場 合 は , 入口 点 名 の 
頭 文 字 C し た が っ て , 省略 時 解 和 羽 C ょ り , 返さ れる 値 の 属性 が 想定 
され る 。 標準 の 省略 時 解釈 は , 頭 文 字 が ( I : N) の 範囲 の 場合 は 
REAL FIXED BINARY (15 , 0 ) で あり , (A: 是 ) 
お ぉ お よび (0O:Z) の 範囲 と 8, #, @ の 文字 の 場合 は , REAL 
FLOAT DECIMAL (6 ) で ある 。 


内 部 入口 名 対し て RETURNS 属性 を 指定 し て は を ら を い が , 
と れ は , 返さ れる 値 の 属性 は , コン バイ ラー が 関数 プロ シー ジャ ー 
自体 か ら 決 め る た めで ある 。 外部 入口 名 また は 入口 変数 に 対 し て と 
の 属性 が 指定 され て いな い 場 合 は , コン バイ ラー は , 関数 か ら 返 さ 
れる 値 C 対 し て 省略 時 解 息 の 属性 を 想定 する (入口 点 名 か ら 判 定 す 
る ) 。 し た が っ て , 外部 関数 プロ シー ジャ ー が 返す 値 の 属性 が , 省 
略 時 解釈 で は 正しく 判定 で き を いと い 2 状 況 の 場合 は , RETURNS 
属性 と RETURNS オプ ショ ン の 両方 を 与え を けれ ば な ら た な い 。 
関数 か ら 返 され る 値 は , と の オプ ショ ン の 中 で 指定 され た 属性 を も っ 
て お り , 一 方 , 呼出 し 側 の プロ シー ジャ ー は つね と, その 値 は 
RETURNS 属 性 の 中 で 指定 され て いる 属性 を も っ て いる も の と 人 み 
を す の で , RETURNS 属 性 の 中 の 属性 と RETURNS オ プシ ョ ン の 
中 の 属性 は 一 致し て い を けれ ば を ら を な い 。 


サブ ルー チン 


サ プ ル ー チ ン ・ プ ブロ シー ジャ ー の 用 法 と 関連 する PL ノエ ステ ー ト メン 
ト に つい て , 以下 KC 説 明 す る 。 


サ プ ブルー チン は , 呼出 し を する CALL ステ ー ト メン ト の 中 で そ 
れ (C 疲 さ れる 引数 を 通常 必要 と する ブロ シー ジャ ー で ある 。 と れ は , 
外部 また は 内 部 プロ シー ジ ャ ー の どちら で あっ て も よい 。 と の よう 
を な プロシージャー を 参照 する と と は , サブ ルー チン 参照 と いう 。 
CALL ステ ー ト メン ト ま た は INITIAL 属性 の CALL オ ブシ 
ョ ン 内 (CC お ける サ プ ル ー チ ン 参 照 の 一 般 形式 は , 次 の 通り で ある 。 


CALL 入口 式 
[ (引数 [ , 引 数 〕)…) 〕: 


サ プ ル ー チ ン が 呼び 出さ れ た とき は いつ で も , 呼出 し ステ ー ト メ 
ント の 引数 が , 入口 点 の パラ メー ター と 結び つけ られ , その あと で 
制御 が その 入口 点 (C 六 さ れる 。 と の よう に し て , サブ ルー チン 村 活 
用 化 さ れ , サ プ ブルー チン ・ ブ プロ シー ジャ ー の 実行 が 始ま る 。 


サ プ ブルー チン が 終了 する と , 仙人 御 は 通常 , 呼出 し 側 ブ ロッ ク K 戻 
る 。 サ プル ー チ ン が 終了 する の は , その サブ ルー チン の 中 人 対応 す 


る オン ・ ユ ニッ ト が な いよ うな 条件 を 引き 起す ステ ー ト メン ト が か 与 
えら れ た と き , また は 次 CC あげ る ステ ー ト メン ト の いずれ か が 与え 
られ た と き で ある 。 


END ス テー トメ ント : サブ ルー チン の 最後 の PND ステ ー ト ヌメ 
ント K 制 件 が 達し た と き 。 と の ステ ー ト メン ト が 実行 され る と , そ 
の サ プ ル ー チ ン を 呼び 出 し た CALL ス テー トメ ント 制御 が 戻さ れ 
る 。 


RETURN ステ ー ト メン ト : サブ ルー チン 内 の RETURN ス 
テー トメ ント 制御 が 達し た と き , と これ は , END ス テー トメ ント 
(てる 場合 と , 同じ 正常 た 戻り で ある 。 


GO TO ステ ー ト メン ト : サブ プル ー チ ン の 外 K 制 爺 を 移す GO 

TO ステ ー ト メン ト K 制 御 が 達し た と き , ( その サブ ルー チン が , 
INITIAL 属性 の CALL オ プシ ョ ン 人 よっ て 呼び 出さ れ た 場合 
て は , と れ は 許さ れ な い 。 ) と の GO TO ステ ー ト メン ト は , その 
外側 の プロ ッ ク の 中 の ラベ ル を 指定 し て も よい し (と の ラベ ル は そ 
の サ プ ブルー チン の 中 で 知ら れ て いる も の で を けれ ば を ら な い ), そ 
の サブ ルー チン 渡さ れ た ラベ ル 引 数 と 結び つけ られ を た バラ メー タ 
ー を 指定 レ し て も よい 。 と れ は , サブ プル ー チ ン の 終了 の 方 法 と し て 有 
効 で は ある が , END ま た は RETURN ステ ー ト メン ト 低 よる 場 
合 の よう (と, 正常 た 戻り で は を な い 。 


STOP ス テー トメ ント : サブ プ ブルー チン の 中 で STOP ステ ー ト 
メン ト を 出合 うと , その サブ プル ー チ ン , な よび それ を 呼び 出し た ブ 
ロ シ ー ジ ャ ー と 結び つけ られ る ブロ グラ ム 全 体 の 実行 が , 異常 停止 
させ られ る 。 


サ プ ブル ー チ ン の 用 法 : 次 に あげ る 例 は , サブ プル ー チ ン が , それ を 
呼び 出す プロ シー ジャ ー と どの ょ よう 影響 し 合う か を 示し た も の で 
ある 。 


PROCEDURE : 
DECLARE NAME CHARACTER (20), 
ITEM BIT(5), OUTSUB ENTRY: 


CALL OUTSUB (NAME, ITEM) : 


END PRMAIN: 

PROCEDURE (A,B): 

DECLARE A CHARACTER (20), 
B BIT(5): 


OUTSUB : 


PUT LIST (A,B): 


END OUTSUB: 
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プロ シー ジャ ー PRMA IN の 中 で , NAME は 文字 スト リン グ 
と し て , ITEM は ビッ ト ・ ス トリ ング と し て 宣言 され て いる 。 
PRMAIN の 中 の CALL ステ ー ト メン ト は , OUTSUB と 呼 
ば れる ブロ シー ジャ ー を 呼び 出し て お り , と の ブロ シー ジャ 参照 の 
中 に ある 括弧 付 の リス ト C は , OUTSUB 人 渡さ れる 2 つの 』| 数 
が 含ま れ て いる 。 OUTSUB を 定義 せ する PROCEDURE ス テー 
トメ ント は , A と B の 2 つの ペラ メー ター を 宣言 し て いる 。 OUT- 
SUB が 呼び 出さ れる と , NAME は A と 結び つけ られ , ITEM 
は B と 結び つけ られ る 。 OUTSUB の 中 で A を 参照 する と , それ 
は つね (CC NAME を 参照 し た も の と し て 扱わ れ , B を 参照 する と , 
ITEM を 参照 し た も の と し て 扱わ れる 。 し た が っ て , PUT 
LIST (A,B) ス テー トメ ント を 与え る と , NAME と ITEM 
の 値 が , 標準 シス テム 出力 ファ イル , SYSPRINTK 書 き 出 され 
る 。 NAMPE と I TEM の 属性 は それ ぞ れ , A と B の 属性 と 一 致し 
て いる の で , PRMAIN の 中 で の OUTSUB の 宣言 で は , バラ 
メー ター 記述 子 を ENTRY 属性 と 結び つけ る 必要 が な いと と 注 
意 し て いた だ きた い 。 


PROCEDURE ま た は ENTRY ステ ー ト メン ト の ベラ メー タ 
ー・ リ スト の 中 MK 名 前 を 記入 する と , その 名 前 は バラ メー ター で あ 
る と 明示 的 (C 宣 言 さ れ た と と (C を る 。 しかし, 省略 時 解釈 を 適用 す 
る の で な い 人 限り, その 属性 は , その プロシージャー 内 の DPECLARE 
ステ ー ト メン ト の 中 で 明示 的 (C 記 述 し を な けれ ば を ら を な い 。 


引数 と バラ メー ター を 使用 すれ ば , ある プロ シー ジャ ー の 中 で 名 
前 を 知ら れ て いな い デ ー タ で も る 操作 で きる よう (C す る た め C, ブロ 
シー ジャ ー を 一 般 化 する と と が で きる と と が , わか っ て いた だ けた 
と と と 思 5。 


例 2 : 


A: PROCEDURE: 
DECLARE RATE FLOAT (10), TIME FLOAT(5), 
DESTANCE FLOAT(15),MASTER FILE: 


CALL READCM (RATE TIME, DISTANCE, 
MASTER) : 


READCM: PROCEDURE (W, 移 ,Y,) の ) : 
DECLARE W FLOAT(10), 丈 FLOAT(5), 
Y FLOAT(15), 2 FILE: 


GET FILE (2 の) LIST (W, 丈 ,Y): 


Y 三 W* 区 : 
IF Y マ > 0 THEN RETURN : 
ELSE PUT LIST('ERROR READCM') : 
END READCM: 
END Ai: 


96 DOS PL プ 1 最適 化 セ マン パイ ラー : 言語 解説 書 第 1 部 


引数 RATE, TIME, DISTANCE, お よび MASTER は , 
バラ メー ターW, 又 , Y, お よび 必 人 渡 され る 。 し た が っ て , と の 
サブ プル ー チ ン の 中 で は , W を 参照 する と と は RATE を 参照 する の 
と 同じ し で あり , 双 は TIME を , Y は DISTANCEB を , 必 は 

MASTER を , それ ぞ れ 参照 する の と 同 じ で ある 。 


関 数 


サブ ルー チン は CALL ステ ー ト メン ト か CALL オ プシ ョ ン 低 よ 
っ て 呼び 出さ れる が , 関数 は , 式 の 中 関数 名 ( と 関連 する 引数 ) 
を 書く と と と よっ て 呼び 出さ れる 。 と の よう K 関 数 名 を 書く と と を , 
関数 参照 と いう 。 サ プル ー テ チン の 場合 と 同様 , 関数 も , 渡さ れ た 引 
数 や , その 他 の 知ら れん て いる デー タ を 操作 する と と が で きる 。 し か 
し , サ プ ブルー チン と は 異な り , 関数 は , 1 個 の 値 だ け を 計算 し て , 

呼出 し 地点 (C 制 物 と いっ し ょ に と の 値 を 返す よう , 書か れ て いる 。 

と の 1 つの 値 は , 入口 タイ プ 以 外 の も の を な ら ば どの よう な を タイプ の 
も の で あっ て も よい 。 次 あげ る ブロ シー ジャ ー の 中 て は , 関数 参 
昭 の 例 が 組み 込ま れ て いる 。 


MAINP: PROCEDURE : 
0 LIST (A,B,C,Y): 
双 Y**3 十 SPROD (A,B,C): 
上 の 例 の 中 (と ある 次 の 割当 て ステ ー ト メン ト 
X 三 Yw*3 十 SPROD(A,B,C): 


(C は , SPROD と 呼ば れる 関数 の 参照 が 含ま れ て いる 。 関数 名 の 
後 の 括弧 付 の リス ト C は , SPROD 疲 さ れる 引数 が 含ま れ て い 
る 。 SPROD が 以下 の よう 定義 され て いる と すれ ば げ , 


SPROD: PROCEDURE (U, V,W) 


IF U り > ッッ YY W 
THEN RETURN (0): 
ELSE RETURN (U*V*W) : 


END SPROD: 


SPROD が MAINP よっ て 呼び 出さ れる と , 引数 A, B, C 
は それ ぞ れ , バラ メー ターU, V, W と 結び つけ られ る 。 引数 や パ 
ラメ ー タ ー を 対し て 必 性 は 明示 宣言 され てい ない の で , 各 引 数 お よ 
び 各 バラ メー ター は け は , 省略 時 解釈 の 属性 FLOAT DECIMAL 
( 6 ) が 適用 され る 。 


SPROD の 実行 中 に CTIFE ス テー トメ ント 区 出 会 うと, テスト が 
行 を われ る 。U が V 十 W エ り 大 きい と き は , THEN クロ ー ズ と 結 
び つ けら れ た ステ ー ト メン ト が 実行 され る が , それ 以外 の 場合 は , 
ELSE クロ ー ズ と 結び つけ られ た ステ ー ト メン ト が 実行 され る 。 
どちら の 場合 も , 実行 され る ステ ー ト メン ト は RETURN ステ ー 
トメ ント で ある 。 


RETURN ステ ー ト メン ト : RETURN ステ ー ト メン ト は , 
関数 を 終了 させ る た め (C 普 通用 いら れる 方 法 で あり , 制御 が 呼出 し 
プロ シー ジャ ー(《 返 され る 。 関数 の 中 で と の ステ ー ト メン ト を 使 
場合 と , サ プ ル ー チ ン の 中 で 使う 場合 と で は , いく ら か か 相違 が ある 。 
関数 の 中 で は , と れ は 制 件 を 戻す ば か り で な く , 呼出 し 地点 K 値 を 
返す 働き も する 。 関数 の 中 で 使用 する 場合 の RETURN ステ ー ト 
メン ト の 一 般 形 式 は , 次 の 通り で ある 。 
RETURN (要素 式 ): 

要素 式 の 値 は , 呼出 し プロ シー ジャ ー の , 呼出 し 地点 の と と ろ過 
返さ れる 。 し た が っ て , 上 の 例 で は , SPROD は , 0 か また は U 
* WV * WC よっ て 表わさ れる 値 を 制御 と いっ し ょ CC, MAINP の 
呼出 し 式 K 返 す 。 返さ れ た 値 が , 関数 参照 の 値 と し て と られ , 呼出 
し 式 の 評価 が つづ けら れる 。 


GO TO ステ ー ト メン ト : GO TO ステ ー ト メン ト を 実行 する と 
と (て よ っ て , 関数 を 終了 させ る と と も で きる 。 と の 方 法 が 用 いら れ 
友 場 合 は , 関数 を 呼び 出し た 式 の 評価 は 完了 せ ず , 指定 され た ステ 
ー ト メン トト 制御 が 移る 。 サ プル ー チ ン の 場合 と 同様 , GO TO ス 
テー トメ ント の 中 で 指定 する 移動 の 行先 点 は , ラベ ル 引 数 と 結び つ 
けら れ た バラ メー ター で あっ て も よい 。 たとえば, MAINP お よ 
び SPROD が , 次 の よう 定義 され て いた と すれ ば げ , 


MAINP: PROCEDURE: 


GEBT LIST (A,B,C,Y): 
X 三 Y**3 十 SPROD( A, B,C,LAB1): 


LAB1: CALL ERRT: 
END MAINP: 
SPROD: PROCEDURE (U,V,W, 錠 ): 
DECLARE 2 LABEL: 
IF U リ > ララ vV オオ W 
THEN GO TO 
ELSE RETURN (U*V*W): 


END SPROD: 


MA TINP の 中 で , LAB1 は , CALL ERRT ステ ー ト メン ト 
の ラベ ル と し て 出 て き て いる の で , ステ ー ト メン ト ・ ラ ベル 定数 と 
し て 明示 宣言 さん て いる 。 SPROD が 呼び 出さ れる と , LAB1 

は ベラ メー ター と 結び つけ られ る 。 乙 の 属性 は , LAB1 の 属性 
と 一 致し て い を けれ ば ならない の で , 用 は LABEL 属性 を も つと 
宣言 され る 。 SPROD の 中 の IF ステ ー ト メン ト が 実行 され る と , 
テス ト が 行 を われ る 。 U が V 十 W ょ より 大 きい と き は , THEN ク ョ ロ 
ー ズ が 実行 され て , MAINP の 中 の LAB1 と いう ラベ ル の つい 
た ステ ー ト メン ト 放 制 件 が 戻り , SPROD を 呼び 出し た 式 の 評価 
は 中 止 さ れる 。U が V 十 W ょ より 大 きく を な いと き は , ELSE ク ロー 
ズ が 実行 され て , どく 普通 の 方 法 で MAINP 戻さ れる 。 


ラ ベル 引数 な よび ラベ ル ・ バ パラメータ ー の 用 法 C 関 する さら KK く 
わし いと と は , と の 章 の 「 引 数 と パラ メー ター の 関係 | の と ころ を 
今 て いた だ きた い 。 


注 : 引数 を 必要 と し を いよ うら な 形 で 関数 を 定義 する と と が で きる 
場合 も ある 。 と の よう な 場合 は , 外部 関数 名 が 式 の 中 C あ る と , 関 
数 名 が 入口 名 で ある と 明示 的 < 宣言 され て いる と きだ け , 関数 参照 
と 認め られ る 。 さ ら KC 詳 し い 点 に つい て は , と の 章 の [ENTRY 
属性 | の と と ろ を みて いた だ きた い 。 


返さ れる 値 の 属性 


RETURNS 必 性: RETURNS 属 性 は , 外部 入口 名 に対する 
DECLARE ス テー トメ ント の 中 で 指定 する 。 と れ は , その 関数 
か ら 返 され る 値 の 属性 を 呼出 し 例 ブ ロッ ク K 対 し て 指定 する も の で 
ある 。 ま た , と れ は , その 名 前 (対し て 暗示 的 C ENTRY 属性 も 
指定 する 。 返 され る 値 の 属性 が , 省略 時 解釈 に よっ て 正しく 決定 で 
き な い 場合 は , 外部 関数 の 呼出 し は , RETURNS 属 性 を も つ 入 口 
名 の 宣言 の 有効 範囲 内 に な けれ ば な ら な い 。 RETURNS 属 性 の 一 
般 形 式 は , 以下 の 通り で ある 。 


RETURNS ( 必 性 リス ト ) 
RETURNS 属 性 は , 外部 関数 プロ シー ジャ ー か ら 返 され る 値 は , 


呼出 し プロシージャー の 中 で は , 属性 リス ト の 中 で 与え られ て いる 
属性 を る っ て いる よう 扱わ れる と と を 指定 する も の で ある 。 
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呼出 し 側 プ ロッ ク で は , それ KC 返さ れる 値 が どの よう な も の で あっ 
て も , 変換 は 行なわ を な い の で , 扱わ れる と い 2 う 語 を 使用 し た 。 
返さ れる 値 は , RPTURNS ォ プシ ョ ン か ら 決 め ら れ た 属性 を も っ 
て いる の で , RETURNS 属 性 の 中 で 与え られ る 属性 は , 対応 する 
RETURNS ォ オォ プション の 中 で 与え られ る デー タ 属 性 と 一 致し て い 
を けれ ば を ら な いっ 。 


内 部 プロ シー ジャ ーKC 対 し て RETURNS 必 性 を 与え る と と は 
で き た ない 。 返さ れる 値 の 属性 は , 入口 点 の と と ろ で RETURNS 
ォ プ ショ ン ( 与え られ て いれ ば ) か ら 決め られ る 。 与え られ て いな 
いと き は , 入口 定数 の 識別 名 の 場合 と 同様 に , 省略 時 解 羽 ヒ し た が 
っ て 決め られ る 。 


RETURNS ォ オォ プション: RETURNS オ プシ ョ ン は , 関数 プロ シ 
ー ジ ャ ー の PROCEDURD ま た は ENTRY ステ ー ト メン ト の 中 
で 指定 する 。 と れ は , 関数 か ら 戻る 前 C, 関数 か ら 返 され る 値 が 変 
換 さ れる 属性 を 指定 する も の で ある 。 


総称 入口 名 と 参照 


総称 入口 名 は , プロ シー ジャ ー 人 入口 点 の 集まり を 表わす も の で あり 
その メン バー は それ ぞ れ , 総称 参照 , す を わ ち , 実際 の 和信 口 名 の か 
わり 総称 名 を 用 いる ブ プロシージャー 参照 に よっ て , 呼び 出す と と 
が で きる 。 呼び 出さ れる メン バー は , 総称 参照 の 中 で 指定 され て い 
る 引数 の 数 と 属性 (し た が っ て , 決め られ る 。 呼び 出さ れる メン 
ー は , その 数 と 属性 の 両方 が , 引数 と 合致 する よう な 総称 記述 子 リ 
スト を も る つ 最 初 の メン バー で ある 。 


総称 名 は , GENERTI C 属 性 を つけ て 宣言 し を た けれ ば な ら な い 。 
と の 属性 の 一 般 的 を 形式 は , 次 の 通り で ある 。 


総称 名 GENERIC (入口 式 
WHEN (総称 記述 子 リス ト ) 
〔(, 入口 式 
WHEN (総称 記述 子 リ スト ) 〕…) : 
を お , 総称 記述 子 リ スト は 以下 の 通り : 
(〔 記 述 子 〔, 記述 子 〕)… )〕 ) 


入口 式 は , それ ぞ れ , と の 集まり の 中 に ある ブ プロシージャー 人口 点 
の 1 つ 1 つ @ 対 応 し て いる 。 入口 式 は , 入口 名 を 表わす 入口 名 また 
は 入口 式 に する と と が で きる 。 総称 記述 子 リ スト の 中 の 記述 子 は そ 
れ ぞ れ , 引数 Cc1 つ 1 つつ 対応 し て お り , 対応 する 引数 が も っ て いる 
べき 属性 を , 関連 する 入口 名 が 選択 で きる よう な 順番 で , 指定 する 
と と が で きる 。 記述 子 が 不要 な 場合 は , 省略 する と と も , また , 星 
印 で 表示 する と と も で きる 。 省略 され て いる 記述 子 が , 唯一 の 記述 
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す 


子 で ある 場合 は , 星 印 の 形式 は 重要 で ある 。 た と えば , ( , ) は 2 
つの 記述 子 を 表わし て いる の KC 対し て , (*) は 1 個 を 表わす 。 引数 
が た いと と を 表わす 総称 記述 子 リ スト は , 次 の よう を 形式 を と る 。 
Ye ENTRY1 WHEN( 
入口 式 は , 総称 宣言 の 中 で 指定 され た も の の 中 か ら , 総称 選択 と 
いわ れる 処理 に C ょ っ て 選ば れる 。 総称 選択 は , 関数 参照 また は 
CALL ステ ー ト メン ト の 中 で 指定 され た 引数 と , GENERTC 宣 
言 の 中 の 各 入 口 式 で 与え られ た 総称 記述 子 リス ト の 内 容 と く ら べ る 
と と (に て よ っ て , 行なわ れる 。 最初 C, 各 総 称 記述 子 リス ト が , 宣言 
の 中 C 出 て きた 遥 に チェ ッ ク さ れ , 総称 名 へ の 参照 の 中 に ある 引数 
と 同じ 数 の 記述 子 が 入っ て いる か どう か 調べ られ る 。 


引数 と 同じ 数 の 記述 子 を も づつ 総 称 記述 子 リス ト が 見 つか る と , 各 
記述 子 は , 対応 する 引数 と くら べ て テス ト さ れ , 記述 子 の 中 で 与え 
られ た すべ て の 履 性 が 引数 の 属性 で ちる か と どら か 調べ られ る 。 た と 
えば げ , 総称 記述 子 リス ト K 次 の も の が 含ま れ て ぉ り , 


………(FLOAT, FIXED) 


し か も , 対応 する 2 つの 引数 が , 明示 的 , 文脈 的 , 暗示 的 , また は 
省略 時 解釈 の いずれ か によって, DECIMAL FLOAT (6) 
ぉ よび BINARY FIXED (15,0 ) な を ど と いう 属性 を も っ 
て いる 場合 は , 総称 記述 子 リス ト の 中 の 各 属 性 は , 対応 する 引数 の 
属性 と 同じ で あり , と の 選択 は うま くい っ た わけ で ある 。 し か し , 
どちら か の 引数 が , 対応 する 記述 子 の 中 の 属性 を も っ て いな を い とき 
は , 選択 処理 は , 記述 子 を 2 つ だ け も ゃ もつ 次 の 総称 メン バー に つい て 
調べ る 。 た と えば , 次 の よう を な ステー トメ ント (つい て 考え て 人 みよ 
ら 。 


DECLARE CALC GENERIC 
(FXDCAL WHEN (FIXED, FIXED), 
FLOCAL WHEN (FLOAT, FLOAT), 
MIXED WHEN (FLOAT, FIXED) ) : 


この スネ ステー トメント は, FXDCAL, FLOCAL, お よび 
MIXED と いう 3 つの メン バー を も ゃ も つ 総 称名 と し て CALC を 定 
義 し て いる 。 CALC 対し て 総称 参照 を 行なう と , その 参照 の 中 
て ある 2 つの 引数 の 性 質 C 応 し て , と れ ら の 3 つの 関数 プロ シー ジ 
ャ ー の うち の 1 つが 呼び 出さ れる 。 た と えば , 次 の よう を ステ ー ト 
メン ト て つ い て 考え て みよ う 。 

Z = XX 十 CALC(X,Y): 
又 と Y が それ ぞ れ 涯 動 小 数 点 と 固定 小数 点 の 場合 は , MIXED が 
呼び 出さ れる 。 


同様 KC し て , プロ シー ジャ ー へ の 入口 点 は , 次 元 付 け の 方 法 を 用 
いて 選択 する と と も で きる 。 た と え げ , 


DCL D GENERIC(D1 WHEN((*)), 
D2 WHEN((*,*)) ), 
A(2), 
BC32,5): 
CALL D(A): 
CALL D(B): 


最初 の 呼出 レス テー トメ ント が 実行 され る と , プロ シー ジャ ー 和 信 口 
点 D 1 が 呼び 出さ れる 。 2 番目 の 呼出 し ステ ー ト メン ト が 実行 され 
る と , プロ シー ジャ ー 呼 出し 点 D2 が 呼び 出さ れる 。 


記述 子 が すべ て 省略 され て いる か , また は 星 印 を っ て いる 場合 
は , 現在 の 数 の 記述 子 を も ゃ つ 最 初 の 入口 名 が 選択 され る 。 


特定 の 総称 関数 参照 C 対 し て , 引数 の 属性 が 一 致す る 総称 記述 子 
リス ト が 何 も み つか ら な を ない 場合 は , ブロ グラ ム は エラ ー に な る 。 


組込み 関数 


プロ グラ マー の 書い た プロ シー ジャ ー(C 対 する 関数 参照 の ほか に, 
前 も っ て 定義 され た , 広範 囲 ヒ 上 わ た る 関数 の セット (組込み 関数 と 
呼ば れる ) の 1 つ を , 関数 参照 に よっ て 呼び 出す と と が で きる 。 


組込み 関数 は , PL プ I の 一 部 と し て 備わっ て いる も の で ある 。 と 
の 中 C は , 一 般 C よ く 用 いら れる 算術 関数 ば か り で な く , 言語 の も 
つ 機 能 ( た と を ば , スト リン グ そ 配列 の 取扱 機能 な と ) と 関連 し 
て 必要 で あっ た り , 役立つ よう を 関数 も 含ま れ て いる 。 


組込み 関数 は , プロ グラ マー が 定義 し た 関数 が 呼び 出さ れる 場合 
と 同様 の 方 法 で 呼び 出さ れる 。 し か し , ブロ グラ マー が 定義 し た 関 
数 は 1 個 の 要素 値 し か 返す と と が で き な い の 対し て , 組込み 関数 
の 多く は , 値 の 配列 を 返す と と が で きる 。 


注 : ある 種 の 関数 は , プロ シー ジャ ー の 呼出 し と し て で は なく, 
イン ・ ラ イン の コー ド と し て 実際 (C コ ン バ ベイ ル さ れる 。 


引数 リス ト を も つ 組 込み 関数 ( SUBSTR (X, Y, み ) や 
INDEX (A, 「'B! ) を ど ) を 使用 する と まき は, 組込み 関数 と 
し て 議 別名 を 設定 する の 必要 を 識別 を それ 以上 し な く て も , 組 込 
み 関 数 と し て 認め られ る 。 し か し , 括弧 に 入れ た 引数 リス ト を も た 
を い 組 込 関 数 や 擬似 変数 の 場合 ( ONCHAR, ONSOUERCE, 
TIME な を ど ) は , その 識別 名 が 組込み 関数 と し て 使用 され て いる 
ブロ ッ ク の 中 で , BUILTIN と いう 属性 を つけ て 明示 的 宣言 す 


る か , ある い は ナァ 引数 リス ト を つけ て ( TIME( ) と いう よう な 
形 で ) 指定 し な けれ ば を ら な い 。 


組込み 関数 名 は , プロ グラ マー 定義 の 名 前 と し て 使用 する と と が 
で きる 。 し た が っ て , 組込み 関数 参照 が , 別 の ブロ ッ ク 含 まれ て 
いる ブロ ッ ク の 中 で 用 いら れ て お ぉ おり, し か も その 別 の ブロ ッ ク で は 
同じ 識別 名 が 何 か 他 の 目的 て 宣言 され て いる よう な 場合 は , と の 参 
照 は 不明 確 な も る の て な る 。 と の よう な 不明 確 さ を 避け る た め (C, そ 
の 識別 名 (C 関 する 別 の 宣言 を 外側 の ブロック か ら 受 けつ いで いる ブ 
ロッ ク の 中 で , 組込み 関数 名 (と 対し て BUILTIN 属性 を 宣言 す 
る と と が で きる 。 人 次 の 例 C つ いて 考え て みよ う 。 


A: PROCEDURE: 


B: BEGIN: 
DECLARE SQRT FLOAT BINARY: 


C: BEGIN: 
DECLARE SQRT BUILTIN: 


END Cj: 
END B: 
END A: 


外部 プロ シー ジャ ーA の 中 で , SQRT は , BUILTIN 属 性 を も 
つも ゃ の と 文脈 的 宣言 さん て いる と し ょ うら 。 し た が っ て , SQRT 
を 参照 すれ ば つね (CC, その 名 前 の 組込み 関数 が 参照 され る と と な 
る 。 し か し , B の 中 で は , SQRT は 浮動 小数 点 2 進数 の 変数 と 宣 
言 さ れ て ぉ り , 他 の 方 法 で 使用 する こと は で きた じい 。 最後 と , C の 
中 で は , SQRT は BUILTIN 属 性 を つけ て 宣言 され て いる の 
で , SQRT へ の 参照 は , B の 中 で 宮 言 され た 浮動 小数 点 2 進数 の 
変数 で は を く , 組込み 関数 を 参照 し た も る の と 認め られ る 。 


組込み 関数 と 同じ 識別 名 を も つ 変 数 は , 算術 変数 と し て 暗示 的 
宣言 する と と が で きる と て と 注意 し て いた だ きた い 。 た と えば , 割 
当て 記号 の 左側 (割当 て ステ ー ト メン ト , DO ステ ー ト メン ト , 繰 
返し 指定 の 中 の ) や ,。 GET ス テー トメ ント の デー タ ・ リ スト の 中 
( た だ し , 引数 リス ト の 括弧 の 中 また は 引数 リス ト の 直前 (に ある の 
で な いと と が 条件 ) に, と の 識別 名 が ある 場合 な を ど が , こと これ に あ た 
る 。 ( と の と と は , 引数 を 必要 と し た じい 擬似 変数 で ある ONCHAR 
お よび ONSOURCE な どの 名 前 に も 適用 され る 。) た と えば , 開 
始 ブ ロッ ク B の 中 C, DBCLARE ス テー トメ ント の か わり を , 
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SQRT 王 1 と いう ステ ー ト メン ト が あっ た と すれ ば , SQRT は , 
浮動 小数 点 1 0 進数 変数 と し て 暗示 的 宣言 さ れ た と と に な を る 。 


ブロ グラ マー は , 組 込 今 関数 名 を , プロ グラ マー 定義 の 関数 の 入 
名 と し て も 使用 する と と が で きる し , し か も ゃ も, 同じ ブロ グラ ム の 
中 で と の 関数 名 を , 組込み 関数 と プロ グラ マー 定義 の 関数 の 両方 
使用 する と と さえ を も で きる 。 ブロ グラ マー 定義 の 関数 が 内 部 ブロ シ 
ー ジ ャ ー で ある と き は BUILTTIN 属 性 を 使用 し , ブ ログ ラマ ャ ー 定 
義 の 関数 が 外部 プロシージャ ー で ある と き は BUTILTIN と 
ENTRY 属性 を 使用 すれ ば , 上 記 の と と が 可能 (に を る 。 


次 の 例 は , 内 部 関数 プロ シー ジャ ー と 結び つけ て BUILTIN 
属性 を 使用 する 例 で ある 。 


A: PROCEDURE : 


SQRT: PROC(PARAM) RETURNS(F1IXED(6,2)): 


DECLARE PARAM FIXED (12): 
END SQRT: 
X SQRT(Y): 


B: BEGIN: 
DPECLARE SQRT BUILTIN: 


Z 三 SQRT (P): 
END B: 
END Aj 


2 番目 の PROCEDURE ス テー トメ ント の ラベ ル と し て SQRT 
を 使用 し て いる の で , と の 識別 名 は 入口 名 と し て 明示 宣言 され た と 
と (CC な る 。 し た が っ て , A の 中 の 割当 て ステ ー ト メン ト で と の 関数 
を 参照 する と , ブロ グラ マッ ー 作 成 の SQRT 関数 を 参照 する と と MC 
な る 。 開始 ブロ ッ ク B の 中 で は , 識別 名 SQRT は BUILTIN 
属性 を つけ て 宣言 され て いる 。 し た が っ て , B の 中 に ある 割当 て ス 
テー トメ ント の 関数 参照 は , 組込み 関数 の SQRT を 参照 する と と 
(CC を る 。 


と の 組込み 関数 の 名 前 を 用 いる プロ グラ マー 作成 の 内 部 関数 の 場 
合 , 外側 の プロ ッ ク の 中 で と の 識別 名 を 参照 する と , ブロ グラ マー 
作成 の 関数 を 参照 する と と C な を る 。 上 の 例 で は , 返さ れる 値 の 属性 
は , SQRT 対す る プロ シー ジャ ー・ ス テー トメ ント の 
RETURNS ォ プシ ョ ン の 中 で 指定 され て いる 。 と の 関数 参照 は 
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内 部 の も ゃ の を の で , と れ ら の 必 性 は 呼出 し 側 デ ロ シ ー ジ ャ ーK 知 ら 
れ て いる 。 


入口 名 と し て 組込み 関数 の 名 前 を 使用 する , プロ グラ マー 作成 の 
外部 関数 プロ シー ジャ ー の 場合 は , その 関数 プロ ジー ジャ ィ ー 名 へ の 
参照 を 含ん で いる ブロ シー ジャ ーC は , その 名 前 の 入口 宣言 も 含め を け 
れ ば げ ば ならない 。 と の よう (て し な いと , と の 識別 名 へ の 参照 は , 組 込 
み 関 数 fC 対 する も の に な る 。 上 の 例 の 中 で , 開始 ブロ ッ ク B が A の 
中 CC 含ま れ て いる の で を けれ ば , BUILTIN 属 性 を 指定 する 必要 
は な を く , と の 議 別 名 が BUILTIN 以外 の 属性 を つけ て 宣言 され 
て いる の で を い 限 り , 組込み 関数 が 参照 され る と と (て を る 。 
プロ シー ジャ ーSQRT が 外部 プロ シー ジャ ー の 場合 は , SQRT 
を 入口 名 と し て 明示 的 C 宣 言 す る た め , お よび ブロ グラ マー 作成 の 
関数 プロ ンー ジャ ーK 渡 され る 値 あ よび そ と か ら 返 され る 値 の 属性 
を 指定 する た め C, プロシージャーA で は 次 の 上 うら を ステ ー ト メン 
ト が 必要 で ある 。 


DCL SQRT ENTRY(FIXED(12)) 
RETURNS(FIXED(6,2)): 


FORTRAN ラ イブ ラリ ー 関 数 


FORTRAN コ ン ペ パイ ラーC は , PL/1 の 組込み 関数 と よく 似 た ラ 
イィ プラ リー 関数 が あり , と れ ら の 関数 は , PL/{ の 言語 間 連 絡 機能 
(第 17 章 で の べ る ) を 用 いて , PL プ I プロ グラ ム か ら 呼 び 出 す と 
と が で きる 。 


組込み サブ ルー チン 


PL/I の プロ グラ マー は , 組込み サブ プルー チン を 用 いて , ある 種 の 
オペ レー ティ ング ・ シ ステ ュ ム の 機能 を , 自分 の ブロ グラ ム の 中 で 役 
(C 立 て る と と が で きる 。 とれ ら は , 各自 の コン バイ ラー で 定義 され 
た 入口 名 を も っ て お ぉ お り , CALL ステ ー ト メン ト ( よ っ て 呼び 出さ 
れる 。 と の よう を オペ レー ティ ング ・ シ ステ ム の 機能 と , 対応 する 
入口 名 は 次 の 通り で ある 。 


チェ ッ ク ポ イン ト グ 再 始動 : PLICKPT 


分 類 ン 組合 せ ・ PLISRTA PLISRTB 
PLISRTC PLISRTD 


と の 体 か に る, 主 記憶 域 の ダン プ ( 編集 し た も の ) を と る た め の 
サブ ルー チン で ある PLIDUMP, ブロ グラ ム の 戻り コー ド を ュー 
ザー が セッ ト す る た め の サ プル ー チ ン で ある PLTIRETC が ある 。 
と れ ら の 入口 名 は , 組込み 名 と し て 知ら れ て ぉ ぶり , BUILTIN 属 
性 を も る つと と を , 明示 的 また は 文脈 的 (C 宜 言 す る と と が で きる 。 


と れ ら は 予約 語 で は を い 。 


と れ ら の サブ プルー チン の 用 法 つ いて は , こと の コン ペイ ラー 用 の 
「 ブ プロ グラ マー の 手引 書 」 を みて いた だ きた い 。 


引数 と パラ メー ター の 関係 


関数 また は サ プ ブルー チン が 呼び 出さ れる と , 呼出 し を し た ステ ー ト 
メン ト ま た は 式 の 引数 と , 呼び 出さ れ た 入口 点 の パラ メー ター と の 
間 で 関連 づけ が 行なわ れる 。 と の 関連 づけ は , 見 か り 引 数 が 作ら れ 
る か どら か (て よ っ て 異な る 。 


見 か け 引 数 


前 C 引 数 と バラ メー ター つい て 説明 し た 際 C, サブ ルー チン また 
は 関数 (C 破 され る の は , 引数 の 値 で は を なく, 引数 の 名 前 で ある と い 
ら と と を 指摘 し た 。 し か し , と れ は つね KC 可能 を わけ で は な い 。 た 
と えば , 定数 や 演算 式 は 名 前 を も っ て いな い 。 し た が っ て , コン ベ 
イィ ラー は , と の ょ うな 値 C 対 し て 記憶 域 を 準備 し , 対応 する パラ メ 
ー タ ー の 名 前 と それ ら を それ ぞ れ 結び つけ る 。 とれ ら の 記憶 位 罰 は , 
見 か け 引 数 と 呼ば れる 。 バ ペラ メー ターKC 対 する 変更 は , 見 か け 引 | 数 
の 値 に 対 し て だ け 反 映 さ れ , それ が 作ら れる も と (に C な っ ん た 引数 の 値 
(て は 影響 し を ない の で , プロ グラ マー は と の よう な 存在 に つい て 気 使 
うら 必要 は を い 。 


も と (て な る 引数 が , 次 の いずれ か で ある と きけ は, 見 か け 引 数 が つ 
ね 作成 され る 。 


1. 定数 
2. 漂 算式 を 含む 式 
3 括弧 (入っ て いる 式 


4. ペラ メー ター を 対し て 宣言 され た デー タ 属 性 と は 違う デー タ 
属性 を も っ て いる 変数 。 と れ は , バラ メー ター の スト リン グ 
の 長 さ また は エリ ア ・ サ イズ を 定義 せる た め C 星 印 が 使用 さ 
れ て いる と き は 適用 され な い 。 と の よう な 場合 は , コン バイ 
ラー は , 引数 と ベラ メー ター が 合致 し て いる も の と みな を す 。 
( PICTURE 属性 を も つ 引 数 と バラ メー ター の 場合 は , 
ビク チャ ー の 指定 が 完全 (一 致し て い を い 限 り , 繰 返 し 因数 
が 適用 され た あと で , 見 か け 引 数 が 作ら れる 。 た だ し , 唯一 


の 例外 と し て , スケ ー ル 因数 の 中 十 符 号 を も つ 引 数 また は 
バラ メー ター 人 は, 十 符 号 を も た を い バ パラ メー ター また は 引数 
と 同じ と み を され る 。 ) 


5. 引数 リス ト を ゃ び 関 数 参照 


6. 梓 制 伯 ま た は 調整 可能 た 範囲 を も つ ス トリ ング また は エリ ア 
の うち , 一 定 の 範囲 を も ち , 被 制 件 で を た い バ パラ メータ ー と 結 
び つ けら れ て いる も の 。 


7 i SUB 定義 の 配列 


内 部 プロ ンー ジャ ー を 渡さ れる 引数 (CC 対 し て 作ら れる 見 か け 引 数 
の 属性 は , 次 の よう に し て 推論 され る 。 


1. 内 部 プロ シー ジャ ー の 中 で 関連 する パラ メー ター 対し て 宣 
言 さ れ て いる 属性 みか ら 。 


2. 配列 の 限界 , スト リン グ の 長 さ , エリ ア の サイ ズ が , バラ メ 
ー タ ー の 宣言 の 中 で 星 印 に よっ て 指定 され て いる 場合 は , 引 


上 記 以 外 の 場合 は すべ て , 引数 の 参照 は 直接 渡さ れる (実際, 
引数 の 記憶 域 ア ドレ ス が 渡さ れる ) 。 バラ メー ター は , 渡さ れ た 引 
数 と 全く 同じ し こと を な る の で , バラ メー ター の 値 の 変更 が も と (て な る 引 
数 の 値 C 影 響 す る の は , 見 か け 引 数 が 破 さ れ を な いと きだ け で ある 。 


ENTRY 属 性 


ENTRY 属性 は , 外部 ブロ シー ジャ ー ま た は 入口 変数 の 名 前 を 識 
別 す る た め 低 用 いら れる 。 


ENTRY 属性 の 一 般 形 式 C つ いて は , と の 章 の 前 の 方 の 
「 ENTRY 属 性 の 用 法 」 の と ころ で 説明 し た 。 と の 形式 で は , 引数 を 必 
要 と し な を い 関 数 入口 名 を 識別 する の 用 いら れる と き , また は 引数 
と パラ メー ター が 一 致す る と き は , バラ メー ター 記述 子 リ スト を つ 
けず CC ENTRY と いう キー ワー ド を 指定 する と と が 許さ れる と と 
注意 し て いた だ きた い 。 引数 と バラ メー ター が 一 致し を いと き は , 
外部 プロ シー ジャ ー の 入口 名 を 識別 する ENTRY 属 性 を つけ て , 
ベラ メー ター 記述 子 リス ト を 指定 し を けれ ば を ら た を い 。 入口 宣言 の 
中 で VARIABLE 属 性 を 使用 する と , その 識別 名 は 入口 変数 と し 
て 設定 され る 。 入口 変数 は , 入口 定数 が 入口 変数 割り 当て られ た 
あと の 入口 定数 を 表わし て いる 。 95| 数 が 渡さ れる 入口 点 を 呼び 出す 
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た めし , 関数 参照 また は CALL ステ ー ト メン ト の 中 で 入口 変数 が 
使用 され て いる 場合 は , 入口 点 の バラ メー ター の 属性 を 指定 する べ 
ラメ ー タ ー 記 述 子 リス ト を つけ て 入口 変数 を 宣言 し た な けれ ば を ら な 
い 。 と の よう (て し を いと , 誤っ た 引数 が 渡さ れる と と も ある 。 


パラ メー ター 記述 子 リ スト 


ENTRY 属性 指定 の 中 の パラ メー ター 記述 子 リス ト の 中 に ある 情 
性 の セ モット, すなわち も 記述 子 は それ ぞ れ , 呼び 出さ れる サブ ルー チ 
ン ま た は け は 関数 の バラ メー ター の 1 つ 1 つ 対応 し て な り , 与え られ 
て いる 場合 C は , その パラ メー ター の 属性 を 指定 する 。 個々 の バラ 
メー ター 低 対 する いく つか の 属性 を , プラ ンク で 区 切っ て , 各々 の 
ペラ メー ター 対す る バラ メー ター 記述 子 を 構成 する 。 パラ メー タ 
ー 記 述 子 リ スト の 中 の パラ メー ター 記述 子 は , カン マ ( て よっ て 区 切 
る 。 一 般 (C, 引数 の 属性 が , それ 対応 す る バラ メー ター の 民 性 
(バラ メー ター 記述 子 リ スト で 指定 され て いる も の ) と 一 致し を い 
場合 は , 変換 が 可能 で あれ ば , その 引数 (C 対 し て 見 か け 引 数 が 作ら 
れる 。 見 か けり 引 数 (て は , も と に を る 引数 の 値 を 対応 する パラ メー タ 
ー の 属性 と 合う よう 変換 し た も の が 入っ て いる 。 し た が っ て , サ 
プル ー チ ン ま た は 関数 が 呼び 出さ れ た と き て , そ と 渡さ れる の け , 
見 か け 引 数 で ある 。 


ENTRY 属性 と いっ し ょ MK 記述 子 リ スト を 与え る 場合 は サブ プル 
ー チ ン ま た は 関数 の 各 ぶ バラ メー ター も その 中 入れ て 考え な けれ ば 
な を ら た い 。 引数 と パラ メー ター の 属性 が 一 致し て いる と きけ は, 記述 
子 を 星 印 で 表示 し て も , 省略 し て も よい が , 記述 子 を 区 切る カン マ 
は 省略 し て は な ら を い 。 た と えば , 次 の ステ ー ト メン ト は , 


DECLARE SUBR ENTRY (FIXED, ,FLOAT ) : 


SUBR は , 3 つの バラ メー ター を も ゃ も つ 入 口 点 で ある と と を 指定 し 
て いる 。 最初 と 3 番目 の 属性 は それ ぞ れ , FIXED と FLOAT 
と いう 属性 を も っ て いる が , 2 番目 の 属性 は 渡さ れ た 引数 の 属性 と 
同じ で ある と みな を され る 。 2 番目 の バラ メー ター の 属性 は 記述 され 
て いな を い の で , 想定 は 何 も 行 な われ を い 。 


前 (C 述 べた よう KC, ENTRY 属性 は , バラ メー ター 記述 子 リ ス 
ト を つけ ず K 指 定 す る と と も で きる 。 と の 属性 は , 結び つけ られ た 
識別 名 が 入口 名 で ある と と を 表示 する た め C, と の よう にし て 用 い 
られ る 。 ある 議 別名 が , 他 の 方 法 で は 入口 名 と し て 認め させ る と と 
が で き な い 場合 , つま り PROCEDURE ま た は ENTRY ステ ー 
トメ ント の ラベ ル と し て その 識別 名 を 記入 する と と に よって, その 
識別 名 を 入口 名 と し て 明示 宣言 し を た いよ うな 場合 C, と の よう な 表 
示 が 必要 で ある 。 


し た が っ て , 入口 名 が と の よう を な を 形 で 出 て き て い を た いよ うな プロ 
ッ ク の 中 で 参照 が 行 を われ る 場合 は , 識別 名 に は ENTRY 情 性 を 
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明示 的 (C 与 を を けれ ば な ら な を い 。 たとえば, 次 の も の が 指定 され て 
いた も の と し 


A ・ PROCEDURE : 
PUT LIST (RANDOM) : 
END Aj: 


さら (C ま た, A は 外部 プロシージャー で, RANDOM は 引数 を 必 
要 と せ ず , 乱数 を 返す よら な 外部 関数 で ちあ る と し よう 。 と の ブロ ジ 
ー ジ ャ ー は 上 示し た 通り で ある か ら , RANDOM は , A の 中 で 
は 入口 名 と し て 認め られ ず , し た が っ て 当然 , PUT ス テー トメ ン 
ト の 結果 は 定義 され て いな いと と (な る 。 A の 中 で RANDOM が 
入口 名 と し て 認め られ る よう (て する た め C は , ENTRY 属 性 を も 
つ ょ よう ら RANDOM を 宣言 し を けれ ば な を ら な を な い 。 た と えば ぱげ, 


A: PROCEDURE: 
DECLARE RANDOM ENTRY: 


PUT LIST (RANDOM): 
END A: 


と れ で , RANDOM は 入口 名 と し て 認め られ , PUT ス テー トメ 
ント の 中 CRANDOM が あれ ば , 関数 参照 以外 の 何 も の と し て も 
解 息 す る と と は で き を い 。 し た が っ て , PUT ス テー トメ ント が あ 
る と , RANDOM か ら 返 され る 乱数 が 出力 転送 され る 。 


注 : DECLARE ス テー トメ ント の 中 で 入口 名 属性 REPTURNS 
また は OPTIONS の 1 つ を も つと 宣言 され て いる 識別 名 対し 
て は , ENTRY 属性 が 暗示 され る ーー し た が っ て , 明示 的 (C 記 述 
する 必要 が を い 。 


引数 と し て の 入口 式 


関数 また は サ プ ブル ー チ ン 参 照 の 引数 と し て 入口 式 が 指定 され て いる 
と きけ は, 次 の いずれ か が 適用 され る 。 


1. 入口 式 の 引数 ( M と 呼ぶ と と に する ) が それ 自身 の 引数 リス 
ト を も っ て 指定 され て いる 場合 は , これ は 関数 参照 と し て 認 
め ら れる 。 M が 呼び 出さ れ , M か ら 返 され る 値 が 実際 C, そ 
れ を 含ん で いる 引数 リス ト の 中 で , M お よび その 引数 リス ト 
と 加 き 換わる 。 た と えば げ , 


例 : 
CALL A (MC(B)): 


と れ は , 関数 プロ シー ジャ ーM か ら 返 され る 値 を 渡す も の で 
ある 。 


入口 式 引 数 が ナル 引数 リ スト を つけ て 記入 され て いる 場合 は , 
と れ は , 引数 を も た な い 関 数 参照 と し て 受け と られ る 。 た と 
えば げ , 
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と れ は , 関数 プロ シー ジャ ーB か ら 返 され る 値 を , ブロ シー 
ジャ ーA へ の 引数 と し て 渡す も の で ある 。 


入口 式 引数 が 引数 を も っ て お ら ず , し か も 括弧 の 中 (C 入 っ て 
いる 場合 は , 見 か け 入口 変数 が 作ら れる 。 た と え げ , 


CALL A((B)): 


と これ は , 入口 名 B の 値 を , プロシージャー A へ の 引数 と し て 
渡 す も の で ある 。 


組込み 関数 名 また は 入口 式 が , 組込み 関数 対す る 引数 と し 
て , 引数 リス ト を つけ ず K 使 用 され て いる 場合 は , その 組 込 
みう 関数 が ENTRY タイ ブ の 引数 を 受け 入れ る な ら ば , その 
引数 に ょ っ て 指定 され た 関数 は 呼び 出さ れ を い 。 その 組込み 
関数 が 入口 引数 を 受け 入れ を いと き は , その 引数 は , その 関 


数 の 値 を 参照 する る の と み を され る 。 た と えば , 次 の 場合 は , 


DCL DATE BUILTIN, 2 CHAR(2): 
Z 三 SUBSTR (DATE, 5, 2): 


DATE 組込み 関数 か ら 返 され る 値 か ら , 日 付 フ ィ ー ル トド が 
と り 出 され る 。 


ュー ザー 定義 の 関数 に対する 入口 式 引数 が , 引数 リス ト を $ 
っ て ぉ ぶら ず , し か る, 演算 式 ま た は 括弧 の 中 の どちら に ある 
の で も な いと き は , 入口 式 自体 が , 呼び 出さ れる 関数 また は 
サブ プ ル ー チ ン を 渡さ れる 。 と の よう な 場合 , と の 入口 式 は , 
引数 を 必要 と し な いよ うら な 関数 の 名 前 で あっ て $ ゃ , 関数 参照 
と は 受け と られ な い 。 た と えば ぴ ば , 


CALL AB): 


と れ は , ブロ シー ジャ ーAK 対 する 引数 と し て 入口 式 B を 渡 
す も の で ある 。 A の 中 の 対応 する パラ メー ター が ENTERY 
属性 を つけ て 宣言 され て いる 場合 は , 省略 時 解 羽 に より 

VARTI ABLE 属 性 が 与え られ る 。B が 入口 変数 の 場合 は , 
パラ メー ター の 属性 と 一 致す る 属性 を も つ 引 数 の 場合 と 同じ 
よう て し て , B が ペラ メー ター 渡さ れる 。 B が 入口 定数 の 
場合 は , 定数 の 引数 と 同じ よう (C し て , 見 か けが 作ら れ , 竣 
され る 。 


し か し , と の 規則 に は 例外 が ある 。 識別 名 が 入口 名 と し て 知 
られ て なり , し か も 引数 と し て 出 て き て いる 場合 , お よび そ 
の 引数 (CC 対す る パラ メー ター 記述 子 が , ENTRY 以外 の 属 
性 を 指定 し て いる 場合 は , その 入口 名 が 呼び 出さ れ , そ と か 
ら 返 され た 値 が 渡さ れる 。 返さ れ た 値 が ベラ メー ター 記 述 子 
の 中 で 指定 され た 属性 と は 異な る 必 性 を も っ て いる 場合 は , 
変換 が 行 を われ る 。 た と え ぱ げ , 


A: PROCEDURE: 
DECLARE B ENTRKY, 
C ENTRY(FLOAT): 
又 ー C(B): 


END A: 


この 場合 は , B が 呼び 出さ れ , そ と か ら 返 され る 値 が CC 渡 
され る 。 


次 の 還 多 つい て 考え て みよ う 。 
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CALLP: PROCEDURE : 
DECLARE RREAD ENTRY, 


SUBR ENTRY (ENTRY, FLOAT, 
FTIXED BINARY, LABEL ) : 


GET LIST (R,S): 


CALL SUBR (RREAD, SQRT(R), S, 
LAB1): 


LAB1: CALL ERRT(S): 


END CALLP: 
SUBR: PROCEDURE( NAME, 双 , J, TRANPT) : 


DECLARE NAME ENTRY, TRANPT LABEL: 


IF メッ > J THEN CALL NAME(J): 
ELSE GO TO TRANPT: 


END SUBR: 


と の 例 の 中 で , CALLP, SUBR, お よび RREAD は , 外部 で 
ある と し ょ よう 。 CALLP の 中 で , RREAD と SUBR の 両方 が 
ENTRY 属性 を も つも の と 明示 宣言 され て いる 。 SUBR の バラ 
メー ター の 性質 関す る 情報 を 与え る た め , SUBR 対し て 明 
示 宣言 が 用 いら れ て いる 。 CALL SUBR ス テー トメ ント の 中 で 
は , 4 つの 引数 が 指定 され て いる 。 と れ ら の 引数 は , 次 の ょ う K 解 
生 さ れる 。 
1. 最初 の 引数 , RREAD は , 入口 名 と し て 認め られ る 
( ENTRY 属 性 の 宣言 か ある の で ), と の 引数 は , CALLP の 
中 で の SUBR 対す る ENTRY 属 性 の 宮 言 の 中 で 指定 さ 
れ て いる 最初 の パラ メー ター 記述 子 と は 矛盾 し て いたい 。 し 
た が っ て , RREAD は 関数 参照 で は を く 入 口 名 と し て 認め 
られ る の で , 呼出 し の 位置 で 入口 名 が 渡さ れる 。NAME は 
入口 パラ メー ター な ので, 省略 時 解 釈 エエ っ て VARIABLE 
属性 が 与え を られ る 。 RREAD は 定数 を の で , 見 か け の 入口 
引数 が 作ら れ , と れ が NAME 渡さ れる 。 


2. 2 番目 の 引数 . SQRT(R) は , 引数 リス ト の 後 C 入 口 名 が 
ある の で , 組込み 関数 参照 と し て 認め られ る 。 SQRT が 呼 
び 出 され , SQRT か ら 返 され る 値 が 見 か け 引 数 割り 当て 
られ , これ が サブルーチン SUBR 渡さ れる 。 見 か け 引 数 
の 属性 は , バラ メー ター 属性 リス ト の 宣言 の 中 で 指定 され た 
通り , 2 番目 の パラ メー ター の 属性 と 一 致し て いる 。 SUBR 
が 呼び 出さ れる と , 見 か け 引 数 が SUBR 渡さ れる 。 
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3 3 番目 の 引数 , S は , 単なる 1 0 進 浮動 小数 点 要 素 変 数 で あ 
る 。 し か し , その 属性 は 3 番目 の バラ メー ター の 属性 と は 一 
致し て い を い の で , 3 番目 の パラ メー ター の 属性 (C 合 わせ て 
S の 値 を 変換 し た も の を 含む 見 か け 引 数 が 作ら れる 。 SUBR 
が 呼び 出さ れる と , 見 か けり 引 数 が 渡さ れる 。 


4. 4 番目 の 引数 , LAB1 は , ステ ー ト メン ト ・ ラ ベル ん 定数 で 
ある 。 そ の 属性 は , 4 番目 の バラ メー ター の 属性 と 一 致し て 
いる 。 し か し , と れ は 定数 を の で , 見 か け 引 数 が 作ら れる 。 
SUBR が 呼び 出さ れる と , 見 か け 引 数 が 渡さ れる 。 


SUBR の 中 で , 4 つの パラ メー ター は , PROCEBDURE ス テ 
ー ト メン ト 低 よっ て 明示 的 C 宜 言 さ れ て いる 。 と れ ら の パラメータ 
ー を 対し て それ 以上 明示 宣言 が 与え られ て いな けれ ば げ , 省略 時 解 釈 
の 算術 属性 が それ ぞ れ (対し て 与 を られ る 。 したがって, NAME 
は 入口 名 を 表わし て いな けれ ば を ら を い の で , NAME は ENTRY 
属性 を つけ て 明示 的 宣言 され て ぉ ふり , TRANPT は ステ ー ト メ 
ント ・ ラ ベル を 表わし て いな けれ ば を な ら を ない の で , と れ は LABEL 
属性 を つけ て 明示 的 (て 宣言 さん て いる 。 双 と J は 算術 タイ プ な を なので, 
省略 時 解 釈 を 適用 する と と が で きる 。 


CALL ステ ー ト メン ト の 中 (CNAME が あっ て も る も, 組込み プロ 
シー ジャ ー と し て NAME を 文脈 宜 言 し た と と (と は を ら な いと と 
注意 し て いた だ きた い 。 明示 宣言 が 適用 され な けれ ば , と の よら な 
文脈 宣言 が 行なわ れる 。 し か し , SUBR の PROCEDURE ス テ 
ー ト メン ト の 中 (CNAME が ある と いう と と は , ペラ メー ター と し 
て NAME を 明示 宣言 し た こと なる 。 補足 を する DEBCLARE 
ステ ー ト メン ト の 中 で バラ メー ター の 属性 が 明示 的 (宣言 され て い 
を いと き は , 算術 の 省略 時 解釈 が 適用 され る 。 し た が っ て , NAME 
は , ENTRY 属 性 を も る つも の と し て 明示 的 宣言 し た けれ ば な ら 
を い 。 と の よう し を いと , NAME は, 2 進 固定 小数 点 変数 と み 
を され る と と て な を なり , CALL ステ ー ト メン ト の 中 で 使用 する と , 
ェ エラ ー し な る 。 


パラ メー ター の 沖 振 り 


バラ メー ター は , 呼び 出さ れ た プロ シー ジャ ー の 中 は それ と 結び 
つけ られ た 記憶 域 を も た を い の で , と れ K 対 し て , 記憶 域 ク ラス の 
属性 STATIC, AUTOMATTC, また は BASED の いずれ も 
宮 言 する こと が で き な い 。 し か し , CONTROLLED 属 性 を も る つ 
と 宣言 する こと は で きる 。 し た が っ て , 記憶 域 の 割 振り C 関 し て は , 
2 つの クラ ス の バラ メー ター 一 記憶 域 ク ラス を も た を いも の , す な わ 
ち 単 純 バ ラメ ー タ ー, と CONTROLLED 属 性 を も る つも の , す な 


わ ち 拒 制 件 バラ メー ター が ある と と に な る 。 


単純 バラ メー ター は , どの よう な 記憶 域 ク ラス を も つ 引 数 と で も 
結び つけ る と と が で きる 。 し か し , 引数 C つ いて 2 つ 以 上 の 世代 が 
存在 し て いる 場合 は , ベラ メー ター は , 呼出 し の 時 点 と 存在 し て い 
る その 世代 と だ け 結 び つ けら れる 。 


被 制 御 バ ラメ ー タ ー は つね (と C, 対応 する 被 制 伯 引数 を も ぉ っ て いな 

けれ ば な ら な い 。 と の よう な 引数 は , 犬 字 を つけ る と と は で き な い 
し , 構造 の 要素 で あっ て は を ら を な いし, また , 見 か け 引 数 が 作ら れ 
る よう を も の で あっ て は な ら た ない 。 呼出 し の 時 点 で 引数 の 2 つ 以 上 
の 世代 が 存在 する 場合 は , バラ メー ター は , と れ ら の 世代 の 積 重ね 
全体 に 対応 する 。 と の よう を , 呼出 し の 時 点 で は , 被 制 伯 バラ メー 
ター は 対応 する 引数 の 現在 の 世代 を 表わし て いる 。 被 制御 バラ メー 
ター は , 呼び 出さ れ た プロ シー ジャ ー の 中 で 割り 振っ た り , 解放 し 
た りす る と と が で きる の で , 結び つけ られ た 引数 の 積 重 ね の 割 振り 
を 操作 する と と が で きる 。 単純 バラ メー ター は , ALLOCATE ま 
た は FREE ステ ー ト メン ト の 中 で 指定 する と と は で き な い 。 


バラ メー ター 記述 子 が 与 を られ て いな い の 場 合 は , 積 重ね 全体 が 渡 
され る 。 と の 場合 の バラ メー ター は , 単純 で も 被 制御 で も よく , 最 
新 の 世代 また は 積 重ね 全体 の どちら 対応 し て 結び つけ られ て いて 
も よい 。 


パラ メー ター の 属性 


DEFINED ま た は BASED 属 性 を つけ て , バラ メー ター の 宣言 
を する と と は で き な い 。 バ パラ メー ター は , オー ベー レー 定義 を する 
た め の 基 底 識 別名 と し て 用 いる と と も で きる し , また , CON- 
NECTED 属 性 を も っ て いる と き は , レコ ー ド 方 式 の 転送 の た め 
と 使用 する と と も で きる 。 バラ メー ター は つね (CTNTERNAL 
属性 を も ね っ て お り , レベ ルー 1 の 識別 名 で を けれ ば を ら な い 。 


パラ メー ター の 限界 と 範囲 


引数 が , 配列 , スト リン グ , また は エリ ア の いずれ か で ある 場合 は , 


対応 する ベラ メー ター 関し て , 配列 の 限界 , ま を は スト リン グ や 
ェ エリア の 範囲 を 宣言 し を けれ ば な を なら な い 。 配列 バラ メー ター の 移 元 
数 と 限界 , また は スト リン グ や エリ ア ・ ベ ペラ メー ター の 範囲 は , 対 


応 する 引数 の 現在 の 世代 の それ と 同じ で を けれ ば な ら な いじ 。 普通 , 
バラ メー ター の 限界 また は 範囲 の 実際 の 数 を 指定 し さえ すれ ば , 上 
記 の と と は 守ら れる は ず で ある 。 サブルーチン また は 関数 を 作成 す 
る 段階 で , 限界 や 範囲 が わか ら を けれ ば げ , 単純 バラ メー ター の と き 
は 星 印 よっ て , 被 制御 バラ メー ター の と き は 星 印 また は け 式 'C よ っ 
て 指定 すれ ば ょ よい 。 
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単純 パラ メー ター の 実際 の 限界 また は 範囲 が , 呼出 し ど と 違っ て 
いる 可能 性 が ある 場合 は , DBCLARE ス テー トメ ント の 中 で 星 印 
を 使っ て と れ ら を 指定 する と と が で きる 。 星 印 が 使用 され て いる と 
き は , 対応 する PL 引数 の 現在 の 世代 か ら 限 界 ま た は 範囲 が と 
られ る 。 現在 の 世代 が 存在 し て いな を ない とき は , その 変数 C 対 する 参 
照 は エラ ー を る 。 


被 制御 パラ メー ター の 限界 と 範囲 


被 制 御 バ パラメータ ー の 限界 まき た は 範囲 は , DECLARE ス テー トメ 
ント の 中 で 星 印 ま た は 要素 式 を 用 いて 表わす と と が で きる 。 


星 印 表記 : 星 印 夷 記 が 用 いら れ て いる と きけ, 被 制 倒 バ パラメータ 
ー の 限界 また は 範囲 は , 対応 する 引数 の 現在 の 世代 か ら と られ る 。 
その 後 , 相 制 件 バ パラメータ ー の 割 振り は , ALLOCATE ス テー ト 
メン ト の 中 で 異な る 限界 また は 範囲 が 指定 され て , それ ら が 思 き 換 
を られ ない 限り , 上 記 の も の と 同じ 限界 また は 範囲 を 使用 する 。 引 
数 の 現在 の 世代 が 存在 し て いな いと きけ は , 星 印 は , その バラ メー タ 
ー が 次 元 を も つと いう と と し か 決め られ を い の で , バラ メー ター 
対す る 他 の 参照 が 行 を われ を いら うち, 呼び 出さ れる ブロ シー ジャ 
ー の 中 で ALLOCATE ス テー トメ ント を 使っ て , 被 制 件 バラ メー 
ター 対す る 限界 と 範囲 を 指定 し を けれ ば を ら な い 。 


式 表記 : 被 制御 バラ メー ター の 限界 また は 範囲 , ま を た は サイ ズ は , 
要素 式 よっ て 指定 する と と も で きる 。 と れ ら の 式 は , 割 振り の 時 
点 で 評価 され る 。 バ パラ メー ター が 割り 振ら れる た びと , 新しい 割 
振り (対す る 現在 の 限界 また は 範囲 を 与え を る た め , 式 が 再 評価 さ 
れる 。 し か し , DECLARE ス テー トメ ント の 中 の と の ょ うな 式 は , 
ALLOCATE ス テー トメ ント 自体 の 中 で 限界 また は 長 さ を 指 定 す 
る と と によって 思 き 換え る と と が で きる 。 
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パラ メー ター が 割り 振ら れる た び K 式 が 評価 さん る 。 を た だし, 
ALLOCATE ス テー トメ ント 自体 の 中 で 限界 また は 範囲 が 指定 さ 
れ て , と れ ら が 置き 換え られ る 場合 は 例外 で ある 。 た と えば げ , 


MAIN: PROCEDURE OPTIONS(MAIN) : 
DECLARE (A(20),B(30),C(100), 
D(100 ) )CONTROLLED, 
NAME CHARACTER (20), 
I FIXED(3,0): 


ALLOCATE A,B: 
CALL SUB1(A,B): 


FREE A,B: 
GET LIST (NAME, 1 ): 
CALL SUBZ (C,D, NAME, 1): 


FREE C,D: 


END MAIN: 
SUB1 : PROCEBDURE (U,Y): 
DECLARE (U(⑭), V(⑮9 ) CONTROLLED: 


ALLOCATE DU(30), V(40): 


RETURN : 
END SUB1: 
SUB2: PROCEDURE (XX,Y, NAMEA, N): 
DECLARE (X(N), Y(N) ) CONTROLLED, 
NAMEA CHARACTER (%, 
N FIXED( ぅ 3,0): 


ALLOCATE 区 Y: 


RETURN: 
END SUB2: 


プロ シー ジャ ーMAIN の 中 で , 配 多 A, B, C お よび D は , 
CONTROLLED 記 憶 域 ク ラス 本 性 を つけ て 宣言 され て お り , 
、NAME と 1 は, 省略 時 解 和 局 と より AUTOMATTIC(C な を る 。 


SUB1 が 呼び 出さ れる と , A と B は は 宮 言 さ れ た 通り CC 割り 振ら 


れ て か ら , 渡さ れる 。 SUB1 は , 星 印 表記 に よっ て その ベラ メ 
ー タ ー を 宣言 し て いる 。 し か し , ALLOCATE ス テー トメ ント が, 
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配列 の 限界 を 指定 し て いる の で , 割り 振ら れ た 配列 (実際 に は , 
A と B の 2 番目 の 世代 ) は , 最初 の 世代 と は 違っ た 限界 を も っ て い 
る 。ALLOCATEB ス テー トメ ント の 中 で 限界 が 指定 され を か っ た 
場合 は , 新しい 世代 の 限界 は , 最初 の 世代 の 限界 と 同じ と を る 。 


MAIN 制御 が 戻っ た あと , 最初 の FREE ステ ー ト メン ト は 
A と B の 2 番目 の 世代 ( バラ メー ター と し て SUB 1 の 中 で 割り 振 
られ た も の) を 解放 し , 2 番目 の FREE ステ ー ト メン ト は 最初 
の 世代 ( MAIN の 中 で 割り 振ら れ た も の ) を 解放 する 。 


SUB2 が 呼び 出さ れる と , C と D が XX と YK 渡さ れ , NAME 
が NAMEA 人 渡さ れ , IT が NKK 渡さ れる 。 SUB2 の 中 で , 1 
( NM 渡さ れる ) の 値 (よっ て 決ま る 限界 が , 又 と YK 対し て , 宮 
言 さ れ て いる 。 又 と Y が 割り 振ら れる と き , と の 値 に よっ て , 割 》 
振ら れ た 配列 の 限界 が 決ま る 。 


NAME (NAMEAK 対 応 す る ) は 被 制御 で は ある が , NAMEA 
の 長 さ KC 対し て 星 印 が 表記 され て いる と いう と と は , その 長 さ を , 
引数 NAME か ら 取 り 出 す と と を 表わし て いる 。 


引数 お よび パラ メー ター の タイ プ 


一 般 (C, 引数 と それ KK 対応 する パラ メー ター は , どの よう な を デー タ 
編成 ヤセ タイ プ の も の で あっ て も よい 。 し か し , バラ メー ター と う 』| 数 
の 関係 が すべ て は っ きり と し た も の で ある と は 限ら を た い 。 さ ら 定 
義 づ け や ゃ 明確 化 が 必要 を も の も ある 。 と の よう ら な 場合 に つい て 以下 
と 述 べ る 。 


バラ メー ター が 要素 の と き , つま り , 構造 で も 配列 で も を い 変 数 
の と き は , 引数 は 要素 式 で を けれ ば を ら な い 。 引数 が 浅 字 付 の 変数 
の と き は , サブ ルー チン また は 関数 が 呼び 出さ れる 前 人 添字 が 評価 
され , 指定 され た 要素 の 名 前 が 渡さ れる 。 外部 プロ ンー ジャ ーK 渡 
され る 引数 が 定数 の と き は , 入口 宣言 の 中 対応 する パラ メー ター 
記述 子 が を い 限 り , 対応 する パラ メー ター の 属性 は , その 定数 (て よ 
っ て 示さ れ た 属性 と 一 致し て い を けれ ば を ら な い 。 


ペラ メー ター が 配列 の と き は , 引数 は 配列 式 で も 要素 式 で も よい 。 
引数 が 要素 式 の 場合 は , 対応 する パラ メー ター 記述 子 ま た は 宣言 
よっ て , 配列 パラ メー ター の 限界 を 指定 し を けれ ば を ら な い 。 1 0 
進 整定 数 と し て , 限界 を 指定 し を な けれ ば な を なら を い 。 と の よう する 
と , 配列 バラ メー ター の 限界 と 同じ 限界 を も つ 見 か けり 配列 引数 が 作 
られ る 。 と の あと , 要素 式 の 値 が , 見 か け 配 列 引 数 の 各 要 素 の 値 
割り 当て られ る 。 


NN ンー~ 


バラ メー ター が 固定 長 ス トリ ング で , し か も 見 か け 引 数 が 作ら れ 
を い 場 合 は , 引数 も 固定 長 ス トリ ング で を な けれ ば を ら な いら 。 同様 
パラ メー ター が 長 さ の 変わ る スト リン グ で , 見 か け 級 が 作ら れ を 
い 場 合 は , 引数 る 長 さ の 変わ ちる ストリ ング で を けれ ば な を ならない 。 


長 さ の 変わ る 要素 スト リン グ 9| 数 が , 長 さ が 定義 され て は いな を い 
( つま り , 星 印 で 指定 され た ) が , 長 さ の 変わ る も る の で は な い 要 素 
スト リン グ ・ バ ペラ メー ター 人 渡さ れる と き は つね , 引数 の 現在 の 
長 さ が , 呼び 出さ れる プロ シー ジャ ー を 渡さ れる 。 引数 が , 長 さ の 
変わ る スト リン ク グ 配 列 で あり , し か も それ が , 長 さ の 変わ る も の で 


は な い が , 長 さ が 定義 さき れ て いな い バ パラ メー ターK 多 渡さ れる 場合 は , 


1 つの 長 さ だ け , つま り 最 大 の 長 さ だ けが 渡さ れる 。 


ズラ メー ター が 構造 の 場合 は , 引数 は 構造 式 ま た は 要素 式 の どど ち 
ら か で を けれ ば な たら な い 。 引数 が 要素 式 の と き は , 外部 入口 点 の 対 
応 す る バラ メー ター 記述 子 は , 構造 ベラ メー ター の 構造 記述 子 を 指 
定 す る も る の で な けれ ば な を ならない ( レベ ル 番 号 だ け を 使用 すれ ば よい 
ーー 詳細 C つ いて は , 1 節 「 必 性 | の と と ろ で ENTRY 必 性 の 説 
明 を みて いた だ きた い ) 。 と の 結果 , 構造 パラ メー ター の 記述 と 一 
致す る 記述 を も つ 見 か け 構 造 引 数 が 作ら れる と と を る 。 そして, 
要素 式 の 値 は , 見 か け 構 造 引 数 の 各 要 素 の 値 《 を る 。 引数 の 構造 と 
ペラ メー ター の 構造 は , 相対 的 C 同 じ で な けれ ば な ら な い が , レベ 
ル 番 号 は 同じ で を なく て も よい 。 要素 の 値 は , 構造 の すべ て の 要素 名 
の 属性 (と 合わ せ て , 変換 可能 な も る の で を けれ ば な ら な い 。 


バラ メー ター が 構造 の 配列 で ある 場合 は , 引数 は , 要素 式 , 配列 
式 , 構造 式 , 構造 の 配列 式 , の いずれ で あっ て も よい 。 


ペラ メー ター が ラベル の 場合 は , 引数 は ラベ ル 変 数 か ラベ ル 定 数 
の どちら か で な けれ ば な ら な い 。 引数 が ラベ ル ァ 定 数 の 場合 は , 見 か 
け 引 数 が 作ら れる 。 


バラ メー ター が 入口 の 場合 は , 引数 は 入口 式 ま た は 総称 名 で を け 
れ ば な ら な い 。 引数 が 総称 名 の 場合 は , 入口 を 渡す 前 (総称 選択 を 
行 な り と と が で きる よら MC て, バラ メー ター 記述 子 ( 呼 び 出 され る ブ 
ロロ シー ジャー が 内 部 の と き は パラ メー ター 宣言 ) に よっ て , バラ メ 
ー タ ー 記 述 を 与え を を な けれ ば な を ならない 。 引数 と し て 渡さ れる 入口 変数 
は , 引数 と バラ メー ター が 境界 合せ の 点 で だ り 違 っ て いる と き は 見 


みかけ 引数 を 作ら ず に すむ ょ よう 人 , 境界 合せ され て いる も の と 人 みなさ 
れる 。 算術 組込み 関数 の 名 前 は 引数 と し て 渡す と と が で きる が , そ 
の 他 の 組込み 関数 名 は 渡す と と が で き な い 点 人 注意 し て いた だ きた 
い 。 


ペラ メー ター が ファ イル の 場合 は , 引数 は ファ イル 式 ま た は ファ 
ィ ル 定数 で を けれ ば を ら な い 。 た と え げ , 


EE : PROCEDURE: 
DECLARE F1 FILE: 
CALL E1(F1): 


E1: PROCEDURE(F2 ) : 
DECLARE F2 FILE: 
CALL E2(F2): 


19 め 者 PROCEDURE (FS ぅ ): 
DECLARE F3 FILE: 


END E: 


ファ イル ・ バ パラ メー ターF 1, F2, お よび F3 は すべ て , 同じ フ 
ァイル を 参照 し て いる 。 と れ ら の ファ イル ・ バ ラメ ー タ ーK 対 する 
入出 力 の オン ・ ユ ニッ ト K つ いて は , 第 1 2 章 「 例 外 条 件 の 取扱 い 
お よび プログ ラム ・ チ ェ ッ クア プッ ウト | の と とろ で 説明 する 。 


バラ メー ター が , ポイ ンタ ー ま た は オフ キッ ト の どちら か の タイ 
プ の ロケ ー タ ー で ある 場合 は , その 引数 は , どちら か の タイ ブ の ョ ロ 
ケー ター 式 で な けれ ば な を な ら な い 。 タイ ブ が 違っ て いる と き は , 見 か 
け 引 数 が 作ら れる 。 オ フ セ キット ・ パ ラメ ー タ ー の バラ メー ター 記述 
子 は , 結び つけ られ る エリ ア を 指定 し て は を ら な い 。 


バラ メー ター が エリア の 場合 は , 引 | 数 は 要素 式 で な けれ ば を ら な 
い 。 両方 の サイ ズ が 違っ て いる と き は , 見 か け 引 数 が 作ら れる 。 
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PL ン I に は , コ ンピュータ ー の 内 部 記憶 装 罰 と 外部 記憶 装置 の 間 で 
デー タ を 転送 する た め の 入 出力 ステ ー ト メン ト が ある 。 ブロ グラ ム 
の 外部 に ある デー タ の 集 ま り は , デー タ ・ セ ッ ト と 呼ば れる 。 デー 
タ ・ セ ッ ト か ら ブ ログ ラム へ デー タ を 転送 する と と は , 入力 と 呼ば 
れ , プロ グラ ム か ら デ ー タ ・ セ ッ ト へ デー タ を 転送 する と と は , 出 
力 と 呼ば れる 。 


PL/1 の 入出 力 ス テー トメ ント は , デー タ ・ セ ッ ト の 論理 的 を 構 
成 C 関 係 す る も る の で あり , ブロ グラ ム が 実行 され る と ま き 使用 され 
る 入出 力 装置 につい て の 特別 を 知識 を 必要 と せ ず (C, ブロ グラ ム を 
書く と と が で きる 。 原始 プロ グラ ム が , デー タ ・ セ ッ ト の 中 の 物理 
的 を 構成 で は なく, デー タ の 論理 的 を 面 を 主として 取り 扱う こと が 
で きる よう 人 C, PL エン ル は , ファ イル と 呼ば れる デー タ ・ セ モット の 記 
号 表現 を 使用 し て いる 。 フ ァイル は , ブロ グラ ム の 実行 中 , 時 点 
が 違え ば 別 の デー タ ・ セ ッ ト と 結び つけ る と と が で きる 。 


PL ノ I の プ ブログ ラム で は , 2 つの タイ プ の デー タ 転 送 を 使用 する 
と と が で きる 。 


スト リー ム 方 式 の 転送 で は , デー タ ・ セ ッ ト 内 (CC お ける デー タ の 
構成 は , プロ グラ ム の 中 で は 無視 され , デー タ は , 実際 文字 形式 
を し た 個々 の デー タ 項 目 の 連 続 し た 流れ ( スト リー ム ) で ある と し 
て 扱わ れる 。 入力 の と き は , デー タ は 文字 形式 か ら 内 部 形式 変換 
され , 出力 の と き は , 内 部 形式 か ら 女 字形 式 と 変換 され る 。 


レ ュ コード 方 式 の 転送 で は , デー タ ・ セ ッ ト は , 不 連続 の レコ ュー ド 
の 集 ま り と みな を され る 。 レ コー ド の 転送 中 に は , デー タ 変 換 は 行 な 
われ な い 。 入力 の と き は , デー タ は , デー タ ・ セ ッ ト の 中 記録 さ 
れ て いる 通り の 形 で 転送 され , 出力 の と き は , 内 部 的 と 記録 され て 
いる 通り の 形 で 転送 され る 。 ( ただし, ASC IT デー タ ・ セ モッ ト 
の 場合 は , と の 通り で は を い 。 と の 章 の 後 の 方 の 「 情 報 区 換 コ ー ド トド] 
の 項 を みて いた だ きた い 。 ) 


別 の 時 点 で あれ ば , 同じ デー タ ・ セ ッ ト を , スト リー ム 転 送 と レ 
ュー ドド 転送 の どちら で で も 処理 する こと が で きる 。 し か し , その よ 
う な 場合 は , デー タ ・ セ ッ ト 内 の すべ て の 項目 が 文字 形式 C な っ て 
いな けれ ば な ら な い 。 


スト リー ム 方 式 転送 は , 単純 を 仕事 , と く KC, 入力 が 電 カード 
で , 出力 が 限定 され ん てい る, と いう よう な 仕事 の 場合 (C, 非常 C 向 
いて いる 。 と く を を, 入力 が 宛 也 カー ド で , 出力 が 印刷 の 場合 は, 
プ ブログ ラマ ャ マー の コー ディ ング の 手間 は 最少 で すむ 。 し か し , レ ュ コー 
ド 方 式 の 転送 に くら べ て , スト リー ム 方 式 の 転送 は , 実行 時 間 の 点 


で 効率 が 悪い の 。 と れ は , と の 方 式 に は デー タ 変 換 が 含ま れる と と と , 


すべ て の デー タ が 文字 形式 で ある た め (C, 外部 記憶 装 罰 上 (< 余分 を 
スペ ー ス が 必要 で ある と と が 原因 で ある 。 


レコ ー ド 方 式 転 送 は , スト リー ム 方 式 転送 に くら べ て , デー タ を 
処理 する 方 式 と , 処理 可能 を & デ ー タ ・ セ ッ ト の タイ ズ プ の 両面 (と 関 し 
て , エ り 融通 性 (C 喜 ん で いる 。 デー タ は , 主 記憶 装置 に ある 通り の 
形 で デー タ ・ セ ッ ト の 中 記録 され る の で , どの よう な デー タ 形 式 
も 受け 入れ られ る 。 し た が っ て , 変換 の 問題 は 起 ら を い が , ブロ グ 
ラマ ー は , デー タ の 構成 (充分 注意 を 払わ な を けれ ば を ら を た い 。 


と の 章 で は , スト リー ム 方 式 と レ ュ ー ド 方 式 の 転送 C 共 通 を PL 
グ 1 の 入出 力 の 様々 を 性 質 ( ファ イル お よび その 属性 , ファ イル と 
デー タ ・ セ ッ ト の 関係 を ども 含め て ) つい て 解説 する 。 と の 後 の 
2 つの 章 で は , PL プ I の ブロ グラ ム の 中 で 使用 で きる 入出 力 ス テー 
トメ ント と, PL/] で 認め られ る 各種 の デー タ ・ セ ッ ト 編 成 C つ い 
て 解説 する 。 


デー タ ・ セ ッ ト 


デー タ ・ セ キット は , 様々 な 補助 記憶 媒体 , た と えば 補 電 カー ド , 
磁気 テー プ の リー ル , 磁気 ディ スク , お よび 人 磁気 ドラ ム な ど 多 貯え 
られ る 。 その 種類 は 各 様 で も ある が , こと これら の 媒体 の 性 質 は , 共通 を 
面 も 多く も っ て いる の で , デー タ の 邊 集 , 記憶 , 転送 関し て 標準 
的 な 方法 を 設け る と と も 可能 で ある 。 便宜 上 , 補助 記憶 装置 の 1 単 
位 ( た と を えば, 磁気 テー プ の リー ル や , ディ スク ・ バ ペッ ク な ど ) を 
指す の C, その 特別 を 物理 的 を 構成 に は 関わ り を く , ポリ ュー ム と 
いら ヶ 一 般 的 を 用 語 が 用 いら れる 。 


デー タ ・ セ ッ ト 内 の 各 デ ー タ 項目 は , ブロ ッ ク と 呼ば れる 物理 的 
を グル ー プ 分 け て 編成 され て いる 。 と の よう を プロ ッ ク が ある た 
め (C, デー タ ・ セ ッ ト は 1 つの 単位 と し て で は を く , 部 分 C 分 け て 
転送 し た り , 処理 し た りす る と と が で きる 。 さらし, 処理 (都合 の 
よい よう 人, 各々 の ブロ ッ ク は , レコ ー ド と 呼ば れる 1 つま た は 2 
つ 以 上 の 論理 的 を 小 部 分 ( その 各々 (て は, 1 つま た は 2 つ 以 上 の デ 
ー タ 項目 が 含ま れる ) か ら 構 成 し て も よい 。 (ブロ ッ ク は , ボリ ュ 
ー ム と の 間 で 物理 的 (< 転送 され る デー タ の 単位 で ある た め 物 理 レコ 
ー ド と 呼ば れ , その 論理 的 を 小 部 分 は 論理 レコ ー ド と 呼ば れる て と 
も ある 。 ) 
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プロ ッ ク 2 つ 以上 の レコ ュ コード が 含ま れ て いる と き は , その レコ 
ー ド は ブロ ッ ク 化 され て いる と いう 。 レコ ー ド を ブロ ッ ク 化 する と 。 
外部 記憶 装置 は , 密度 が 高く たり, 効率 よく 使用 する と と が で きる 
ょ よう て な る 。 短い レコ ー ド を 大 量 と 処理 する 場合 は , ブロ ッ ク 化 レ 
ュー ド を 使用 する と , 物理 的 を 入出 力 操作 の 回 数 が 減る の で , ブロ 
グラ ム の スル ー ブ ッ ト も 上 が る 。 


デー タ 処 理 業務 で 扱わ れる の は , 殆 ん どの 場合 , プ ロッ ク で は な 
く ,。 論理 レコ ュー ド で ある 。 そのため, PL ノ 1 の 入出 力 ス テー トメ ン 
ト は , 一 般 C, 論理 レコ ー ド を 参照 する 。 し た が っ て , ブロ グラ マ 
ー は , 処理 され る デー タ ( の み 専 念 す れ ば よく , 外部 記憶 装 千 上 で 
の 物理 的 を 構成 直接 わ ず ら ちら わ され る と と が な い 。 


情報 交換 コー ド 


シス テム 3 6 0 お よ び シ ステ ムジ 3 7 0 で は , デー タ の 表現 (と 用 
いら れる 標準 コー ド は , 主 記憶 装置 上 で も , 補助 記憶 装置 上 で も , 
EBCDIC (拡張 2 進化 1 0 進 コ ユー ド ) で ある 。 通常 , と の コン 
ペイ ラー で コン ペイ ル さ れ た PL プ I ブ ログ ラム は , EBCDIC を 
使っ て すべ て の 文字 デー タ を 記録 する 。 し か し , オペ レー ティ ング 
・ シ ステム は , 補助 記憶 装 罰 内 の デー タ を 表現 する た め C, ASCI1I 
( 情報 交換 用 米国 標準 コー ド ) と 呼ば れる コー ド を 使用 する こと も 
許し て ぉ り , PL ノ I を 使っ て と の よう な を データ ・ セ モッ ト を 読ん だ り , 
作成 し た りす る と と が で きる 。 と の サポ ー ト は , 磁気 テー プ 上 に あ 
る デー タ ・ セ ッ ト 放 限ら れる 。 


2 つの コー ド の 間 の 変換 は , オペ レー ティ ング ・ シ ステ ム て よっ 
て 行なわ れる 。 ENV IRONMENT 属 性 で 指定 する オプ ショ ン は 
別 と し て , 標準 の PBCDIC デー タ ・ セ ッ ト K 対 し て 使用 し た も 
の と 同じ PL ノ I プロ グラ ム を 使用 し て , ASCII デ ー タ ・ セ キッ ト 
を 処理 する と と が で きる 。 出力 の 場合 は , デー タ が 緩衝 域 か ら 外部 
記憶 装置 に 書き 出さ れる 直前 に , EBCDIC から ASCI1I へ の 
変換 が 行なわ れる 。 入力 の 場合 は , 緩衝 域 に デー タ が 満た され る と 
すぐ CC, ASCII か ら EBCDIC へ の 変換 が 行 を われ る 。 


PL ノ 1{ の 場合 , ASC I I デー タ ・ セ ッ ト 上 KC 書く こと と が で きる 
の は ,。 CHARACTER デ ー タ だ け で ある 。 ASCI TI コ ー ド の 各 
文字 は , 7 ビ ピット の ベター ン で 表わさ れる の で , 1 28 個 の バタ ー 
< ン が ある 。 EBCDIC で は , 各 文 字 は 8 ビッ ト の バタ ー ン で 表 わ 
され る の で , 2 56 の パタ ー ン が ある 。 ASC 1 1 データ ・ セ モット 
は , 該当 する ASC IT コー ド を も た な い ぃ EBCDIC 文字 を 表す 
の 用 いら れる 代用 文字 ( SUB 制 餌 文字 ) が 含ま れ て いる 。 と の 
デー タ が 読ま れる と , その 文字 は EBCDIC SUB 文 字 ( ビ ピット 
・ パ ター ン 001111 1 1) 区 変換 され る 。 
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ファ イル 変数 ・ 


ファ イル 


原始 プア ログ ラム が , デー タ ・ セ ッ ト 内 に ち ぉ ける 物理 的 を 構成 で は を 
く , デー タ の 論理 的 を 面 を 主として 扱う と と が で きる よう する た 
め (C て , PL/[ は, データ ・ セ ッ ト K 関 し て , ファ イル と 呼ば れる 記 
号 表 現 を 使用 し て いる 。 それ と 結び つけ られ る デー タ ・ セ モッ ト を 和信 
出力 ステ ー ト メン ト が どの よう K 処 理 す る か は , と の 記号 表現 に ェ 
っ て 決ま る 。 し か し , デー タ ・ セ ッ ト と は 異な た り , ファ イル は その 
原始 プア ログ ラム の 中 で だ け 意 味 を も っ て いる の で あっ て , ブロ グラ 
ム の 外側 で 物理 的 な 実体 と し て 存在 し て いる わけ で は な い 。 


PL プ I で は , ファ イル を 表わす 識別 名 は , FILE 属性 を つけ て 

宜 言 さん て いる 必要 が ある 。 と の よう な 識別 名 は , ファ イル 定数 で 
も , ファ イル 変数 で も よい 。 ファ イル 変数 は , ファ イル 定数 を 割り 
当て る と と の で きる デー タ 項 目 で ある 。 割当 て の 後 , と の ファ イル 
変数 を 参照 する と, 割り当て られ た ファ イル 定数 を 参照 する の と 同 
じ 意 味 を も つよ うに て を る 。 PL プ I ブ ログ ラム 人 よ っ て 処理 され る デ 
ー タ ・ セ ッ ト は それ ぞ れ , ファ イル 定数 識別 名 と 結び つけ を けれ ば 
を ら な い 。 


ファ イル 定数 *: 各 フ ァイル の 個々 の 特徴 は . ファ イル 属性 と 呼ば 
れる キー ワー ド C よ っ て 記述 され る 。 次 し あげ る リス ト は け は , 各 タ イ 
プ の デー タ 転 送 (C 適 用 され る 属性 を 示す も の で ある 。 


スト リー ム 方 式 の 転送 


FILE 

STREAM 
INPUT 
OUTPUT 
PRINT 
ENVIRONMENT 


レコ ー ド 方 式 の 転送 


FTILE 
RECORD 
INPUT 
OUTPUT 
UPDATE 
SEQUENT1IAL 
DIRECT 
BUFFERED 
UNBUFFERED 
BACKWARDS 
KEYED 
ENVIRONMENT 


ファ イル 変数 は , 属性 FILE お よび VARIA- 
BLE を $ つ 議 別名 で ある が , FILE 以外 の ファ イル 属性 を も つ 
と と は で きま ない 。 ファ イル 変数 を 集め て 配列 また は 構造 に た する と と 
が で きる 。 VARIABLE 属性 は , 暗示 する と と が で きる (た と え を 
ば ぱ , 次 元 属 性 を な ど (C よ っ て )。 


ファ イル 式 : ファ イル 式 は , ファ イル 定数 , ファ イル 変数 , また 
は FILE 属性 を も つつ 値 を 返す 関数 参照 を 参照 する も る の で あっ て よ 
い 。 


各 フ ァイル 属性 の 詳細 C に ついては, TI 節 「 属 性 ] の と と ろ を みて 
いた だ きた い 。 以下 の 説明 は , 各 フ ァイル 属性 の 簡単 を 説明 と ファ 
イィ ル 多 対す る と れ ら の 属性 の 宣言 の 仕方 示す も の で ある 。 


ファ イル 属性 


FILE 属性 は , それ と 結び つけ られ て いる 識別 名 が ファ イル で あ 
る と と を 示す も の で ある 。 た と を えば, 次 の ステ ー ト メン ト の 中 で , 
識別 名 MASTER は , ファ イル 定数 で ある と 宣言 され て いる 。 


DECLARE MASTER FILE: 


次 の 例 で は , 識別 名 ACCOUNT は ファ イル 変数 で ある と 宣言 
きれ で を な り , ACCT1。ACCT2」 は , ファ イル 定数 で ある 
と 宮 言 さん て いる 。 と の あと , ファ イル ア 定 数 は , ファ イル 変数 と 割 
り 当 て る と と が で きる 。 


DECLARE ACCOUNT FILE VARIABLE, 
ACCT1 FILE, 
ACCT2 FILE, 


次 の 例 は , どの よう すれ ば , VARIABLE 属性 を 暗示 する と と 
が で きる か を 示し た も の で ある 。 


DECLARE PAYREC(10) FILE: 


PAYREC(I ) 一 I は 1 か ら 1 0 まで の 値 を も つ 一 (は, DE - 
CLARE ステ ー ト メン ト の 中 で の , 明示 宣言 に よっ て FILE 属 
性 , 次 元 属性 ( 10 ) の 暗示 に よっ て VARIABLE 属 性 , が 与え 
られ る 。 


ラフ ァイル 定数 と 結び つけ られ る 属性 は , 択 一 的 属性 と 付加 的 属性 , 
の 2 つの カテ ゴリ ー に わけ られ る 。 択 一 的 属性 は , 属性 の グル ー ズ 
の 中 か ら 選 ば れる 属性 で ちあ る 。 グループ ブ 内 の 択 一 的 属性 の 1 つが 明 
示 宣 言 に よっ て も 暗示 宣言 に と っ て も 与え を られ て お ら ず , し か も $ 択 
一 的 属性 の 1 つが 必 須 で ある 場合 と は, 省略 時 解 釈 の 属性 が 想定 さ 
れる 。 


付加 的 属性 は , 明示 的 多 記 述 し を な けれ ば な ら な いか , ある い は 明示 
的 (C 記 述 さ れ た 別 の 属性 に よっ て 暗示 され る 属性 で ある 。 付加 的 属 
性 KEYED は , DIRECT 属性 に ょ より 暗示 され る 。 付加 的 属性 
PRINT は , 標準 出力 ファ イル 名 SYSPRINT(C よ り 剛 示 され 


る 。 付加 的 属性 は , 名 略 時 解 収 C ょ っ て 暗示 する と と は で き な い 。 


注 : すべ て の 択 一 的 属性 と 付加 的 属性 は , FILE 必 性 を 暗示 し 


て いる 。 し た が っ て , 択 一 的 属性 ま た は 付加 的 属性 が す で (C 1 つ で 
も 明示 的 (C 指 定 さ れ て いる 場合 は , FILE 属性 を 指定 する 必要 は 
な い 。 


択 一 的 属性 


PL ノ I (CC は , 択 一 的 ファ イル 属性 の グル ー プ が 5 つ あ る 。 次 て あげ 
る の は , と れ ら の グル ー プ の リス ト で ある 。 


4 省略 時 解釈 
タイ フ 択 一 の 属 位 の 属性 

用 途 STREAMI RECORD STREAM 
機 能 INPUTIOUTPUTIUPDATE INPUT 

財 


クセ ャ セス SEQUENT TI ALIDIRECT SPQUPENTI AL 
緩衝 技法 BUFFEREDIUNBUFFERED BUFFERED 
有効 答 胃 EXTERNAL | INTERNAL EXTERNAL 


各 グ ルー プ ( 有効 範囲 の 属性 は の ぞ く 。 と れ に つい て は , 1 節 「 属 
性 |] の と と ろ で 説明 する ) と つい て , 次 C 個 々 (と 説明 する 。 


STREAM 属 性 と RECORD 属 性 


STREAM 属 性 と RECORD 必 性 は , その ファ イル 対す る 入出 
力 操作 で 使用 され る デー タ 転 送 操作 の タイ プ ( ス トリ ー ム 方 式 か レ 
コー トド 方 式 か ) を 記述 する も る の で ある 。 


STREAM 属性 は , 文字 形式 で だ け 記 録 さ れん た デー タ 項 目 の 連 
続 する 流れ ( ストリーム ) と し て , ファ イル を 取り 扱う た め の も の 


RECORD 属性 は , 内 部 形式 ( どの よう を な タイプ で も よい ) で 
記録 され た 1 つま た は 2 つ 以 上 の デー タ 項 目 か ら を る , 一 連 の レコ 
ー ド の 集まり と し て , ファ イル を 取り 扱う 9 ため の も の で ある 。 


DECLARE MASTER FILE RECORD, 
DETAIL FILE STREAM: 


INPUT, OUTPUT, お よび UPDATE 属 性 


と れ ら の 機能 属性 は , ある ファ イル 対し て 許さ れる デー タ 転 送 の 
方 向 を 決め る も の で ある 。 INPUT 属性 は , 読取 り だ けが 行なわ 
れる ファ イル KK 適用 され る 。 OUTPUT 属性 は , と れ か ら 作成 さ 
れる (デー タ ・ モ セット を 拡張 する と いう 9 場合 も ある ) ファ イル 区 適 
用 され る 。 
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UPDATE 属 性 ( RECORD フ ァイル CC だ け 用 いら れる ) は , 和信 
力 と 出力 の 両用 (C 用 いら れる ファ イル を 記述 する も る の で ある 。 と の 
属性 を 使用 し た 場合 は , 既存 の デー タ ・ セ ッ ト (C レ コー ド を 近 和 し 
た り , す で て その デー タ ・ セ モット の 中 に ある レコ ー ド を 変更 し た り 
する と と が で きる 。 


SEQOUENTIAL 属 性 と DIRECT 属 性 


と れ ら の アク モス 履 性 は , RECORD 属 性 を も る つ フ ァイル KC だけ 適 
用 され る も の で , ファ イル の 中 の レコ ー ド を どの よう (て し て プア クセ 
ス す る か を 記述 する も の で ある 。 


SEQUENT 1I AL 属性 は , 物理 的 を 順 序 か また は キー の 順序 (C 
し た が っ て , デー タ ・ セ ッ ト 内 の レコ ー ド を アク セス する と と を 指 
定 す る も の で ある 。 


DI RECT 属 性 は , デー タ ・ セ モッ ト 内 の レコ ュー ド を どの よう な 順 

序 で アク セス し て も よい と と を 指定 する も の で ある 。 デ ー タ ・ セ ッ 
ト 内 の レコ ュー ド の 位置 は , 文字 スト リン グ “ キー ” 低 よ っ て 決め ら 
れる の で , DIRECT 属 性 は KEYED 必 性 を 暗示 する 。 と れ と 結 
び つ けら れる デー タ ・ セ ッ ト は , 直接 アク セス ・ ボ ポリ ュー ム MC 人 っ 
て い を けれ ば な を な ら な い 。 


BUFFERED 属 性 と UNBUFFERED 属 性 


緩衝 技法 の 属性 は , RPCORD 属 性 を も ね つ フ ァイル 対し て だ け 適 
用 され る 。 BUFFERED 属 性 は , ファ イル と の 間 で 転送 され る レ 
ュー ド は 中 間 的 を 主 記憶 域 を 通り ら な けれ ば を ら な いと と を 示す も の 
で ある 。 緩衝 域 の 大 き さ は , その ファ イル と 結び つけ られ る デー タ 
・ セ ッ ト の 中 の ブロ ッ ク ( 物 理 レ ュー ド ) の 大 き さ と , 少く と も る 同 
じ し で な けれ ば た なら な い 。 多く の 場合 , BUFFERED が 指定 され て 
いる と き は , デー タ 転 送 と 処理 は , 自動 的 重複 し て 行なわ れる 。 


UNBUFFERED 属 性 は , デー タ ・ セ ッ ト 内 の レコ ー ド が 緩衝 
域 を 通る 必要 は を く , その 変数 と 結び つけ られ る 主 記憶 域 と の 間 で 
直接 , 転送 し て よ 上 いと と を 示す も の で ある 。 UNBUFFERED が 
指定 され て いる と き は , デー タ 転 送 と 処理 と が , 自動 的 に 重複 し て 
行 を われ る と と は を い 。 デー タ 転 送 と 処 理 を 重複 させ た いと きけ は , 
プロ グラ マー が EVENT ォ オプション を 用 いて 行 を わな けれ ば なら 
を な い 。 


注 : UNBUFFERED が 指定 され て いる と まき は, 必 ら ず と いっ 
て と よい 仁 ど , 隠さ れ た 緩衝 域 が 使用 され る とこ と と な る 。 


付加 的 属性 
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付加 的 属性 に は , 次 の よう を な も の が ある 。 


PRINT 

BACKWARDS 

KEYED 

ENVIRONMENT (オプション ・ リ スト ) 


PRINT 属 性 


PR TI NT 属性 は , STREAM 属 性 と OUTP UT 属 性 を も る つ フ ァイル 
対し て だ け 適 用 され る 。 と れ は , その ファ イル が 最終 的 に は 印刷 
され る と と 。 つま り , その ファ イル と 結び つけ られ る デー タ ・ セ ッ 
ト は , 最初 は 何 か 別 の 媒体 書い て も よい が , 最終 的 に は 印刷 ペー 
ジ ト 出さ れる と と を 示す も の で ある 。 PRINT 属性 が 与え られ 
る と , 結び つけ られ た デー タ ・ セ ッ ト の 各 レ コード の 最初 の バイ ト 
は , 印刷 制御 文字 と し て と っ て お か れる 。 


BACKWARDS 属 性 


BACKWARDS 属 性 は , SEQUENTTIAL, RECORD, お よ 
び INPUT 属性 を も つ フ ァイル で , し か も 磁気 テー プ 上 の デー タ 
・ セ モッ ト で ある も の 対し て だ け 適 用 され る 。 と れ は , ファ イル が 
逆 の 順に アク セス され る と と 。 つま り , 最後 の レコ ー ド か ら 始 め て , 
最初 の レ ュ ー ド が アク セス され る まで , 進め て ゆく と と を 示す も の 
で ある 。 


KEYED 属 性 


KEYED 属 性 は , RECORD 届 性 を も る つ フ ァイル KC 対 し て だ け 適 
用 され る 。 と れ は , デー タク 転送 スチ テー トメ ント の キー・ オ プシ ョ ン 
( KEY, KEYTO, また は KEYEFORM ) の いずれ か 1 つ を 用 い 
て , ファ イル 内 の レコ ー ド を アク セス する と と が で きる と と を 示す も 
の で ある 。 KEYED 属性 は , 実際 CC キー が デー タ ・ セ ッ ト 上 K 存 
在 し て いる と と 。 あ る い は キー が デー タ ・ セ ッ ト K 書 か れ た り , そ 
と か ら 読 まれ た りす る と いら と と を , 必 ら ず し も 示し て いる わけ で 
は な を いと と 注意 し て いた だ きた い 。 し た が っ て , キー・ オ プシ ョ 
ン の いずれ か が 使用 され て いな い 限 り , 指定 する 必要 は を い 。 キー 
の 性 質 な よび 用 法 に つい て は , 第 1 2 章 「| レコード 方式 の 転送 | の 
と と ろ で くわ し く 説 明 す る 。 


ENVIRONMENT 必 性 
ENV IRONMENT 属 性 は . ファ イル と 結び つけ られ を データ を 


テク セス する 方 法 を コン ペイ ラー が 決定 する た め 必 要 な 情報 を 与 
を える も の で ある 。 と の 属性 は , その ファ イル と 結び つけ られ る デー 


タ ・ セ ッ ト の 物理 的 を 構成 を 指定 し た り , デー タ ・ セ ッ ト の 処理 方 
法 を 指示 する 。 


ENVI RONMENT 属 性 の 一 般 形 式 は , 次 の 通り で ある 。 
ENVIRONMENT (オプ ショ ン ・ リ スト ) 


ENVIRONMENT 属 性 は . ファ イル 宣言 の 中 で , ある い は 
CLOSE ステ ー ト メン ト の オプ ショ ン と し て 与え る と と が で きる 。 
CLOSE ステ ー ト メン ト の 中 で ENVIRONMENT を 指定 する 
と き 人 許さ れる オプ ショ ン は , LEAVE ま た は UNLOAD だ け で 
ある 。 


MEDIUM お よび FUNCTION オプション は 別 と し て , 2 つ 
の タイ ブ の デー タ 転 送 (C 特 有 の オプション つい て は , 第 1 1 章 
「 ュ トリー ム 方 式 の 転送 」 な よび 第 1 2 章 「 レ コード 方 式 の 転送 」 
の と と ろ で 説明 する 。 


装置 タイ プ (MEDIUM): ENVIRONMENT 必 性 の MEDI - 
UM オプ ショ ン は , VSAM ファ イル の 場合 を の ぞい て , ファ イル 
の 宣言 の 各々 (C 対 し て 指定 し を な けれ ば を ら な を ない 。 VS AM の 場合 は , 
指定 し て る 無視 され る 。 


MEDIUM オ プシ ョ ン の 形式 は , 次 の 通り で ある 。 
MEDTI UM( 記号 装置 名 [ , 物 理 装置 タイ プ 〕) 


記号 装置 名 は , SYSxxx の 形式 を し て いる 。X メ XX は は, 次 の よ 
うら て す る と と が で きる 。 


1 TI PT…… シ ステ ュ 入 力 装 置 
2.。 L ST の … リス ティ ング 用 MC 使 用 され る シス テ ュ 出 力 装置 
3 PCHH…… シ ステ ュ 出 力 装置 ( カー ド 窟 装置 ) 


4 000 か ら 221…… SYS000 か ら SYS221 まで の 記号 
装置 名 


装置 タイ ブ の 指定 C は , 使用 する 装置 の 番号 を 入れ る 。 た と えば ぱげ, 
IBM 1442-N1 型 カー ド 読 取 プ 窪 孔 装置 を 使用 する と き は , と の 
オプ ショ ン は , 1442 と 書く <〈。 図 10.1 は , 個々 の 装置 タイ プ の 
指定 の 仕方 を 示し た も の で ある 。 あ る 種 の 環境 で は , 装置 タメ イプ の 
指定 は 任意 選択 で ちあ る が , MEDIUM オ プシ ョ ン の 中 で 指定 し た 場 
合 は , 後 で 置き 換え る と と は で き な い 。 と の あと の | 装置 の 独立 性 」 
の 項 を 参照 し て いた だ きた い 。 


IBM 2540 
IBM 2560 

IBM 1442N1 

IBM 1442N2 

IBM 2520B1 

IBM 2520B2 

IBM 2520B3 

IBM 2501 

IBM 3504 

IBM 3505 

IBM 3525 

( 多重 行 印 刷 ) 

( 2 行 印刷 ) 

IBM 3881 

IBM 5425 

IBM 1403 

IBM 1404 

IBM 1443 

IBM 1445 

IBM 3211 

IBM 5203 

IBM 3203 

IBM 2400 (9 トラ ッ ク ) 
IBM 2400 (7 トラ ッ ク ) 
IBM 3410 プ 3411 
IBM 3420 


カー ト 読 取 装 軒 
お ぉ お よび 完 孔 装置 


磁気 テー ブ 装 置 


図 10.1 装置 タメ イプ と 対応 する 指定 


図 10.1 の 中 に リス ト さ れ て いる 装置 タイ プ は , 図 1 0.2 人 示さ 
れ て いる よう 低 , 記号 装置 名 SYSIPT, SYSLST, お よび 
SYSPCH( 人 割り 当て る と こと が で きる 。 


オペ レー ティ ング ・ シ ステ ム の 入出 力 機 能 は . オペ レー ティ ング 
・ シ ステ ム が 使用 する 記号 装置 名 と PL プ I ファ イル を 結び つけ る た 
め (C, “記号 装置 名 ” を 使用 する 。 シス テム の 中 で は , 記号 装置 名 
は 物理 装置 C, 一 時 的 ま た は 永久 的 C 割 り 当 て られ る 。 し か し , 連 
係 編 等 プロ グラ ム (C よ っ て , 正しい デー タ 管 理 入出 力 シ ー チ ン を 目 
的 プロ グラ ム を 組 み 込 むと と が で きる よう (人, コン バイ ラー は , 
PL プ 1I ファ イル と 結び つけ られ る デー タ ・ セ ッ ト 放 対し て 用 いら れ 
る 物理 装置 の タイ ブ を 知っ て いな を けれ ば な ら な い 。 さ ら に くわ しい 
点 に つい て け は , と の 章 の 後 の 方 の | データ ・ セ ッ ト と ファ イル の 結 
び つ けり 方 」 の と と ろ を みて いた だ き た い 。 物理 装置 タイプ の 選択 は 通 
常 」。 コ ン バ イ レー ショ ン の 前 (CC 行なわ を けれ ば を ら な いと と , お よ 


第 10 章 : 入力 と 出力 113 


び 変 更 を する と き は 通常 ,MEDIUM オ プシ ョ ン を 修正 し て , コン 
バイ ル し 直す と と な る 点 人 注意 し て いた だ きた い 。 し か し , ある 
程度 , 装置 を 独立 させ る と と は 可能 で ある 。 


装置 の 機能 (FUNCTION ) : ENVIRONMENT 属 性 の 

FUNCTION オ ォ オプ ショ ン は , IBM 3525, IBM 2560, 
また は IBM 5425C ょ よっ て 実行 され る 操作 を 指定 する も る の で あ 
る 。 IBM 3525 の FUNCTION オ プション の 形式 は , 次 の 通 
り で ある 。 


> 
R > RP 
FUNCTION ( | > RW |) 
W」 1, PW 
> RPW 


IBM 2560 と IBM 5425 の FUNCTION オ プシ ョ ン は け は, 
炊 の 通り で ある 。 


R 
FUNCTION HIGTPD 
W 


*R”, “PP” 天上 よび “"W” と いう 文字 は , ファ イル (て よっ て 実行 さ 
れる 操作 を 次 の ょ うら K 指 定 す る も る の で ある 。 


KK カー ド を 読む な た め (C フ ァイル が 使用 され る 。 フ ァイル は , 
INPUT 属性 を も っ て いな けれ ば な ら な い 。 


P カー ド を 密 する た め (C フ ァイル が 使用 され る 。 フ ァイル は , 
OUTPUT 属 性 を も ね っ て いな けれ ば を ら を い が , PRINT 
属性 を も っ て いて は な を なら な い 。 


W カー ド 上 KC 印刷 する た め に ファ イル が 使用 され る 。 フ ァイル 
は , OUTPUT 属 性 を も ね っ て いな けれ ば な を なら を な を い 。 1 BM 
3 5 2 5 の 場合 だ け は , PRINT 属 性 を ね っ て いて も よい 。 
IBM 2560 ぉ お よび IBM 5425 の 場合 は , 印刷 制 卸 娘 
字 が 使用 で き を い の で , ファ イル は , PRINT 必 性 も , 
CTLASA ま た は CTL360 オ プシ ョ ン も も つと と は で き 
な い 。 


1 ぉ よび 2 と いら 59 数字 ( IBM 2560 お ぉ お と よび IBM 5425 の 場 
合 C だ け 使 用 可能 ) は , ファ イル の 入力 ホッ ペー 選択 を 表わす も の 
で ある 。 


FUNCTION オ プシ ョ ン の 2 番目 の オペ ラン ド ( IBM3525 
の 場合 に だ け 使 用 可能 ) は , 同じ カー ド K 対 し て いく つか の 操作 を 
する た め C と の 装 罰 を 使用 する と と を 指定 する も る の で ある 。 と の オォ 
プシ ョ ン は , 傘 の よう な 値 を も つと と が で きる 。 


1 カー ド の 冠 也 お よび 翻訳 印刷 の た め (C, と の ファ イル が 使用 
され る 。 と の 場合 だ け は , 最初 の オペ ラン ド を 省略 し て も よ 
い 。 指定 する と き は , " P” と し な を けれ ば な ら な い 。 
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RP と の ファ イル は , カー ド を 読ん で か ら , 塗 乾 す る た め K 用 い 
られ る 2 つの 関連 ラフ ァイル の 1 つ で ある 。 


RW と の ファ イル は , カー ド を 読ん で か ら , 印刷 する た め 用 い 
られ る 2 つの 関連 フラ ファ イル の 1 つ で ある 。 


PW と の ファ イル は , カー ド を 塞 也 し て か ら , 印刷 する た め K 用 
いら れる 2 つの 関連 ファ イル の 1 つ で ある 。 


RPW と の ファ イル は , カー ド を 読み , 光 電 し , 次 (C 印 刷 す る た め 
に 用 いら れる 3 つの 関連 ファ イル の 1 つ で ある 。 


IBM 3525K 対 する FUNCTION オ プシ ョ ン C は , 次 の 規 
則 が 適用 され る 。 


1 MEDIUM ォ オプ ショ ン の 中 で 指定 する 装置 タイ プ は , 3525 
か 3525 下 で な けれ ば な ら な い 。 


2.。 FUNCTTION オ プシ ョ ン の 2 番目 の オペ ラン ド が “1{I”" の 
と き は , 第 1 番目 の オペ ラン ド ( 指定 する を ら ば ) は ,“P” で 
な けれ ば な ら な い 。 


3 COLBIN オ ォ オプ ショ ン を FUNCTION (P, T ) と いっ し 
ょ 指 定 し て は な ら な い 。 


4。 FRUNCTION の オペ ラン ド が 1 つ だ け か , FUNCTION 
(P, 1 ) で を い 限 り , ASSOCIATE オ プション を 指定 し 
な けれ ば な ら な い 。 


5. FUNCTION (P, { ) が 指定 され て いる と きけ は , 出力 レ 
ュー ド は F 形 式 で を けれ ば な を なら な い 。 


3525 と 結び つけ られ る ファ イル の 宣言 か ら FUNCTION ォ 
プシ ョ ン が 省略 され て いる と きけ は, 次 の よら な 省略 時 解釈 が 適用 さ 
れる 。 


INPUT フ ァイル FUNCTION(R) 
OUTPUT 非 PRINT フ ァイル FUNCTION(P) 
OUTPUT PRINT フ ァイル FUNCTION(W) 


IBM 2560 と IBM 5425 の 場合 の 省略 時 解釈 は , 次 の 通 
り で ある 。 


INPUT フ ァイル 
OUTPUT フ ァイル 


FUNCTION(R1 ) 
FUNCTION(P1) 


( ホッ ペー 選択 の 数 字 だ けが 省略 され て いる 場合 は , 省略 時 解釈 
は ホッ ペー1 て な る 。 ) 


装置 の 独立 性 


記号 装置 名 SYSIPT, SYSLST, お よび SYSPCHC 対 する 
記号 装置 名 の MEDIUM オ プシ ョ ン の 中 で , 装 置 タ イプ を 指定 する 
必要 は を い 。 ユー ザー は , ブロ グラ ム の 実行 中 使用 され る 実際 の 
装置 タイ プ を , ジョ ブ 制 件 ASSGN ステ ー ト メン ト を 用 いて 指定 
する と と が で きる 。 ( た だ し , MEDIUM オ プシ ョ ン の 中 で 装置 タ 
ィ ブ が 指定 さん て いる と まき は, 後 で それ を 途 き 換え る と と は で き な 
い 。 ) 


IBM 2540 (読取 装置 ) 

IBM 2560 (読取 装 思 ) 

IBM 1442N1 

IBM 2501 

IBM 2520B1 

IBM 2400 (7 また は ? ト ラッ ク ) 
IBM 2311 

IBM 2314 

IBM 3504 

IBM 3505 

IBM 3525 

IBM 3420 

IBM 3410 グ 3411 

IBM 3330 
IBM 3340 
IBM 3540 
IBM 3881 
5425 


1403 
IBM 1404 

IBM 1443 

IBM 2400 (7 また は 9 トラック ) 
IBM 2311 

IBM 2314 

IBM 3211 

IBM 3420 

IBM 3410 グ 3411 
IBM 3330 

IBM 3340 

IBM 3540 

IBM 3881 
5203 ノ 3203 


2540 ( 欠 孔 装置 ) 
IBM 2560 ( 欠 孔 装置 ) 
IBM 1442N1 

IBM 1442RN2 

IBM 2520B1 

TBM 2520B2 

IBM 2520B3 

IBM 2400 (7 また は ? ト ラッ ク ) 
IBM 2311 

IBM 2314 

IBM 3525 

IBM 3410 グ 3411 

IBM 34210 
IBM 3330 
IBM 3340 
IBM 3540 
IBM 3881 
5425 


SYSIPT 


SYSLST 


SYSPCH 


図 1002 SYSIPT, SYSLST, お よび SYSPCH と 
結び つけ られ る 装置 の タイ ブ 


次 の よう な 必要 条件 が 満た され て いれ ば げ , 装 加 を 独立 させ る た め 
代 必要 を テー プル と ルー チン は , コン バイ ラー に よっ て 自動 的 (と 生 


成 さ れる 。 


1. 出力 フラ ァイル SYSLST は , STREAM 属 性 と PRINT 
属性 を も っ て いる か , また を は CTLASA オ プシ ョ ン を も つ 
RECORD 属 性 を も っ て い を けれ ば な ら な い 。 出力 ファ イ 
ル ん SYSPCH は , CTLASA オ プシ ョ ン を も つ RECORD 
属性 を も ね っ て い を けれ ば を ら な い 。 と の よう みな 場合 は , 各 レ 
コー ド の 最初 の 文字 は 制 伯 文 字 と し て 解 釈 され る 。 入力 ファ 
イル (SYSIPT) は , STREAM ま た は RECORD の と 
ちら で も よい 。 どの 場合 C も , RECORD フ ァイル は , 
BUFFERED 属 性 を も ね っ て いな けれ ば な を なら を な い 。 


注 : 出力 ファ イル SYSPCH の 場合 に , ASSGN ス テー 
トメ ント の 中 で 指定 され た 装置 が IBM 2560 の と き は , 
装置 の 独立 の ファ イル 宣言 で PUNCTION オ ォ オプ ション を 指 
定 す る と こと は で き な い 。 ホッ ペパー 選択 は , ASSGN ステ ー 
トメ ント を 通し て 行なわ れ , 入力 と 出力 ファ イル の それ ぞ れ 
C 対 し て 読取 と 漏 孔 操作 が 行 を われ る 。 IBM 2560 を 使 
用 する 出力 用 の 装置 独立 の ファ イル の 場合 は , "V” お よび 
*W”ANS 制御 文字 し か 使用 する と こと は で き を な い 。 


2. IBM 5425 多 能 カ ー ド 装置 は , ? 6 桁 カ ー ド を 使用 する 。 

- SYSIPT ま た は SYSPCHK 割 り 当 て られ て いる と きけ , 
8 0 桁 o ジ デー タ だ け を 読ん だ り , 塗 了 則 し た りす る と と が で き 
る 。 2 6 桁 全体 を 読ん だ り , 空 了 し た りす る た め C は , 
MED TUM ォ プシ ョ ン で 5 4 25 を 指定 し を けれ ば を ら な い 。 


3. レコ ュー ド は , 非 ブ ロッ ク 化 , 固定 長 の も の で を けれ ば な ら な 
い 。 レコ ー ド ・ サ イズ は , 次 の 通り で を けれ ば を な を ら ない 。 


SYSI PT の 場合 は , < 80 
SYSLST の 場合 は , く 121 
SYSPCH の 場合 は , く 81 


注 : デー タ ・ セ ッ ト が 直接 アク セス 装備 上 (C と ある と き は , 
SYSIPT, SYSLST, おぉ お よび SYSPC 耳 の 値 は それ ぞ 
れ , レコ ー ド ・ サ イズ 80, 121, お よび 8 1 で な けれ ば 
な を ら な い 。 


上 の 条件 C あ っ て いる と き は , それ ぞ れ の 記号 装置 名 対し て サ 
ボ ポート さ れる 装置 タイプ ( 図 1 0.2 を 参照 ) は いら ずれ も , コン バイ 
ル し 直す 必要 を し, 割り 当て る と と が で きる 。 


ファ イル の 開閉 


ファ イル 結び つけ られ た デー タ を 転送 で きる よう CC す る た め ( て は , 
その 前 C, 外部 記憶 媒体 の 使用 可能 性 の チェ ッ ク , 媒体 の 位置 づけ , 
該当 する オペ レーティング ・ シ ステ ム の サポ ー ト の 割 振り , を どの 
ファ イィ イ ァ 準備 作業 が 行 を われ て い を けれ ば なら を い 。 と の よら な 作 
業 を , ファ イル を 開く , と いう 。 ま た , 処理 が 終っ た と きけ は , ファ 
イル を 閉じ を けれ ば な ら な を ない 。 ファ イル を 閉じ る と いう と と は , フ 
ァイル を 開く と き 史 設定 され た 機能 を 解放 する こと と を 意味 し て いる 。 
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PL/1I (て C は , と の よう な 機能 を 行 を うた め の ス テー トメ ント が 2 
つ - OPEN と CLOSD- あ る 。 し か し , と れ ら の ステ ー ト メン ト 
は , 任意 選択 で ある 。 フ ァイル 多 対 し て OPEN ステ ー ト メン ト が 
実行 され な か っ た 場合 は , その ファ イル 対す る 最初 の デー タ 転 送 
ステ ー ト メン ト が 実行 され る 前 (C, ファ イル は は 自動 的 (C 開 か れる 。 
と の 場合 の 自動 的 を ファ イル の 準備 は , DECLARE ス テー トメ ン 
ト で 指定 され た ファ イル 関す る 情報 を 用 いる , いく つか の 標準 シ 
ステ ム ・ ブ プロ シー ジャ ーC よ っ て 行なわ れる 。 同様 KK, プロ グラ ム 
が 完了 する 前 ファ イル が 閉じ られ を か っ た 場合 は . プログ ラム が 
正常 (CC 完了 する と き (C, ファ イル は 自動 的 に 閉じ られ る 。 


OPEN スズ ステー トメ ント 


OPEN ステ ー ト メン ト が 実行 され る と , 1 つま た は 2 つつ 以上 の ラフ 
ァ イ ル が 明示 的 開か ふれ る 。 OPEN ステ ー ト メン ト の 基本 形式 は , 
次 の 通り で ある 。 


OPEN FILE( フ ァイル ん 式 ) [オプ ショ ン ・ グ ルー プ 〕 
し FILE( フ ァイル メル 式 ) 
[オプ ショ ン ・ グ ルー プ ] 〕…: 


OPEN ステ ー ト メン ト の オプ ショ ン ・ グ ルー ブ で は , CONSECU- 
T IVE 編成 の UNBUFFERED フ ァイル KK 対す る INPUT ま 
た は OUTPUT 属 性 , TITLE オ ォ オプション, お よび PAGES1IZE 
と LINES1ZE ォ プション を 指定 する と と が で きる 。 
(PAGESIZE と LINESIZE オ プシ ョ ン は , STREAM 
OUTPUT フ ァイル (CC だ の 適用 され る 。) OPEN ステ ー ト メン ト 
の 中 の 属性 と オプ ショ ン は , DECLARE ス テー トメ ント の 中 で 記 
述 さ れ た も の と 組み 合わ せら れる 。 同じ ファ イル 対す る OPEN 
ステ ー ト メン ト と DECLARE ス テー トメ ント の 両方 で , 属性 を 繰 
返し て 指定 する 必要 は を い 。 2 組 の 属性 の 間 (C 矛 盾 が ある と, 
UNDEF INED 条 件 が 起 と る 。 


ファ イル を 明示 的 開く 場合 は , その ファ イル 対す る 入出 力 ス 
テー トメ ント が 実行 され る 前 に , OPEN ステ ー ト メン ト を 実行 し 
を けれ ば な ら な い 。 


す 


暗示 的 な 開き 方 


開か お れ て いない ファ イル 多 対 し て 入出 力 ス テー トメ ント が 実行 され 
る と , ファ イル は 暗示 的 (C 開 か れる 。 


デー タ ・ セ ッ ト と ファ イル の 結び つけ 方 


PL/T プロ グラ ム の 中 の ファ イル は , 通常 , ENVIRONMENT 
属性 の オプ ショ ン を 用 いて , 物理 的 を デー タ ・ セ ッ ト 放 結び つけ ら 
れる 。 どの よう な ファ イル 宣言 の 中 で も , MEDIUM オ プシ ョ ン を 
指定 し を けれ ば な ら な を ない 。MEDIUM オ プシ ョ ン で は , その デー タ ・ 
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セッ ト 作 対し て , 必ず ” 記号 装置 名 "と , 任意 選択 で ' 物理 装置 名 
を 指定 し を けれ ば を ら な を い 。 「 記号 装置 名 ' は , 特定 の 入出 力 装置 を 識 
別 す る を ため (CC, オペ レー ティ ング ・ シ ステ ュ が 使用 する も る の で ある 。 

と の 形式 は , ! SYSXxx! の 形 を と り , XX メ ぷ ※ は , 000 か ら 
2 2 1 まで, また は け , 標準 シス テム 装 加 の 場合 は , SYSRDR, 
SYSIPT, SYSIN, SYSOUT, SYSLST, SYSLNK, 
お ぉ および SYSLOG で ある 。 特定 の シス テム の 場合 , 記号 装置 名 は , 
特定 の 物理 装置 (C 割 り 当 て られ る 。 た ゞ ヾ し, と れ ら の 割当 て は , ジ 
ョ ブ 制 件 ASSGN ステ ー ト メン ト 人 よっ て 一 時 的 変更 する と と 
が で きる 。 本 章 の | 装置 の 独立 性 ] の 項 で 前 述べ た よら な 特殊 を 
場合 を の ぞい て , 物理 装置 タイ プ は , 原始 プロ グラ ム の 中 で 指定 し , 
ュ ン バイ ラー が , 該当 の デー タ 管 理 ル ー チ ン を 連係 編集 する と と が 
で きる よう にし な けれ ば な ら な い 。 


MEDIUM ォ プシ ョ ン の 物理 装 敬 タイ プ は , 自動 的 か , また は 
ASSGN ステ ー ト メン ト を 用 いて ファ イル 割り 当て られ た 物 理 
入出 力 装置 タイ プ K 対 応 す る も る の で な けれ ば な を ら な い 。 たとえば, 
物理 装置 タイ プ が 破 気 テ ー プ を 表示 し て いる 場合 は , ファ イル は け は, 
磁気 テー ブ 装 置 (C 割 り 当 て を けれ ば な ら を な い 。 


挫 の 例 C つ いて 考え て みよ うら 。 


DECLARE MASTER FILE RBCORD INPUT 
SEQUENTI AL ENVTIRONMENT 
(…MEDIUM( SYS006, 2400)… ): 


と の 宣言 で は , ファ イル MASTER は , 記号 装置 名 SYS006K 
割り 当て られ て お ぉ なり, MASTER の 物理 装置 タイ プ は , 1BM 
2400 磁気 テー プ 装 置 で ある と 宣言 され て いる 。 


上 記 の ファ イル 宣言 が 使用 され て いる 場合 C, オペ レー ティ ング 
・ シ ステ ム が , 自動 的 に SYS006 を 適当 な 磁気 テー プ 装 罰 C 結 び 
つけ る と き は , それ 以上 MC 割当 て を する 必要 は を な い 。 そう で な いと 
き は , ASSGN ス テー トメ ント を 用 いて , シス テム ・ フ ァイル を 
磁気 テー プ 装 置 割り当て を けれ ば を ら な を ない 。 その 実行 モウ ジュール 
と いっ し ょ 使用 され る ジョ ブ 制 御 プ ログ ラム CC は, 次 の よう な ス 
テー トメ ント (一 部 分 だ け を 示す ) が 含ま れ て いな けれ ば な を ならない 。 


ノ プ ASSGN SYS006, ・ 


と の ステ ー ト メン ト は , 論理 装置 名 SYS006 を 物理 入出 力 装置 
( も ちろ ん , 磁気 テー プ で を けれ ば を ら な い ) 結び つけ る も の 
で ある 。 使用 され る 所 定 の テー プ 装 置 を , ASSGN ス テー トメ ン 
ト の SYS006 の 後 C 書 く 。 


MEDIUM オ ォ オプション は , ファ イル を 装置 また は ボリ ュー ム K 結 
び つ ける だ け で ある 。 TITLE オプ ショ ン の 中 で 指定 され た ファ 
イル 名 また は 識別 名 の 最初 の 7 文字 よって, ファ イル は , ジョ ブ 


制 伯 ステ ー ト メン ト DL BL また は TLBL (て 結び つけ られ る 。 


OPEN ステ ー ト メン ト の 中 で 使用 され て いる ファ イル 式 が ファ 
ィ ル 定数 の 場合 は , TL BL また は DLBL ステ ー ト メン ト で , フ 
ァイル 定数 を 指名 し を けれ ば な を な ら を い 。 OPEN ステ ー ト メン ト で 
ファ イル 定数 を 指定 し て い を い の 場 合 は , TL BL また は DL BL ス 
スー トメ ント で , ファ イル ん 式 の 値 を 指名 し を けれ ば ならない 。 た と 
えば げ ば , 


PRICES = デ RPRICE: 
OPEN FILE(PRICES): 


TLBL ステ ー ト メン ト は け は , 次 の よう (CC, デー タ ・ セ ッ ト 
STOCK を ファ イ ァ 定数 RPRICE 結び つけ る 。 


ノノ TLBL RPRICE, STOCK' 


和 TITLE オプ ブ プション を 含む な OPEN ステ ー ト メン ト よ っ て フ 
ァイル が 華 か れる 場合 は , その ブログ ラム の 外 で は , その ファ イル 
名 は 使用 され を な い 。 TITLE オ ォ オプション の 中 の 式 は 評価 され , 必 
要 な たら, 適当 な デー タ ・ セ ッ ト を 識別 する る の と みな され る 文字 ス 
トリ ング 変換 され る 。 次 に あげ る 0PEN ステ ー ト メン ト は , 
TITLE オプ ショ ン の 用 い 方 を 示し た も の で ある 。 


OPEN FILE(DETAIL) TITLE(' DETAIL1”): 


と の ステ ー ト メン ト を 実行 する と き は , DETAIL1 を その ファ イ 
ル ん 名 と し て も つ TL BL また は DL BL ステー トメ ント が , 現行 の 
ジョ ブ ・ ス テッ プ の 中 CC 入っ て いな けれ ば を な ら な い 。 その ステ ー ト 
メン ト は , 次 の よう を も の で ある 。 


ノン TLBL DETAIL1, !DETAILA' 


し た が っ て , デー タ ・ モ セッ ト DETAILA は , TLBL フ ァイル 名 , 
DETAIL1 を 通し て , ファ イル DETAIL (CC 結び つけ る 。 


中 TITLE オプ ショ ン を 使用 する と , プロ グラ マー は , いく つか 
の デー タ ・ セ ッ ト の 中 か ら , 特定 の ファ イル 名 と 結び つけ られ る も $ 
の を , OPEN の と き に 動 的 (C 選 ぶ と と が で きる 。 た と えば , 


DECLARE 1 1INREC, 
2 FIELD_1 …, 
2 FILE_TID CHAR(/), 
DTL FILE INPUT …, 
MSTR FILE INPUT …: 
OPEN FILE(DTL ) : 
READ FILE(DTL) INTO(INREC): 
OPEN FILE(MSTR) TITLE(FILE 1TD) 


と れ ら の ステ ー ト メン ト が 含ま れ て いる ブロ グラ ム は , 数 個 の 異 
な る 明細 デー タ ・ セ ッ ト を 処理 する た め の も の で あり , それ ら の デ 
ー タ ・ セ ッ ト K 対 応 す る マス ター・ デ ー タ ・ セ ッ ト は それ ぞ れ 異な 
っ て いる と し ょ う 。 さら し, 各々 の 明細 デー タ ・ セ ッ ト の 最初 の レ 


コー ド C は , 最後 の デー タ 項 目 と し て , 該当 する マス ター・ デ ー タ 
・ セ ッ ト を 識別 する 文字 スト リン グ が 含ま れ て いる と し よ ょ 2。 次 の 
よう ら な ジョ ノ 制 餅 ス テー トメ ント が , 現行 の ジョ ブ プ ・ ス テッ プ の 中 
低 あ る は ず で ある 。 

メグ 2 OBE DE 


グン DLBL MSTR1A, 「MSTR1A! 
ング DLBL MSTR1B, 'MSTR1B 
ノノ DLBL MSTR1C, !「MSTR1C! 


と の 場合 , MSTR1A, MSTR1B, ぉ お よび MSTR1C は , 3 つ 
の 異な る マス ター・ フ ァイル を 表わし て いる 。 DTL の 最初 の レ ュ 
ー ド は , 最後 の デー タ 項 目 と し て , !「MSTR1A「', 
!MSTR1B'「, また は MSTR1C ' が 含ま れ て お り , と れ が 女 
字 ス トリ ング 変数 FILE_ ID 割り 当て られ る 。 フ ァイル MSTR 
が 開か ふれ る と , FILE_TD の 現在 の 値 《 ょ っ て , 該当 する デー タ ・ 
セッ ト が 識別 され る 。 


ファ イル 変数 を 使用 レ し て も , 1 つの ステ ー ト メン ト (《 上 よっ て 様々 
を 時 点 C い くつ も の ファ イル を 操作 する こと が で きる 。 たとえ ば, 


DECLARE F FILE VARIABLE, 
A FILE ROLLD 


LAB: READ FILE (F)…… : 


F 三 Bi: 
GO TO LAB: 


FC: 
GO TO LAB: 


LAB と いう ラベ ル の つい た ステ ー ト メン ト は , A, B, C の 3 
つの ファ イル を 読む た めん 使用 され て いる 。 各々 の 場合 CREAD 
ステ ー ト メン ト が 実行 され た あと も , ファ イル A, B, C は いずれ 
も 開か れ た まま で ある と と 注意 し て いた だ きた い 。 1 つの ステ ー 
トメ ント で いく つも の デー タ ・ セ ッ ト を アク セス で きる より ら 多 する 
た め C TITLE オブ プション が 使用 され て いた と すれ ば , ファ イル 
を 別 の デー タ ・ セ キッ ト 結び つけ る 必要 が ある た びに , ファ イル を 
閉じ て , 開き 直さ を けれ ば を ら な を い 。 1 つの ステ ー ト メン ト ( 低 よっ 
て いく つも の デー タ ・ セ ッ ト を アクセス する と き は , TITLE ォ 
プシ ョ ン よ り も ファ イル 変数 を 使用 し た 方 が . ブロ グラ ム (% 必 要 な を 
限 り 各 デー タ ・ セ ッ ト K 対 する ファ イル を 開い た まま (て し て お く こ と 
と が で きる の で , ブロ グラ ム の 効率 が よい 。 


CLOSE ス テー トメ ント 


CLOSE ステ ー ト メン ト の 基本 的 を 形式 は 次 の 通り で ある 。 


第 10 章 : 入力 と 出力 117 


CLOSE FILE( フ ァイル メ 式 ) 

ENVIRONMENT (LEAVEIUNLOAD)〕 
[,FILE( フ ァイル 式 ) 
[ ENVIRONMENT (LEAVEIUNLOAD) 〕 ]…: 


CLOSE ステ ー ト メン ト が 実行 され る と , 指定 され た ファ イル は , 
その ファ イル が 開か れ た と き ( 人 結び つけ られ た デー タ ・ モ セッ ト か ら 
切り 離さ れる 。 ま た , CLOSE ステ ー ト メン ト は , 暗示 的 また は 
明示 的 に ファ イル が 開か れる と き 人 与え を られ た すべ て の 属性 を , フ 
ァイル か ら 切 り 離 す 働 きも する 。 必要 を ら ば , 後続 の OPEN ステ 
ー ト メン ト の 中 で , その ファ イル 定数 (C 対 し て 新 し い 属性 を 指定 す 
る と と が で きる 。 し か し , DECLARE ステ ー ト メン ト の 中 で フ 
ァイル 定数 対し て 明示 的 (C 与 え られ た 属性 は すべ て , 効力 を も ち 
つづ ける 。 


OPEN ステ ー ト メン ト の 場合 と 同様 , 1 つの CLOSE. ス テー 
トメ ント で 2 つつ 以 上 の ファ イル を 閉じ る よう (すると, 実行 時 間 を 
減ら じす と と は で きる が , 1 つ ず つ 閉 し た 場合 に くら べ て , 一 時 的 
使用 され る 内 部 記憶 域 の 量 は 増す こと と な る 。 


LEAVE お よび UNLOAD オ プシ ョ ン は , ファ イル を 閉じ る と 
き の 磁 気 テ ー プ の 人 後 始末 を 制 伯 する た め の も の で ある 。 


注 : す で 多 閉じ られ て いる ファ イル を 閉じ た り , す で 開 か れ て 
いる ファ イル を 開い て も , ブロ グラ ム の 実行 時 間 が 増す だ け で , 何 
の 効果 も を い 。 


標準 ファ イル 


PL ンプ T プロ グラ ム で 使用 で きる 標準 ラフ ァイル が , 2 つ あ る 。 1 つ は , 
標準 入力 ファ イル SYSIN で , ゃ うら 1 つ は 標準 出力 ファ イル 
SYSPRINT で ある 。 こ と これら の ファ イル は , 明示 的 て 宣言 し た り , 
開い た りす る 必要 が を なく , 標準 的 を 属性 の モッ ト が 自動 的 て 適用 さ 
れる 。 SYS IN の 属性 は , STREAM INPUT で , 
SYSPRINT の 属性 は , STREAM OUTPUT PRINT で ある 。 
双方 の ファ イル 名 SYSIN と SYSPRINT は , EXTERNAL 
属性 を も つも の と みみ を され る ( SYSPRINT の 桁 数 は 7 桁 よ り 
大 きい が )。 
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と れ ら の ファ イル を 使用 する と き C, GEET お よび PUT ス テー 
トメ ント の 中 で FILE オプ ショ ン を 指定 する 必要 は を い 。 ファイ 
ん ル を 指名 し て いな い GET お よび PUT ス テー トメ ント は , 次 の も 
の と 同じ と を る 。 


GET FILE(SYSIN)…: 
PUT FILE(SYSPRINT)…: 


上 記 以 外 C SYS IN ぉ よび SYSOUT を 参照 する と き ( た と え ぱ ば, 
ON ステ ー ト メン ト の 中 , また は レ ュ コード 方 式 の ステ ー ト メン ト の 
中 で ) は , 明示 的 に 記述 し を けれ ば ならない 。 


SYSTIN お よび SYSPRINT と いら 識別 名 は , 上 述 の よう な 
特別 の 目的 C 制 限 さ れ て いる わけ で は な く , 標準 ラフ ァイル の 識別 以 
外 の 目的 (C も 使用 する と と が で きる 。 その 他 の 属性 を , 明示 また は 
文脈 の どちら か (C よ っ て と れ ら KK 適用 する と と も で きる が , 
SYSPRINT が STREAM OUTPUT ファ イル と し て 宣言 され た 
り , 開か れ た り し て いる 場合 は , INTERNAL 属 性 が 宣言 され て 
いな を い 限 り , PRINT 属性 が 適用 され る 。 


注 : SYSIN ま た は SYSPRINT が STREAM フ ァ イ ん 以 外 


の も の と し て 宣言 され て いる 場合 は , 特別 (と 注意 し な けれ ば な ら な 
い 。 実際 (に C, ユン パイ ラー は , ファ イル 定数 が 明示 的 記述 され て 
いな い GET ス テー トメ ント の 各々 (識別 名 SYSIN を 挿入 し , 
ラフ ァイル 定数 が 明示 的 (C 記 述 さ れ て い を ない PUT ス テー トメ ント の 
各々 識別 名 SYSPRINT を 挿入 する 。 し た が っ て , 次 の 例 は ェ 
ラー に な る 。 


DECLARE (SYSIN, SYSPRINT ) FIXED 
DECIMAL (4,2): 


GET LIST (AB,C): 
PUT LIST (D,E,F): 


識別 名 SYS IN が GET ス テー トメ ント 挿入 され , SYSPRINT 
が PUT ステ ー ト メン ト 挿 入 さ れる 。 し か し , と の 場合 , これ ら 
は , 標準 ラフ ァイル を 指し て いる の で は を く , その ブロ ッ ク の 中 で 宣 
言 さ れ て いる 固定 小数 点 変 数 を 指す と と と な を る 。 
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と の 章 で は , スト リー ム 方 式 の 転送 で 用 いら れる 入出 力 ス テー トメ わす 式 の 形 を し た 区 字 ス トリ ング で ある 。 デー タ 項 目 を 割り 当て 

ント つい て 解説 する 。 ス トリ ー ム 方 式 転送 と レコ ー ド 方 式 転送 の る 変数 は , デー タ ・ リ スト よっ て 指定 する 。 各 項目 は , カン マ お 

両方 同じ ょ う K 適 用 され る 機能 ( ファ イル , ファ イル の 属性 , フラ ェ び ぴ ノ また は 1 個 以上 の プラ ンク よっ て 区 切る 。 

ァイル の 開閉 を ど ) に つい て は , 第 1 0 章 「 入 力む な よび 出力 」 で 説 

明 し た 。 出力 : 転送 され る デー タ 値 は , 変数 , 定数 , また は デー タ 項 目 を 
表わす 式 (C よ っ て 指定 する 。 ス トリ ー ム MC 入れ られ る 各 デ ー タ 項目 

スト リー ム 方 式 の 転送 で は , デー タ ・ セ キット は , 文字 形式 を し た は , 変数 の 属性 を 反映 し た 文字 スト リン グ 表 現 で ある 。 各 項目 は , 

デー タ 項 目 の 連続 する 流れ (スト リー ム ) と し て 扱わ れ , ブロ グラ 1 個 以 上 の プラ ンク よっ て 区 切る 。 算術 デー タ の 先行 で ぞ ロ は , 抑 

ム の 中 で は , ブロ ッ ク お よび レコ ー ド の 境界 は 無視 され る 。 し か し , 止 さ れる 。 2 進数 項目 は , 1 0 進数 表示 で 表わさ れる 。 

デー タ ・ キ モット は , 一 連 の デー タ の 行か ら を る と 考え られ, スト リ 

ー ム 方 式 転送 C よ っ て 作成 また は アク セス され る デー タ ・ セ ッ ト の PRINT ファ イル の 場合 , 各 デ ー タ 項目 は , その コン パイ ラー 

各々 (C は , 行 サ イズ が 関連 づけ られ て いる 。 通常 , 行 は , デー タ ・ (て よっ て 前 も っ て 決め られ て いる タブ 位置 に , 自動 的 に 合わ せら れ 

セッ ト 内 の レコ ー ド と 同じ で ある が , 行 サ イズ は , レコ ー ド ・ サ イ る 。 と れ ら の 位置 は , 1, 25, 49, 73, 97, 12 1 で ある が , 

ズ と 必ず し ゃ 同じ と し を な く て も よい 。 プロ グラ マー が と れ ら の 値 を 変更 で きる よら な 手段 も 用 意 さ れ て い 
る 。 


スト リー ム 方 式 の 転送 に は , 3 うつ の モー ド - リ スト 指示 , デー タ 
指示 , お よび 編集 指示 - が ある 。 3 つの モー ド の いずれ で 使用 され デー タ 指示 転送 
る 転送 ステ チー トメ ント とも, 次 の 情報 が 必要 で ある 。 
デー タ 指 示 転 送 を 使用 し た 場合 は , ユー ザー は , 自己 定義 の デー タ 
1. デー タ を 取り 出す デー タ ・ セ ッ ト , また は デー タ を 割り 当て を 転送 する と と が で きる 。 
る デー タ ・ セ ッ ト と 結び つけ られ る ファ イル の 名 前 。 
入力 : スト リー ム の 中 の 各 デ ー タ 項目 は , それ が 割り 当て られ る 


2. 入力 中 に デー タ 項 目 が 割り 当て られ た り , 出力 中 に デー タ 項 値 と 変数 の 両方 を 指定 する 割当 て の 形式 を し て いる 。 通常 , 値 は 定 
日 が 得 ら れる , ブロ グラ ム 変 数 の リス ト 。 と の リス ト は , デ 数 の 形 に な っ て いる 。 各 項 目 は , カン マ な お よび また は け は 1 つ 以 上 の 
ー タ ・ リ スト と 呼ば れる 。 リ スト 指示, お よび 編集 指示 モー プラ ンク よっ て 区 切る 。 1 つの GE 和 T ス テー トメ ント 低 よ っ て ア 
ド の 出力 の 場合 は , デー タ ・ リ スト K 式 が 含ま れ て いて も よ クセ ス さ れる 項目 グル シープ の 最後 に セミ コロ ン を つけ な けれ ば な ら 
い 。 を い 。 ス トリ ー ム か ら 取 り 出 され る 項目 の 数 は モミ コロ ン ( て よっ て 
決ま る の で , GET ス テー トメ ント の 中 の デー タ ・ リ スト は 任意 選 
3. 編集 指示 モー ド の 場合 は , スト リー ム の 中 CC ある 各 デ ー タ 項 択 で ある 。 
目 の 形式 。 
出力 : 転送 され る デー タ の 値 は , 任意 選択 の デー タ ・ リ スト に よ ょ 
特定 の 状況 の も と で は , と の 必要 情報 の いく つか は , 暗 志 する と っ て 指定 する と と が で きる 。 ス トリ ー ム の 中 入れ られ る 各 デ ー タ 
と が で きる 。 項目 は , モミ コロ ン を も た な い 割 当て ステ ー ト メン ト の 形式 に する 。 
衝 項 目 は , 1 つ 以 上 の プラ ンク で 区 切る 。 各 々 の PUT ステ ー ト メ 
リス ト 指 示 転 送 ント よっ て 転送 され る 最後 の 項目 の 後に は , セミ コロ ン を つけ る 。 
算術 デー タ の 先行 ロ は , 抑止 され る 。 各々 の 値 の 文字 表現 は , 変 
リス ト 指 示 転 送 の 場合 は, ユー ザー は , スト リー ム 内 (CC お ける 項目 数 の 属性 を 反映 し た も の を る が , 2 進数 項目 の 場合 は 例外 で , 10 
の 形式 を 指定 せ ず C, デー タ を 読込 ん だ り , 書き 出し た りす る と 進数 表示 で 表わさ れ た 値 選 た る 。 
と が で きる 。 
デー タ ・ リ スト が 省略 され て いる と き は , その ステ ー ト メン ト が 
入力 : 通常 , ス トリ ー ム 内 の デー タ 項 目 は , 符号 付 ( 任 意 選 択 ) 含ま れ て いる ブロ ッ ク の 中 で 知ら れ て お り , し か も デー タ 指 示 出 力 
の 有効 を 定数 の 形 を し た 文字 スト リン グ か , また は 複素 数 定数 を 表 の 中 で 許さ れる すべ て の 変数 を 指定 し た も の と み を され る 。 
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PRINT ファ イル の 場合 は , デー タ 項 目 は , その コン バイ ラー 
で 定義 され た タグ プ 位 置 (C 自 動 的 C 合 わせ られ る 。 と これら の 位置 は , 
1。 25、 4 の 7 る 3。 の 7 な よび 121 で ある が か 、 ジ ョ グラ シャー が と 
れ ら の 値 を 変更 で きる ょ うら な 手 段 も 用 意 さ れ て いる 。 


編集 指示 転送 


編集 指示 転送 で は , ユー ザー は , デー タ が 割り 当て られ る 変数 を 指 
定 す る か , また は 転送 され る デー タ を 指定 し , さら 外部 媒体 上 (て 
お ける 各 項 目 の 形式 を 指定 する と と が で きる 。 


入力 : スト リー ム 内 の デー タ は , 連続 する 文字 の スト リン グ で あ 
り , デー タ 項 目 を 別々 分 離す る と と は し な たい 。 デー タ が 割 り 当 て 
られ る 変数 は , デー タ ・ リ スト よっ て 指定 する 。 形式 リス ト の 中 
の 形式 項目 で は , 各 変 数 と 割り 当て られ る 値 が 含ま れ て いる 文字 の 
桁 数 を 指定 し, その デー タ の 性質 (,. た と えば , 仮想 上 の 小数 点 の 位 


穫 な ど ) を 記述 する 。 


出力 : 転送 され る デー タ 値 は . デー タ ・ リ スト よっ て 定義 する 。 
スト リー ム 内 に お ける デー タ の 形式 は , 形式 リス ト (C よ っ て 定義 す 
る 。 


デー タタ 転送 ステ ー ト メン ト 


スト リー ム 方 式 の 転送 で は , 入力 ステ ー ト メン ト と し て は GET だ 
け , 出力 ステ ー ト メン ト と し て は PUT だ け を 使用 する 。 GET ス 
テー トメ ント は , スト リー ム か ら 次 の 一 連 の デー タ 項 目 を 取り出す 
働き を も ち , PUT ス テー トメ ント は , 指定 され た 一 組 の デー タ 項 
目 を スト リー ム 低 入れ る 働き を する 。 デー タ 項 目 が 割 り 当て られ る 
変数 , よび そ と か ら デ ー タ が 転送 され る 変数 ま た は 式 は 通常 , 各 
々 の GE 和 T ま た は PUT ス テー トメ ント の デー タ ・ リ スト の 中 で 指 
定 す る 。 と の ステ ー ト メン ト (て は , デー タ の 出所 また は 行先 を 指定 
する オプ ショ ン , また は 先行 デー タ か ら み て 相対 的 に ストリーム 内 
の ど と と そ の デー タ が ある か を 表示 する オプ ショ ン も 含め る と と が 
で きる 。 


炊 に あげ る の は , スト リー ム 方 素 の デー タタ 転送 ステ ー ト メン ト と 
その オォ オプション の 要約 で ある 。 


STREAM INPUT : 


GET [FILE (ファ ィ イメ 式 ) 1STRING 
( 文字 スト リン グ 変 数 ) 〕 
し デー タ 指 定 」 
に COPYE( ラ ァイル 式 ) 1」 
人 ま に 所 8 


GET ステ ー ト メン ト の STRING オ ォ オプ ション で は , COPY ォ 
プション ゃ も SKIP オブ ショ ン も 使用 する と と は で き な い 点 注 意 
し て いた だ きた い 。 
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STREAM OUTPUT : 


PUT (FILE (ファ イメ 式 ) 」STRING 
( 廊 字 スト リン グ 変 数 ) 〕 
[ デー タ 指 定 〕 
SKIP 〔( 式 )〕]}: 


PUT ス テー トメ ント の 中 で , SKIP オ ォ オプ ショ ン と STRING 
オプ ショ ン を いっ し ょ KC 用 いる と と は で き な い 点 人 注意 し て いた だ 
きた い 。 


STREAM OUTPUT PRINT: 


PUT (FILE (ファ イィ イ ァ 式 ) 〕 
〔 デー タ 指 定 〕 
PAGE(LINE( 式 ) 〕 
SKIP[( 式 )〕 
LINE ( 式 ) 


と の オプ ショ ン は , どの よう な 用 (C 書 いて も よい 。 デー タ 指 定 は , 
炊 の 形式 の いずれ か に する と と が で きる 。 


[LIST〕) (デー タ ・ リ スト ) 
DATA [( デ ー タ ・ リ スト ) 〕 
EDIT {( デ ー タ ・ リ スト ) (形式 リス ト ) }) … 


キー ワー ド LIST, DATA, また は EDIT の いずれ か が 前 に つ 
いて いな い デ ー タ ・ リ スト が , GET ま た は PUT ス テー トメ ント 
(C 含 まれ て いる と き は , LIST と みみ を され る 。 と の よう な ステ ー 
トメ ント の 中 で は , GET ま た は PUT と いう キー ワー ド の すぐ 後 
(C デ ー タ ・ リ スト を 書か を けれ ば な ら な い 。 必要 な オプ ショ ン が あ 
れ ば , デー タ ・ リ スト の 後 で 指定 し な けれ ば な を ならない 。 


制 件 オプ ショ ン ( PAGE, SKIP ま た は LINE ) の いずれ か 
が ある と き ( 人 だけ, データ 指定 を 省略 する と と が で きる 。 形式 リス 
ト は , 以下 の 形式 項目 の いずれ か を 使用 する と と が で きる 。 


A,B,CEF, STREAM フ ァイル また は FTILE オ プシ ョ ン 
P,R, 双 と いっ し レ し ェ 指定 する と と が で きる 。 


SKIP 〔[( ゆ め 〕 と どの よう を STREAM ファ イル の 場合 も 指定 
COLUMN (W ゆ する と と が で きる 。 


PAGE STREAM OUTPUT PRINT フ ァイル 
の 場合 C 使 用 する と と が で きる 。 


と これら の ステ ー ト メン ト 多 つい て は , J 節 「 ス テー トメ ント | の と 
と ろ で , 個々 (C く わし く 説 明 す る 。 


転送 ステ ー ト メン ト の オプ ショ ン 
FILE お よび STRING オ プシ ョ ン 


FILE オプ ショ ン は , それ 区 対 し て 操作 が 行 を われ る ファ イル を 


指定 する る の で ある 。 STRING オ プション を 使用 し た 場合 は , 内 
部 記憶 装置 と 外部 記憶 装置 の 間 で は な く , 内 部 記憶 装置 同志 の 測 で 
デー タ を 転送 する た め ICGET お な よび PUT ス テー トメ ント を 使用 
する と と が で きる 。 GET ス テー トメ ント の 中 (CEFILE オプ ショ 
ン も STRING オプ ショ ン も な いら 場合 に は , 標準 入力 ファ イル 

SYSIN と み を され る 。 PUT ス テー トメ ント の 中 に どちら の オォ 
プシ ョ ン も な いり 場合 は , 標準 出力 ファ イル SYSPRINT と みな さ 
れる 。 


以下 に Cc あげ る ステ ー ト メン ト の いく つか の 中 CC, FILE オ プシ 
ュ ン の 使用 法 の 例 が 出 て いる 。 第 1 3 章 「 編 集 お よび スト リン グ の 
取扱 い | の と と ろ (C, STRING オ プシ ョ ン の 用 法 例 が か あげ て ある 。 


COPY オプション 


COPY ォ オブ プション は , GET FILE ス テー トメ ント の 中 で だ け 
使用 する と と が で きる 。 と の ォ プ ショ ン は , 読ま れ た 通り (と , スト 
リー ム を 指定 の ファ イル 《 書 き 出 す と と を 指定 する も の で ある 。 フ 
ァイル が 指定 され て い を い 場 合 の 省略 時 解釈 は , 標準 出力 ファ イル 
SYSPRINT で ある 。 た と えば , 次 の ステ ー ト メン ト は は 


GET FILE(SYSIN) DATA(A,B,C) COPY(DPL ) : 


入力 スト リー ム の 中 の A, B, CC 割り 当て られ た 値 を これ ら の 名 
前 を も つ 変 数 と 転送 する ば か り で を く , それ ら が 入力 スト リー ム の 
中 C あ っ た 通り の 形 で ファ イル DPL 書き 出す 働き も する 。 とれ 
ら が 省略 時 解 息 エ っ て SYSPRINT ファ イル 書き 出さ れる 
場合 は , デー タ 指 示 形 式 C を る 。 入力 で スキ ッ プ され る デー タ 項 目 
お ぉ よび 内 部 変数 (< 転送 され を い デ ー タ 項目 は , も と の まま で 出力 ス 
トリ ー ム KK 複写 され る 。 


SKIP オ プシ ョ ン 


SKIP オプ ショ ン は , デー タ ・ セ モッ ト の 中 の 新 し の 現在 の 行 ( ま 
た は レコ ー ド ) を 指定 する も る の で ある 。 括弧 内 の 式 は , 整数 wC 変 
換 さ れる 。 デ ー タ ・ セ ッ ト は , 現在 の 行 ( レコ ー ド ) か ら 相 対 的 
みて ww 番 目 の 行 ( レコ ー ド ) の 先頭 (< 位置 づけ され る 。 


PRINT 以外 の ファ イル の 場合 に , 式 が 省略 され て いる か , ま 
た は が ゼロ より 大 きく を いと きけ は, 値 は 1 と みな され る 。P RINT 
ファ イル の 場合 (C, 式 が 省略 され て いる と きけ は , 値 は 1 と みな され 
る 。w が ぞ っ ロ 以 下 の 場 合 は , 現在 と 同じ 行 ヒ と キャ リッ ジ の 戻り が 行 
を われ る 。 


SKIP オプション は , それ が デー タ 指 定 の 後に 書 か れ て いて も , 
デー タ 指 定 C よ っ て 定義 され た 値 が 転送 され る 前 (て , 実行 され る 。 
し た が っ て , 次 の ス テー トメ ント で は , 


、 例 : 


PUT LIST(X,Y,Z) SKIP(3 ぅ ): 


変数 メ , Y, の 値 は , 現在 の 行 より 3 行 後 の 行か ら , 標準 出力 ラ 
ァイル SYSPRINT 上 (印刷 され る 。 


PAGE オ プシ ョ ン 


PAGE オプ ショ ン は , PRINT ファ イル の 場合 に だけ 指定 する 
と と が で きる 。 とれ は , デー タ ・ セ ッ ト の 中 (と , 新しい 現在 ペー ジ 
を 定義 キ する も る の で ある 。 PAGE オプ ショ ン は , それ が デー タ 指 定 
の 後 (C 書 か れ て いて も , デー タ 指 定 ( あれ ば ) に よっ て 定義 され て 
いる 値 が 転送 され る 前 (と 実行 され る 。 


LINE オ プシ ョ ン 


LINE オプ ショ ン は , PRINT ファ イル の 場合 に だ け 指 定 する 
と と が で きる 。 と の オォ オプション は , 次 の 行 が 現在 の ペー ジ の ww 番目 
の 行 (C と を る よら (て, ブラ ンク の 行 を 挿入 する 働き を する (と の ww は , 
整数 変換 され た と き の 括 弧 (C 入 れ た 式 の 値 で ある )。 LINE オ 
プシ ョ ン は , デー タ 指 定 の 後に あっ て も , デー タ 指 定 ' に よっ て 定義 
され た 値 が 転送 され る 前 実行 され る 。 PAGE オプ ショ ン と 
LINE オ ォ オプ ション の 両方 が 同じ ステ ー ト メン ト ( あ る 場合 は , 
PAGE オプ ショ ン が 最初 (と 適用 され る 。 た と えば , 次 の ステ ー ト 
メン ト 


PUT FILE(LIST) DATA(P,Q,R) LINE(34 ) PAGE: 


が 与え を られ る と , 変数 P, Q, R の 値 が , 新しい ペー ジ の 3 4 行 目 
か ら デ ー タ 指示 形式 で 印刷 され る 。 


デー タ 指定 

転送 され る デー タ を 識別 する た め , GBPT お よび PUT ステー ト 
メン ト の 中 で デー タ 指 定 が 与 を られ る 。 デー タ 指 定 は , 転送 の モー 
FC 対応 し て いる 。 

デー タ ・ リ スト 

リス ト 指 示 ぉ よび 編集 指示 の デー タ 指 定 は , 転送 され る デー タ 項 目 


を 指定 する た め の デ ー タ ・ リ スト を 必要 と する 。 デ ー タ 指示 の デー 
タ 指 定 の 場合 は , デー タ ・ リ スト は 任意 選択 で ある 。 
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一 般 形式 : 


ー* 


(デー タ ・ リ スト ) 
と と で , " デー タ ・ リ スト ” は, 次 の よう 定義 され る 。 
要素 〔( , 要 素 〕… 

統語 規則 : 


要素 の 性 質 は , デー タ ・ リ スト が 入力 また は 出力 の どちら KK 使用 
され て いる か に よっ て 異な る 。 その 規則 は 次 の 通り で ある 。 


1 入力 の 場合 , 編集 指示 な よび リス ト 指 示 転 送 の デー タ ・ リ ス 
ト の 雪 素 は , 要素 変数 , 配列 変数 , 構造 変数 , STRING 
以外 の 擬似 変数 , また は と れ ら の 要素 の いずれ か を 含む 繰 返 
し 指定 ( DO グル ー ブ の 繰返し 指定 と 同じ ) の いずれ か に す 
る と と が で きる 。 データ 指示 の デー タ 指 定 の 場合 は , デー タ 
・ リ スト の 要素 は , 要素 , 配列 また は 構造 変数 に する と と が 
で き る 。 デー タ 指 示 の デー タ ・ リ スト の 中 の 名 前 は , 添字 を 
つけ た り , i SUB 定 義 C す る と と は で き ない が , 修飾 され た 

名 前 , 単純 定義 され た 名 前 , また は スト リン グ ・ オ ー バ ベー レ 
ーー 定義 の 名 前 は 許さ れる 。 


2. 出力 の 場合 , 編集 指示 な よび リス ト 指 示 の デー タ 指 定 の デー 
タ ・ リ スト 要素 は , 要素 式 , 配列 式 , 構造 式 , また は と れ ら 
の 要素 の いずれ か を 含む 繰返し 指定 の いずれ か に する と と が 
で きる 。 デー タ 指 示 の デー タ 指 定 の 場合 は , デー タ ・ リ スト 
要素 は , 要素 変数 , 配列 変数 , 構造 変数 , また は と れ ら の 要 
素 の いずれ か を 含む 繰返し 指定 の いずれ か に する と と が で き 
る 。 と れ は , i SUB 定義 C す る と と は で き な い が , 単純 ま 
た は スト リン グ ・ オ ー バ ベー レー 定義 に C す る と と は で きる 。 
デー タ 指 示 出力 の 場合 は , 添字 を つけ て よい 。 


3 デー タ ・ リ スト の 要素 は , 次 の も ゃ の で あっ て よい 。 


入力 : 問題 デー タ : 算術 スト リン グ 
出力 : 問題 デー タ : 算術 スト リン グ 


ブロ グラ ュ 制 件 デ ー タ : 
員 剖 
入口 
事象 
ファ イル 
ラベ ル 
オフ セッ ト 
ボ ポイン ター 
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4. 


プロ グラ ム 制 件 デー タ を 指定 する デー タ ・ リ スト は , PUT 
DATA ステ ー ト メン ト の 中 で だ け 使 用 する と と が で き 。, 変 
数 の 名 前 だ けが 転送 され る 。 


デー タ ・ リ スト は つね し, 括弧 で 囲ま を な けれ ば を な ら な を ない 。 


繰返し 指定 


繰返し 指定 の 一 般 形 式 が , 図 1 1.1 示 し て ある 。 


統語 規則 : 


4. 


繰返し 指定 の 要素 リス ト の 中 の 要素 は , 上 に リス ト し た よら 
, デー タ ・ リ スト 要素 と し て 許さ れる も の で あれ ば , い ず 
れ で あっ て も よい 。 


と の 指定 の 中 の 式 は , DO ステ ー ト メン ト の 中 の 指定 と 同じ 
で あり , 次 の よう KK 記述 され て いる 。 


a. 指定 の 中 の 各々 の 式 は , 要素 式 で ある 。 


b. と の 指定 の 中 で は , 式 ・ 1 は, 制 件 変数 また は 擬似 変数 
の 最初 の 値 を 表わし て いる 。 式 ・3 は , 繰返し 指定 の 中 
で デー タ ・ リ スト 要素 を 繰り 返す た びに その あと で 制 件 
変数 に 加え られ る 増分 を 表わし て いる 。 式 ・2 は , 制御 
変数 の 最終 値 を 表わし て いる 。 式 ・ 4 は , 繰返し の 回 数 
を 制御 する 第 2 の 条件 を 表わし て いる 。 と の 指定 の 正確 
を 意味 は , 同じ 指定 を も つ DO ス テー トメ ント の 意味 と 
同じ で ある 。 最後 の 指定 が 完了 する と , デー タ ・ リ スト 
内 の 次 の 要素 制御 が 疲 さ れる 。 


一 般 形 式 の と と ろ 示 し て ある よう に た , 繰返し の 指定 は 各々 
括弧 で 囲ま を な けれ ば な を なら な い 。 繰返し 指定 が , デー タ ・ リ ス 
ト の 中 の 唯一 の 要素 で ある 場合 は , デー タ ・ リ スト 用 K 1 組 
の 括弧 , 繰返し 指定 用 に も 2 1 組 の 括弧 が 必要 を ので, 外側 
の 括弧 は 2 組 必要 で ある 。 


図 1 1.1C 示 す ょ よら に た , 繰返し 指定 の " 指定 ” の 部 分 は , 次 
の 形式 の ょ うに し て 何 回 も 繰り 返す と と が で きる 。 


DO rj = デ 1 TO 4, 6 TO 10: 


変数 
人 ? へ … DO 
(要素 〔 , 要 素 〕 0 
* 指定 "は , 次 の ょ うな 形式 そし て いる 。 
了 人 RCR 平 こき 
式 - 1 “ 
BY 式 -3〔(TO 式 - 2J〕 


| 三 指定 [指定 〕…) 


| [WHILE ( 式 -4)〕 


図 1 1.1 繰返し 指定 の 一 般 形 式 


繰返し 指定 は , ネス ト す る と と が で きる 。 つま り , 繰返し 指 
定 の 要素 自体 を 繰返し 指定 に し て も よい と いう と と で ある 。 
DO 部 分 は それ ぞ れ , 右側 で 右 括弧 を 用 いて 区 切ら な けれ ば 
を ら な い ( それ KK 対応 する 左 括弧 は , 繰返し 指定 全体 の 始め 
加え る )。 


DO 部 分 が ネス ト さ れ て いる と き は , ネス ティ ング の 外側 の 
レベ ル あ る の は , 右端 の DO で ある 。 た と えば げ ば , 次 の ステ 
ー ト メン ト つ いて 考え を て みよ う 。 


GET LIST (((A(I,J) DO = テ 1 TO 2) 


DO J テ 3 TO 4)): 


丘 字 を 区 切る の 用 いら れ て いる 1 組 の 括弧 の 往 か に , 3 組 
の 括弧 が ある と と 注意 し て いた だ きた い 。 1 番外 側 の 1 組 
は , デー タ ・ リ スト 必要 を も の で ある 。 次 の 1 組 は , 外側 
の 繰 返 し 指定 C 必 要 を も の で ある 。 3 番目 の 括弧 は , 内 側 の 
繰返し 指定 必要 な も の で ある 。 と の ステ ー ト メン ト は , 次 
の よう な を ネスト され た DO 一 グル シー ブ と 同じ で ある 。 


DO J テ 3 TO 4: 


DO [= 1 TO 2: 
GET LIST (A (1,J)): 
END: 

EERND: 


こと これ は , 配列 A の 要素 (次 の ょ うな 順序 で 値 を 与え を る も る の で 
ある 。 


A(1.3),A(2> う ), A(1.4), A(2,4 ) 


ネス ティ ング で 許さ れる 最大 の レベ ル は , 5 0 で ある 。 


DO キー ワー ド は , 繰 返 し 指定 の 中 で 使用 する と と が で きる 
, 対応 する END ス テー トメ ント は , 使用 で き な い 。 


デー タ ・ リ スト 要素 の 転送 


デー タ ・ リ スト 要素 が 複素 数 モー ド の も の で ある 場合 は , 実数 部 分 
が , 虚数 部 分 の 前 < 転送 され る 。 


デー タ ・ リ スト 要素 が 配列 変数 の 場合 は , 配列 内 の 各 要 素 は , 行 


を 主 と した 順序 で - つま り , 配列 の 右端 の 添字 が 最も 頻繁 と 変わ る 
形 で - 転 送 さ れる 。 


デー タ ・ リ スト 要素 が 構造 変数 の 場合 は , 構造 内 の 各 要 素 は , 構 
造 の 宣言 の 中 で 指定 され た 順 転 送 さ れる 。 た と えば , 宣言 が 次 の 
よう な も の で ある と すれ ば げ , 

DECLARE 1 A (10), 2 B, 2 C: 
次 の ステ ー ト メン ト は, 
PUT FILE( 双 ) LIST(A): 


學 の よう を 順序 で 出力 され る と と な る 。 


A・B(1) A・C(1) A.B(2) A.C(2) A.B(3) 
A。CC3) 


し か し , 宣言 が 次 の よう な も の で あっ た と すれ ば , 


DECLARE 1 A,2 B(10),2 C(10): 


同じ PUT ス テー トメ ント を 与え て も る, 次 の よう な 順序 で 出力 され 
る と と し て な る 。 


A・B(1) A.B(2) A.B(3)…A.B(10) 
A・C(1) A.C(2) A.C(3)…A.CC(10) 


リス ト 指 示 ま た は 編集 指示 転送 の 入力 ステ ー ト メン ト で 用 いら れ 
る デー タ ・ リ スト の 中 で , 変数 'C 値 が 割り 当て られ る と き は , デー 
タ ・ リ スト の 中 で の ち K 参 照 が 行なわ れ た と きこ と の 変 数 が あれ ば げ , 
と の 新しい 値 が 用 いら れる 。 た と えば げ , 


GET LIST (N,(X(1) DO エー1 TO N), J, KK, 
SUBSTR (NAME, J, 人 KK) ) : 


と の ステ ー ト メン ト が 実行 され る と , デー タ は , 次 の よら な 順序 で 
転送 され , 割り 当て られ る 。 


1. 新しい 値 が NIC 割 り 当 て られ る 。 
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2. 繰返し 指定 の 中 で 指定 され て いる よう MCX(1), (2), 
…X(N) の 順序 で , 要素 が 配列 割り 当て られ る 。 と の 
と き , 割り 当て られ る 項目 の 数 を 指定 する た め に , 新しい N 
の 値 が 用 いら れる 。 


3 新しい 値 が JC 割り 当 で られ る 。 
4. 新しい 値 が K 割 り 当 て られ る 。 


5. 長 さ 氏 の サ プ ス トリ ング が , スト リン グ 変 数 NAME KJ 
番 日 の 桁 か ら 割 り 当 て られ る 。 


リス ト 指 示 の デー タ 指 定 


リス ト 指 示 の デー タ 指 定 の 一 般 形式 は , 入力 の と きゃ 出力 の と きゃ も , 
次 の 通り で ある 。 


[LIST〕) (デー タ ・ リ スト ) 


デー タ ・ リ スト は け は, 前 記 の |「 デ ー タ ・ リ スト | の と と ろ で 述べ た も 
の と 同じ で ある 。 し か し , デー タ ・ リ スト が GET ま た は PUT キ 
ー ワ ー ド の すぐ 後 C あ る 場合 だ け は , 省略 時 解 生 に よっ て 想定 する 
と と が で きる 。 


次 に あげ る の は , リス ト 指 示 の デー タ 指 定 の 例 で ある 。 


LIST (CARD, RATE, DYNAMIC_FLOW ) 
LIST ((THICKNESS(DISTANCE ) 

DO DISTANCE = 1 TO 1000)) 
LIST (P, 2, M, R) 
LIST (A*B ン C, (X+Y)**2 ) 


最後 の 例 の 指定 は , 式 に よっ て 指定 され た 値 を も っ て いる の で , 出 
力 の 場合 C だ け 使 用 する と と が で きる 。 と の よう な 式 は , ステ ー ト 
メン ト が 実行 され て , 結果 が スト リー ム 入 れ ら れる と き MC 評 価 さ 
れる 。 


スト リー ム の 中 の リス ト 指 示 デ ー タ 


スト リー ム の 中 に ある 問題 デー タ は , 入力 の 場合 も 出力 の 場合 も, 
文字 デー タ ・ タ イプ で あり , 次 の よう な 一 般 形 式 の いずれ か を と る 。 


に 8 算術 定数 
文字 スト リン グ 定 数 
ビッ ト ・ ス トリ ング 定数 
[キオ 1-〕 実数 定数 { 十 1 - } 虚数 定数 


スト リン グ 定 数 は , 上 に リス ト し た 2 つの 形式 の どちら か で な けれ 
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ば たら ず , 反復 と スト リン グ 繰 返 し 因数 は 使用 で き を い 。 実数 定数 
の 前 'IC あ る 符号 の あと に プラ ンク を つけ て は を ら な を ないし, ま た, 複 
素数 式 の 中 央 (に ある 十 ま た は - の 前 後に プラ ンク が あっ て は な ら な 
の い 。 


リス ト 指 示 の 入力 形式 


指名 され た デー タ が 配列 の と き は , デー タ は 定数 に より 構成 され , 
その 最初 の 定数 は 配列 の 最初 の 要素 に , 2 番目 の 定数 は 2 番目 の 要 
素 に CK, と いう ょ よう, 行 を 主 と し た 順序 で 割 り 当 て られ る 。 


デー タ ・ リ スト の 中 の 構造 名 は , その 中 含ま れる 要素 変数 と 配 
列 の リュ ト (構造 の 記述 の 中 で 指定 され た 順序 で 並べ られ て いる ) 
を 表わし て いる 。 


入力 の 場合 , スト リー ょ ム の 中 の デー タ 項 目 は , プラ ンク か カン マ 
で 区 切ら を けれ ば な ら な い 。 と の 区 切り の 前 後に は , 任意 の 数 の プ 
ラン ク が あっ て よい 。 スト リー ょ ム 内 の ナル ・ フ ィ ー ル ド は , デー タ ・ 
スト リー ム の 中 て ある 最初 の 非 プ ラン タク 文 字 ( カン マ ) か , また は 
竜 の 個数 の プラ ンク で 区 切ら れ た 2 つの カンマ, の どちら か 人 よ 
っ て 表示 され る 。 ナ ル ・ フ ィ ー ル ド は , デー タ ・ リ スト の 中 の 関連 
する 項目 の 値 を 変え ず (C お なお く と と を 指定 する も の で ある 。 


入力 と C な ける , 定数 の リス ト の 転送 は , リス ト が を く な っ た と き 。, 
また は ファ イル の 終り な っ た と き MC 終 了 す る 。 前 者 の 場合 , ファ 
イル は 次 の GET ステ ー ト メン ト が 実行 で きる 位置 し, ストリーム 
の 中 で 位置 づけ され て いる 。 2 つ 以 上 の プラ ンク を あけ て 2 つの デ 
ー タ 項目 を 区 切る と と が で きる し , また , 1 つの カン マ < 区切 記号 の 
前 また は 後 C 1 つ 以 上 の プラ ンク を お く と と も で きる 。 


各 項 目 が カン マ で 区 切ら れ て いる と きけ は , 次 の GET ス テー トメ 
ント が 実行 され る と き ( 走 査 さ れる 最初 の 文字 は , カン マ の すぐ 人 後 
ある も の に な る 。 各 項 目 が プラ ンク だ け で 区 切ら れ て いる と きけ , 
走査 され る 最初 の 項目 は , 次 の 非 プ デラ ンク 文字 に を る 。 下 の 例 の 中 
で , 又は 非 プ ラン ク 文 字 , b は プラ ンク を 表わし , 1 は 次 の GET 
ステ ー ト メン ト が 開始 され る と き の フ ァイル の 位置 を が し て いる 。 


Xbb,bbbXX 双 
{ 
XbbbbXXX 双 
1 
Xb , ] 一 レコ ー ド の 終り 
MI 


レコ ー ド が カン マ で 終っ て いる と き は , 次 の GET ス テー トメ ント 


で 必要 (C な を る ま で , 後続 の レコ ー ド は 読み 込ま れ を いと と 注意 し 
て いた だ きた い 。 


デー タ が 文字 スト リン グ 定 数 の 場合 は , 前 後 の 引 用 符号 は 除去 さ 
れ , その 中 て あっ た 文字 が 文字 スト リン グ と し て 解釈 され る 。 


デー タ が ビッ ト ・ ス トリ ング 定数 の 場合 は , 前 後 の 引用 符号 と 後 
に つけ られ た 文字 B が 除去 され , その 中 に あっ た 文字 が ビッ ト ・ ス 
トリ ング と し て 解 選 さ れる 。 


デー タ が 算術 定数 ま た は 複素 数 式 の 場合 は , 定数 (よっ て 暗示 さ 
れる 基数 , スネ スケー ル , モー トド? ち ぉ よび 精度 を も つ コ ー ド 化 算 術 デ ー 
タタ と し て 解釈 され る 。 


リス ト 指 示 の 出力 形式 


デー タ ・ リ スト の 中 の 要素 変数 と 式 の 値 は , 文字 表現 変換 され , 
デー タ ・ ス トリ ー ム KK 転送 され る 。 


転送 され る , 連続 し た デー タ 項 目 は , プラ ンク で 区 切る 。 
(PRINT フ ァイル の 場合 は , 各 項 目 は , プロ グラ ム の タプ の セッ 
ト 位 置 C 上 し た が っ て 区 切ら れる 。 ) 


スト リー ム の 中 入れ られ る デー タ ・ フ ィ ー ル ド の 長 さ は , デー 
タ 項 目 の 属 性 (精度 な よび 長 さ を 含め て ) に よっ て 決ま る 。 変換 の 
規則 と , 精度 に 及 全 す 影響 CK つい て は , F 節 「 デ ー タ の 変換 と 式 の 
値 の 計算 | の 中 の , 文字 タイ プ へ の 変換 の と と ろ に リス ト さ れ て い 
る 。 


2 進数 デー タ 項 目 は , スト リー ム 入 れ ら れる 前 人 1 0 進数 表現 
変換 され る 。 


数 字 の 値 の 場合 は , 文字 スト リン グ の 値 が 転送 され る 。 


ビッ ト ・ ス トリ ング は , ビッ ト ・ ス トリ ング 定数 (文字 0 と 1 か 
ら な り , 引用 符 で 囲み , さら KK その後 文字 B を つけ た も の ) の 文 
字 表 現 変換 され る 。 


文字 スト リン グ は , 次 の よう KK 書き 出さ れる 。 フ ァイル が PRTNT 
属性 を も ね っ て い を いと き は け は , 前 後 'C 引 用 符 が 補 わ れ , その 中 に あ 
る 単 一 引用 符 ま た は アポ ス ド トロフィー は , 2 つの 引用 符 で 置き 換え 
られ る 。 フィ ー ル ド の 幅 は , スト リン グ の 現在 の 長 さと , 追加 され 
た 引用 符 の 数 を 加え た も の て に な る 。 フ ァイル が PRINT 属性 を も 
っ て いる と き は , 前 後 の 引 用 符 は 補 を われ ず , その 中 に ある 単 一 
引用 符 も 修正 され を い 。 フィ ー ル ド の 幅 は , スト リン グ の 現在 の 長 
さ ざ に な る 。 


デー タ 指 示 の デー タ 表 示 


デー タ 指 示 の デー タ 指 定 の 一 般 形 式 は , 入力 の 場合 も 出力 の 場合 も, 
次 の 通り で ある 。 


DATA( (デー タ ・ リ スト ) 〕 
一 般 的 を 規則 : 


1 デー タ ・ リ スト つい て は , と の 章 の 「 デ ー タ ・ リ スト | の 
と と ろ で 説明 し た 通り で ある 。 入力 の 場合 は , デー タ ・ リ ス 
ト 添字 付 の 名 前 を 含め る と と は で き な を い 。 デ ー タ ・ リ スト 
の 中 の 構造 要素 の 名 前 は , 不明 確 C な ら な を ない 程度 と 修飾 する 
だ け で よく , 完全 と 修飾 する 必要 は を い 。 入力 の 場合 , 認識 
不可 能 を 要素 変数 ,) また は デー タ ・ リ スト の 中 KK 相手 を も た 
を いら 名 前 が スト リー ム K 含 まれ て いる と きけ は , NAME 条件 
が 起 と る 。 


2. デー タ ・ リ スト を 省略 する と と は , デー タ ・ リ スト が ある と 
想定 され る と と を 意味 し て いる 。 想定 され た と の デー タ ・ リ 
スト KC は, その ブロック また は その 外側 の ブロ ッ ク K 知 られ 
て いる すべ て の 名 前 , お よび デー タ 指 示 転送 (C 有 効 を な すべ て 
の 名 前 が 含ま れ て いる 。 


入力 の 場合 に , 認識 不可 能 を 要素 変数 また は ブロ ッ ク の 中 で 
知ら れ て いな いら 名 前 が スト リー ム K 含 まれ て いる と き は , 
NAME 条 件 が 起 と る 。 ス トリ ー ム の 中 含ま れ て いな を い 名 
前 が , 想定 され ん た デー タ ・ リ スト 含ま れ て いる 場合 は , 関 
連 す る 変数 の 値 は その まま 変 ち を い 。 


出力 の 場合 は , 想定 され た デー タ ・ リ スト の 中 の すべ て の 項 
目 が 転送 され る 。 


3 入力 スト リー ム の 中 で セミ コロ ン ま た は ファ イル の 終り が 認 
識 さ れる と , デー タ ・ リ スト が 指定 され て いる か どう か は 
関係 な く , 転送 は 終了 する 。 出力 の 場合 は , 各々 の PUT ス 
テー トメ ント に よっ て 最後 の デー タ 項 目 が 転送 され た あと , 
セミ コロ ン が スト リー ム K 書 き 出 され る 。 


スト リー ム の 中 の デー タ 指 示 デ ー タ 
デー タ 指 示 転 送 と 結び つけ られ た スト リー ム の 中 の デー タ は , 要素 
争 当 て の リス ト の 形式 CC を た っ て いる 。 問題 デー タ の 場合 は , 次 の 


2 な 一 般 形 式 を し て いる (任意 選択 の 符号 を つけ た 定数 も , 変数 名 
と 等 与 と 同様 , 文字 形式 する )。 
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要素 変数 三 デー タ 値 


[ { b 1 , } 要素 変数 
デー タ 値 〕 ee な se 例 
問題 デー タ の 一 般 的 を 規則 は , 次 の 通り で ある 。 了 1 12 示さ れ て いる 例 の 中 で は , A は , 6 個 の 要素 を も つ 1 次 
元 の 配列 と し て 宣言 され て な ぶり, B は , 7 個 の 要素 を も つ 1 次元 の 
1. 要素 変数 は , 丘 字 付 の 名 前 で も あっ て も よい 。 疾 字 は , 任意 選 配列 で ある 。 と の ブロ シー ジャ ー は , 次 の 式 の 計算 を し て , 値 を 書 
択 で 待 号 を つけ た 1 0 進数 の 整定 数 で を けれ ば な ら な い 。 き 出 す た め の も の で ある 。 
6 
2. 入力 の 場合 , 要素 割当 て は , 1 個 の プラ ンク (上記 の 形式 で A(1) 三 B(1i 十 1) 孝 B(1): 
は b ) ま た は カン マ に よっ て 区 切る と と が で きる 。 余分 の プ 
ラン ク は は 無視 され る 。 出力 の 場合 , 割当 て は 1 個 の プラ ンク デー タ 指 示 の デー タ 指 定 ( 入力 の 場合 ) 


IC よ っ て 区 切ら れる 。 ( PRINT ファ イル の 場合 , 各 項 目 
は , ブロ グラ ム の タプ ・ セ ッ ト 位 置 に し た が っ て 区 切ら れる 。 ) デー タ 指 示 入 力 の 一 般 的 を 規則 


3 スト リー ム の 中 の 各々 の デー タ 値 は , リス ト 指 示 転 送 の と と 1. デー タ 指 定 C に デー タ ・ リ スト が 含ま れ て い を いと き は , スト 
ろ で 述べ た 形式 の いずれ か の 形 を し て いる 。 リー ム の 中 の 名 前 は , 転送 の 時 点 で 知ら れん て いる も の で あれ 
ば , どの よら な 名 前 で あっ て も よい 。 入力 スト リー ム の 中 
4. 入力 の 場合 は , 要素 割当 て の 後に セミ コロ ン が ある と , 1 つ あぁ る 修飾 され た 名 前 は , 完全 修飾 され た も の で な けれ ば な 
の GET DATA ス テー トメ ント を 実行 する と と て よっ て 転 ら な い 。 と の 名 前 は , 2 5 6 桁 を 越 を て は な を ならない 。 
送 さ れる 要素 割当 て の リス ト が 終了 する の で , 特定 の ステ ー 
トメ ント 低 よ っ て 実際 IC 転 送 さ れる 要素 割 当 て の 数 は , と れ 2. デー タ ・ リ スト が 使用 され て いる と き は , デー タ ・ リ スト の 
(て ょ よっ て 決ま る 。 出力 の 場合 は , PUT DATA ス テー トメ 各 要 素 は , 要素 変数 , 配列 変数 , また は 構造 変数 で を けれ ば 
ント が 完了 する と , も ミコ ロン が 転送 され る 。 な を なら な い 。 デー タ ・ リ スト の 中 で , 名 前 (添字 を つけ る と と 
は で き な い が , 修飾 され た 名 前 を 使用 する と と は で きる 。 ス 
5、 ロケ グー ター 修飾 子 が , スト リー ム の 中 て あっ て は ならない 。 トリ ー ム の 中 に ある すべ て の 名 前 は , デー タ ・ リ スト 上 も 
基底 付 変数 と いっ し ょ 宣言 され た ロケ ー タ ー 修 委 を 子 は , 世 を けれ ば を ら な い が , 名 前 の 順序 は 同じ で ある 必要 は を いし , 
代 を 設定 する た め C 用 いら れる 。 ロ ケー ター 修飾 子 が 宣言 また , スト リー ム の 中 な い の 名 前 が デー タ ・ リ スト 含ま れ 
れ な か っ た 基底 付 変数 は , 転送 する と と が で き な い 。 て いて も よい 。 た と えば , 次 の デー タ ・ リ スト ( A, B, C, 


D は 要素 変数 の 名 前 ) に つい て 考え て 信 よ う 。 
デー タ ・ リ スト の 中 て ある 基底 付 変数 に は , 次 の よう な 制約 が 適 


用 され る 。 DATA ( B, A, C, D) 
a、 と の 変数 は , オフ セッ ト 変 数 を 基底 と する も る の で あっ て は な と の デー タ ・ リ スト は , 次 の よう な 入力 デー タ ・ ス トリ ー ム 
ら な い 。 と 結び つけ る と と が で きる 。 
b。 と の 変数 は , REFRER オプ ショ ン を つけ て 宣言 され た 構造 A=2.5, B 一 .0047, PD-125, 2 グ !「ABC「: 


の メン バー で あっ て は な ら な い 。 


注 : C は , デー タ ・ リ スト の 中 に ある が , スト リー ム の 中 
c. と の 変数 の 基底 と を # っ て いる ポイ ンタ ー は , 基底 付 で あっ た に は な い 。 し た が っ て , その 値 は , その まま 変更 され 
り , 定義 きれ た も の で あっ た り , パラ メー ター で あっ て は な を い 。 乙 は , デー タ ・ リ スト の 中 に を な い の で , NAME 

ら ず , また , 配列 また は 構造 の メン バー で あっ て は な ら な を い 。 条件 を 引き 起す 。 
デー タ ・ リ スト の 中 て ある , 定 羨 さ れ た 変数 は , 次 の よう て し て 3 デー タ ・ リ スト KK 配列 の 名 前 が 含ま れ て いる と き は , デー タ 
定義 され た も の で あっ て は な を なら な い 。 ・ リ スト の 中 添字 付 の 名 前 を 入れ る こと は で き な い が , ス 
トリ ー ム の 中 は , その 配列 対す る 添字 付 の 参照 が か あっ て 
a. 制御 変数 の 上 も よい 。 配列 全体 が スト リー ム の 中 (て ある 必要 は を く , スト 
リー ム の 中 実際 に ある 要素 だ けが 割り 当て られ る 。 添字 が 
b. 1 つま た は 2 つ 以 上 の 調整 可能 を 限界 を も つ 配 列 の 上 と 範囲 外 に あっ た り , 添字 が な いと きけ は, NAME 条件 が 起 と 

る 。 


c. 定数 以外 の も の を 指定 する , POSITION 属 性 と いっ し ょ (, 
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PROCEDURE: 


DECLARE (A(6), B(/)) FIXED: 
GET FILE (X) DATA (B): 


DO 1 TO 6: 

A (TI) 三 B (1 十 1) 士 B (1): 
END: 

PUT FILE (Y) DATA (A):: 
END AB: 


図 1 1.2 


又は , 次 の よう 宣言 され た 2 次 元 の 配列 の 名 前 で ある と し 
よ の っ 


DECLARE 双 (2,3): 


次 の よう な デー タ ・ リ スト と 入力 デー タ ・ ス トリ ー ム つい 
て 考え て みよ うら 。 


デー タ ・ リ スト 


DATA ( 叉 ) 


入力 デー タ ・ ス トリ ー ム 
X(1,1) 三 7.95, 


X(1,2)ー 8085, 
X(1,3)= 73: 


デー タ ・ リ スト は , 配列 の 名 前 し か も ゃ っ て い を い が , 関連 す 
る 入力 スト リー ム に と は, 配列 の 個々 の 要素 の 値 が 含ま れ て い 
て も よい 。 と の 場合 は , 3 つの 要素 だ けが 割り 当て られ る 。 
配列 の 残り の 部 分 は , 変 ち を い 。 


デー タ ・ リ スト 構造 要 素 の 名 前 が 含ま れ て いる 場合 は , デ 
ー タ ・ リ スト の 中 で は 完全 た 修飾 は 不要 で ある が , スト リー 
ム の 中 低 出 て くる 名 前 は , 完全 (修飾 され た 名 前 で を けれ ば 
な ら た を な い 。 人 次 の 構造 に つい て 考え て みよ う 。 


DECLARE 1 CARDIN, 2 PARTNO, 2 DESCRP, 
2 PRICE, 3 RETAIL, 3 WHSL, 


1 CARDOUT, 2 PARTNO, 2 DESCRP, 


2 PRICE, 3 RETAIL, 3 WHSL: 


CARDIN.PRICE.RETAIL の 値 を 読み た い 場 合 は , 
・ デー タ 指 定 と 入力 デー タ ・ ス トリ ー ム は , 次 の よう な 形式 
する と と が で きる 。 


デー タ 指 定 入力 デー タ ・ ス トリ ー ム 


DATA (CARDIN.RETAIL ) CARDIN.PRICE. 
RETAIL 4.28: 


スト リー ム の 中 に ある 修飾 され た 名 前 の 中 C, 交錯 し て 丘 字 
を つけ る と と は で き を いら 。 丘 字 は すべ て , 修飾 され た 名 前 の 


入力 スト リー ム 


B(1) テ 1, B(2) 三 2 B(3 ぅ 3) テ 3, 
B(4) テ 1, B(5) テ 2, B(6) テ 3 ぅ 3, B(7Z)= テ 4: 


出力 スト リー ム 
AA( 半 )ー29、 し (みう) 学 お AI(S す = テ 4 
衝 ,(《( ち りう 邦 りす る うー アッ ぅ 


A( 4 ) テ 3 


デー タ 指 示 転 送 の 例 ( 入 力 と 出力 ) 


最後 の 名 前 の 後に くる よら K, 右側 C 移 さ を け れ ば な ら な い 。 
た と えば , Y が 次 の よう 人 宣 斉 され て いる と し ょ よう 。 


DECLARE 1 Y(5,5)2 A(10), 3 B,3 C,3 D: 


要素 名 は , スト リー ム の 中 で , 次 の よ 上 うな も の で を けれ ば な 
ら な い 。 


Y.A.B(2,3,8)== 8.72 


デー タ ・ リ スト の 中 の 名 前 C, 丘 字 を 含め る と と は で き な い 。 


デー タ 指 示 の デー タ 指 定 ( 出力 の 場合 ) 


デー タ 指 示 の 出力 の 一 般 規 則 は , 次 の 通り で ある 。 


1 


デー タ ・ リ スト の 要素 は , 要素 変数 , 配列 変数 , ま た は 構造 
変数 の いずれ で あっ て も よい し , ある い は , と れ ら の 要素 の 
いずれ か を 含む 繰 返 し 指定 , また は さら KK 別 の 繰返し 指定 を 
含む 繰返し 指定 で あっ て も よい 。 括 字 付 の 名 前 が あっ て も よ エ 
い 。 問題 デー タ の 場合 は , デー タ ・ リ スト の 中 て ある 名 前 と 
その 値 と が , 要素 割付 け の リス ト の 形式 ( プラ ンク で 区 切ら 
れ , セミ コロ ン で 終る ) で 転送 さん れる 。 ブ ログ ラム 制御 デー 
タ の 場合 は , 名 前 だ けが 転送 され る 。 ( PRINT ファ イル 
の 場合 は , 各 項 目 は , ブロ グラ ム の タプ ・ セ ッ ト 位 置 に し た 
が っ て 区 切ら れる 。 ) 


デー タ ・ リ スト の 中 ある 配列 変数 は , その 中 含ま れる 疾 
字 付 の 要素 が 行 を 主 と し た 順序 で 並べ さら れ た リス ト と し て 扱 
われ る 。 次 の よら 宣言 され た 配列 に つい て 考え て みょう 5。 


DECLARE XX (2,4 ) FIXED: 


文 が デー タ ・ リ スト の 中 で 次 の よう ら を も る の で ある と すれ ば ぱぴ, 
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DATA ( 又 ) 


出力 され る と , 出力 デー タ ・ ス トリ ー ム は 次 の よう を な 形式 


を る 。 
XC で 09 二 7 共 C す も の 0 こみ 区 (0 92) こう 3 
(1,4)= 4 双 (2,1)= 5 (2,2)= 6 
文 (2.3) 三 7 文 (2 4)ー 8 : 
注 : 実際 の 出力 の 中 で は , 2 つ 以 上 の プラ ンク が 等 号 の 後 
(と 出さ れる 。 ュ コー ド 化 算術 形式 か ら 文 字 に 変換 され る と き , 
先行 ゼロ は ブラ ンク 人 《 変 換 され , 最高 3 個 の プラ ンク が フィ 
ー ル ド の 先頭 (C 出 て くる と と が ある 。 


デー タ ・ リ スト の 中 (て ある 大 字 式 が 評価 され , その 仁 に よっ 
て 式 が 置き 換え られ る 。 


デー タ ・ リ スト の 中 ある 構造 の 部 分 で ある 項目 は , 完全 を 
修飾 を つけ て 転送 され る が , 添字 は , 交錯 させ ず , 修飾 さ 
れ た 名 前 の 後に つけ る 。 た と え を えば, デー タ 指 示 出 力 の も ゃ と で 
転送 され る 構造 の 要素 に 対し て , デー タ ・ リ スト が か 次 の よう 
指定 され て いた と すれ ば げ , 

DATA (Y(1,- ぅ う ).@) 


出力 スト リー ム の 中 の 関連 する デー タ ・ フ ィ ー ル ド は , 次 の 
よう みな 形式 に なる 。 


YOC ーー 2 4 の 846 
デー タ ・ リ スト の 中 の 構造 名 は , その 中 含ま れる いく つか 
の 要素 の リス ト と し て 解釈 され , その 中 含ま れる 配列 は , 
上 記 の よう を 扱わ れる 。 
た と えば , 次 の 構造 に つい て 考 ん えて みよ う 。 

1 A, 2 B 2 C, 3 ぅ 3 D 
デー タ 指 示 出 力 の デー タ ・ リ スト が 次 の よう な も の で あり , 


DATA (A) 


B と D の 値 が それ ぞ れ 2 と 17 で ある と すれ ば , 出力 スト ザ 『 
ー ム の 中 の 関連 する デー タ ・ フ ィ ー ル ド は , 次 の よら (て を る 。 


A.B 2 A.C.D デ 17j: 


傘 の よら な 場合 の デー タ 指 示 出 力 は , あと で デー タ 指 示 入 力 
と 用 いて る 無効 で ある 。 
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a。 数 字 変 数 の 文字 スト リン グ 値 が , 正しい 算術 定数 ( 符 
号 は 任意 選択 ) を 表わし て いな いと き 。 た と えば , 複素 
数 の 数 字 変 数 の 場合 に C, この よう を と と が いえ る 。 


b. ブロ グラ ュ 制 御 デ ー タ が 転送 され た と き 。 
デー タ 指 示 の 出力 フィ ー ル ド の 長 さ 


外部 媒体 上 C な ける デー タ ・ フ ィ ー ル ド の 長 さ は , その 変数 と 対し 
て 宣言 され た 本 性 と , 完全 修飾 し , 秦 字 を つけ た 名 前 の 長 さ ( 名 
前 も 含ま れる の で ある か ら ) と に ょ っ て 決ま る 。 コ ー ド 化 算 術 デ 
ー タ , 数 字 デ ー タ , お よび ビッ ト ・ ス トリ ング ・ デ ー タ か ら 変 換 さ 
れる 出力 項目 の フィ ー ル ド の 長 さ は , リス ト 指 示 の 出力 デー タ の 場 
合 と 同じ で あり , 文字 タイ プ へ の デー タ 変 換 の 規則 に よっ て 決め ら 
れる 。 と の 規則 に つい て は , F 節 「 デ ー タ の 変換 と 式 の 値 の 計算 」 
の と と ろ で 述べ る 。 


用 符 で 囲ん で 書き 出さ れる 。 文字 スト リン グ の 中 (て 含ま れる 引用 符 
は それ ぞ れ , 連続 する 2 つの 引用 符 (C ょ っ て 表わさ れる 。 


編集 指示 の デー タ 指定 


編集 指 志 が の デー タ 指 定 の 一 般 形 式 は , 入力 の 場合 も 出力 の 場合 も , 

炊 の 通り で ある 。 
EDIT {[( デ ー タ ・ リ スト ) (形式 リス ュ ト ) } … 

1. デー タ ・ リ スト は , 上 記 の 「 デ ー タ ・ リ スト | の 項 で 述べ た 
通り で あり , 括弧 で 囲ま を けれ ば な ら な い 。 形式 リス ト K は , 
1 つま た は 2 つ 以 上 の 形式 項目 を 入れ る が , と れ も 括 弧 で 囲 
まな けれ ば な ら な い 。 形式 項目 に は , 次 に 上 の べ る よう 3 うつ 
の タイ ブ が ある 。 ス トリ ー ム 内 の デー タ を 記述 する デー タ 形 
式 項目 , ペー ジ , 行 , お よび スペ ー ス の 操作 を 記述 する 制御 
形式 項目 , な よび 使用 する 形式 リス ト を 含む 別個 の ステ ー ト 
メン ト の ラベ ん ル を 指定 する 遠隔 形式 項目 の ぅ うつ の タイ プ で あ 
る 。 形式 リス ト と 形式 項目 C に つい て は , と の あと の 「 形 式 リ り 
スト | の 項 で 詳し く 述 べ る 。 


2. 入力 の 場合 は , スト リー ム 内 の デー タ は , 連続 する 文字 の ス 
トリ ング と 考え られ , 個々 の デー タ 項 目 C わ け て は 考え られ 
を い 。 各 デー タ 項 目 の 文 字 の 桁 数 は , 形式 リス ト の 中 の 形式 


項目 C よ っ て 指定 され る 。 文字 は , 関連 する 形式 項目 に し た 
が っ て 処理 され る 。 


3 出力 の 場合 , デー タ ・ リ スト の 中 の 各 項 目 の 値 は , 関連 する 
形式 項目 に よっ て 指定 され た 形式 変換 され , スト リー ム の 
中 の 1 つの フィ ー ル ド ( その 幅 も , 形式 項目 に よっ て 指定 さ 
れ て いる ) と 入れ られ る 。 


4. 入力 の 場合 も , 出力 の 場合 も , 最初 の デー タ 形 式 項目 は デー 
タ ・ リ スト の 中 の 最初 の 項目 と 結び つけ られ , 2 番目 の デー 
タ 形 式 項目 は デー タ ・ リ スト の 中 の 2 番目 の 項目 と , …… と 
いら よら 人 結び つけ られ る 。 形式 リス ト を 含ま れる 形式 項目 
の 数 が , 関連 する デー タ ・ リ スト の 中 の 項目 の 数 より 少 を ない 
と き は け は , 形式 リス ト が 再 使用 され る が , 形式 項目 の 方 が 多い 
と きけ は , 無視 され る 。 た と えば げ , 形式 リス ト (C は 5 個 の デー タ 
形式 項目 が 含ま れ て ぉ なり , 関連 する デー タ ・ リ スト で は 10 
個 の 項目 を 転送 する よう 指定 され て いる 場合 を 考え て みよ 5。 
と の よう りな 場合 は , デー タ ・ リ スト の 中 の 6 番目 の 項目 が , 
最初 の デー タ 形 式 項目 と 結び つけ られ る , …… と いう 形 な 
る 。 次 , 形式 リス ト K1 0 個 の デー タ 形 式 項目 が 含ま れ て 
ぶり, その 関連 する デー タ ・ リ スト が 項目 を 5 個 し か 指定 し 
て いない 場合 を 考え て みょう 。 と の 場合 は , 6 番目 か ら 10 
番目 まで の 形式 項目 は 無視 され る 。 


5. デー タ ・ リ スト の 中 ある 配列 変数 また は 構造 変数 は , デー 
タ ・ リ スト の 中 の n 個 の 項目 て 相当 する ( n は , 配列 また は 
構造 の 中 C あ る 要素 項目 の 数 で あり , その 各々 は , デー タ 形 
式 項目 を それ ぞ れ 別個 と 使用 し て 関連 づけ られ る )。 


6. 制御 果 式 項目 に 出 会 2 と , 制御 の 処置 が 実行 され , デー タ ・ 
リス ト 項 目 は , 次 の 形式 項目 と 対 さ れる 。 


ん デー タ ・ リ スト の 中 の 最後 の 項目 が , 対応 する 形式 項目 を 用 
いて 処 理 さ れ た と きじ, 指定 され た 転送 が 完了 する 。 その 後 
(C つ づく 形式 項目 は , 制 件 形式 項目 も 含め て , 無視 され る 。 


8. 出力 の 場合 , デー タ 項 目 は , 自動 的 に は 区 切ら ちら れ を い が , 通 
常 , 算術 デー タ 項 目 に は , デー タ 変 換 の 規則 と せ ョ 消去 と に 
よっ て , 先行 ゼロ が 含ま れる 。 


GET EDIT (NAME, DATA, SALARY) 
CACN) XC2。、AC2) EC て 6.2 7))) 


PUT EDIT ('INVENTORY 三 '11 INUM, INVCODE) 


CAyECS) う > 


最初 の 例 で 指定 され て いる 内 容 は , スト リー ム の 中 の 最初 の N 桁 の 
文字 は 文字 スト リン グ と し て 取り 扱い , NAME KC 割り 当て る と と , 
区 の 2 桁 は スキ ッ プ する と と , 次 の 6 桁 は 文字 形式 で DATA K 割 
り 当 て る と と , 次 の 6 桁 は , 符号 付 ( 任 意 ) の 1 0 進 固定 小数 点 定 
数 と 考え ん , SALARYKC 割 り 当 て る と と , で ある 。 


2 番 上 日 の 例 で は , ! INVPNTORY=! と いう 文字 スト リン グ 
を TINUM の 値 と 連結 し て , スト リー ム の 中 の 1 つの フィ ー ル ド 
( その 幅 は その 結果 出来 上 [る スト リン グ の 長 さ ) に 入れ る と と が 指 
定 さ れ て いる 。 そ の あと で , INVCODE の 値 が , 符号 付 (任意 ) 
の 1 0 進 固定 小数 点 整 定数 を 表わす 文字 (C 変 換 さ れ , 5 桁 の 幅 を も 
つ フ ィ ー ル ド (先行 文字 は プラ ンク て な る と と も ある ) と 右 づめ さ 
れ て , スト リー ム 人 入れ られ る 。 式 お よび 定数 に よっ て 表わさ れる 
値 は , 出力 デー タ ・ リ スト の 中 で し か 書く こと が で き な い 点 C 注 意 
し て いた だ きた い 。 


形式 リス ト 


編集 指示 デー タ 指 定 は それ ぞ れ , 形式 リス ト と 結び つけ を な けれ ば な 
ら な い 。 


一 般 形 式 : 
(形式 リス ト ) 


と の “形式 リス ト ” は 次 の よら 定義 され て いる 。 


項目 , 項目 

n 項目 > 。 nm 項目 ' 

n (形式 リス ト ) > 。 n( 形 式 リ スト ) 
統語 規則 ・ 


1、 各 “* 項 目 " は , 以下 に の べ る ょ よら な 形式 項目 を 表わす 。 


2. n と いう 文字 は , 反復 因数 を 表わし て お ぉ おり, 括弧 で 囲ん だ 式 
また は 符号 た し の 1 0 進 整定 数 の どちら で あっ て も よい 。 後者 
の 場合 は , 定数 と その 後 の 形式 項目 を プラ ンク で 区 切ら を け 
れ ば ならない 。 反復 因数 は , 関連 する 形式 項目 また は 形式 リ 
スト が 連続 し て n 回 使用 され る と と を 指定 する も の で ある 。 
ゼロ の 反復 因数 は , 関連 する 形式 項目 また は 形式 リ スト は ス 
キッ プ さ れ , 使用 され を な いと と (デー タ ・ リ スト 項目 は , 次 
の 形式 項目 と 結び つけ られ る ) を 指定 する も の で ある 。 反復 
因数 を 表わす の 式 が 用 いら れ て いる と まき は け は, 1 組 の 反復 が 
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行 を われ る た び , 式 が 評価 され , 整数 変換 され る (これ 
は , 負 の 数 で あっ て は ならない )。 関連 する 形式 項目 また は 
形式 リス ト は , 反復 因数 の すぐ 右側 に ある 項目 また は 項目 の 
リス ト で ある 。 


一 般 規 則 : 


形式 項目 C は , デー タ 形 式 項目 , 制御 形式 項目 , な ぉ ょ び 遠 隔 形式 
項目 , の る ろ つ の タイ ブ が ある 。 デ ー タ 形式 項目 は , デー タ ・ フ ィ ー 
ルド が と る 外部 形式 を 指定 する も る の で ある 。 制 件 形式 項目 は , ベー 
ジ , 行 , 桁 , お よび スペ ー ス の 操作 を 指定 する も の で ある 。 遠隔 形 
式 項目 は , その ブロ ッ ク 内 の ど と か 別個 の FORMAT ステ ー ト 
メン ト を 設け て , その 中 で 形式 項目 を 指定 する た め の も の で ある 。 


各種 の 形式 項目 C つ いて は , E 節 「 編 集 指示 の 形式 項目 | の と と 
ろ で 詳し く 説明 する 。 以下 の 説明 は , 編集 指 赤 デ ー タ 指定 で の 形式 
項目 の 用 法 を 志 し た も の で ある 。 


デー タ 形 式 項目 


入力 の 場合 , 各 デ ー タ 形式 項目 は , デー タ 項 目 と 結び つけ られ る 
文字 の 桁 数 と , 外部 デー タ の 解釈 の 仕方 を 指定 する 。 デ ー タ 項目 は , 
必要 を ら ば , 変数 の 属性 (と 合う ょ う 変 換 さ れ て , デー タ ・ リ スト の 
中 で 指名 され て いる 関連 の 変数 (割り当て られ る 。 出力 の 場合 は , 
デー タ ・ リ スト の 中 の 関連 する 要素 の 値 は , 形式 項目 で 指定 され た 
文字 表現 (C 変 換 さ れ て , デー タ ・ ス トリ ー ム 搬入 され る 。 


デー タ 形 式 項目 に は , 固定 小数 点 (F ), 肖 動 小数 点 ( E ), 複 
素数 ( C), ビク チャ ー(P ), 文字 スト リン グ ( A ), お よび ビ 
ッ ト ・ ス トリ ング ( B ) の 6 つが ある 。 と これら は 通常 , 次 の よう 
指定 され る 。 


(w( , dt ,p〕J)) 
(w,d〔,sJ〕) 

( 実数 形式 項目 〔 , 実数 形式 項目 〕 ) 
「 ビ ピクチャー 指定 

〔(w)〕 

〔(w)〕 


の ら OO 〇 回 回 


と の リス ト の 中 で , w と いら 文字 は , フィ ー ル ド の 桁 数 を 指定 する 
式 を 表わし て いる 。 d と いう 文字 は , 小数 点 の 右側 の 桁 数 を 指定 す 
る も の で , 固定 小数 点 整数 の 場合 は 省略 し て も よい 。 複素 数 形式 項 
日 の 実数 形式 項目 は , F, EE, また は PF 形式 項目 の い ム ず れ か の 形 を 
表わし て いる 。 P 形 式 項目 の ビク チャ ー 指 定 は , 数 字 指 定 ま た は 
文字 スト リン グ 指 定 の どちら で あっ て も よい 。 出力 の 場合 , お よ 
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び F 形 式 項目 と 結び つけ られ た デー タ は , 内 部 精度 が 外部 精度 より 
大 きけ れ ば , まる め ら れる 。 


3 番目 の 指定 ( p ) は , 形式 項目 の 中 で 使用 きれ る も の で , ス 
ケー ル 因 数 で ある 。 3 番目 の 指定 ( s ) は, 浮動 小数 点数 の 最初 の 
サブ プ ・ フ ィ ー ル ド と し て と っ て お くべ き 桁 数 を 指定 する た め に , 
形式 項目 の 中 で 使用 され る 。 とれ ら の 指定 に つい て は , P 節 「 編 集 
指示 の 形式 項目 |] の と と ろ で 詳し く 説 明 す る 。 


注 : 固定 小数 点 2 進数 と 藻 動 小数 点 2 進数 の デー タ 項 目 は つね と , 
入力 スト リー ム の 中 で は , 1 0 進数 で 表わさ れ た 値 〈 よ っ て 表現 さ 
れ て いな く て は な ならない 。 その 後 , と れ ら を アク セス する た め , 

F ぉ よび E 形 式 項目 が 用 いら れ , 割当 て の 際 (C, その 値 が 2 進数 表 
現 変換 され る 。 出力 の 際 に は , 2 進数 項目 が 1 0 進数 値 変換 さ 
れる の で , 関連 する F ま た は P 形 式 項目 で は , 変換 され た 1 0 進数 
(C て も と づい て , フィ ー ル ド の 幅 と 小数 点 の 位置 を 記述 し を けれ ば を な 
ら な い 。 


次 の 例 は , 形式 項目 の 用 法 を 示し た も の で ある 。 
1 GET FILE (INFILE) PDIT (ITEM) (A(20)): 


と の ステ ー ト メン ト は , INEILE と 呼ば れる ファ イル の 
次 の 2 0 文字 を , ITEM 割り 当て る 。 と の 値 は 自動 的 C, 
形式 項目 A( 2 0 ) に よっ て 指定 され た 文字 表現 か ら , 

I TEM < 対 し て 宣言 され た 属性 (よっ て 指定 され た 表現 に 
変換 され る 。 


注 : 出力 Cc 対 し て デー タ ・ リ スト と 形式 リス ト が 使用 され 
て いる 場合 は , フィ ー ル ド の 幅 が スト リン グ の 長 さ と 同じ で 
ある な ら ば , つま り , スト リン グ の 後 C プ ラン ク を つけ な い 
を ら ば ぱ ば, スト リン グ 項 目 の 長 さ を 形式 項目 の 中 で 指定 する 必 
要 は を い 。 


2. PUT FILE (MASKEFLE) EDIT (MASK) (B): 


MASK が BIT(25 ) と いら 必 性 を も っ て いる と すれ ば , 
上 記 の ステ ー ト メン ト は , MASK の 値 を , 0 と 1 か ら な る 
2 5 桁 の 文字 の スト リン グ と し て , MASKFLE と いう 名 
の ファ イル K 書 き 出 す 。 フ ィ ー ル ド の 幅 の 指定 は , B 形 式 項 
目 の 中 で 与え を る と と が で きる 。 と れ は , 入力 の 場合 に は 必ず 


3 PUT EDIT (TOTAL) (F(6,2)): 


TOTAL が FIXED(4 ,2 ) と いう 属性 を も っ て いる 
と すれ ば , 上 記 の ステ ー ト メン ト は , TOTAL の 値 を , 
定 小数 点数 の 文字 表現 C 変 換 し , 標準 出力 ファ イル 
SYSPRINTK 書 く と と を 指定 し て いる 。 


最後 の 2 つの 数 字 の 前 に 小数 点 が 挿入 され , と の 数 は , 6 
桁 の フィ ー ル ド の 中 C 右 づめ され る 。 先行 セロ は プラ ンク 
変え られ , 必要 を ら ば , 最初 の 数 字 の 左 に 負 の 符号 が 入れ 
られ る 。 


内 部 1 0 進数 固定 小数 点 タ イプ か ら 文 字 タ イブ へ の 変換 は , 

変換 (関す る 普通 の 規則 (CC し た が っ て 行なわ れる 。 余分 な 婦 
字 が ある と , 変換 され た スト リン グ の 数 字 の 前 プラ ンク と 
し て 出 て くる 。 ま た , 先行 や ロ は プラ ンク 変換 され る の で , 
追加 の プラ ンク が 数 字 の 前 に あっ て も よい 。 小数 点 ま た は 負 
の 符号 が ある 場合 は , どちら も 1 個 の 先行 アラ ンク と 置き 換 
えら れる 。 


編集 指示 出力 で は , 形式 項目 の 中 で フィ ー ル ド の 幅 指定 を 使 
用 し て (と の 場合 は , F(6,2 ) 形式 項目 の 中 の 6 ), 先 
行 ぞ ロ を 切り 捨て る と と が で きる 。 と の 指定 で は , ゼロ が 1 
つ 切 り 捨て られ る 。 TOTAL は , 長 さ が 7 の 文字 スト リン 
グ 変 換 さ れる と と に な る 。 変換 され た 数 字 の 4 桁 が すべ て 
ゼロ より 大 きけ れ ば , その 数 は , 挿入 され る 小数 点 も 含め て 
5 桁 を 必要 と する 。 そ の 数 が 負 を ら ば , 負 符号 の た め (C て もう 
1 桁 必要 で ある 。 し た が っ て , F( 6 , 2 ) と いう 指定 は つね 
(C, すべ て の 数 字 , 小数 点 , 符号 を 許容 する と と が で きる が , 
余分 の プラ ンク は 切り 捨て られ て 取り 除 か れる 。 


GET FILE(A) EDIT (ESTIMATE) (E(10,6) ) : 


と の ステ ー ト メン ト は , A と いう ファ イル か ら 次 の 10 文 字 
を 取り 出し , それ ら を 涯 動 小 数 点 1 0 進数 と し て 解 息 す る も 
の で ある 。 小数 点 は , 小数 部 の 右端 4 桁 の 前 に ある も の と 人 み 
を され る 。 デー タ の 中 実際 の 小数 点 お か あれ ば , この 仮定 を 
打ち 消す と と が で きる 。 と の 数 の 値 は , ESTIMATE の 属 
性 (と 合 わせ て 変換 され , と の 変数 に 割 り 当 て られ る 。 


GET EDIT (NAME, TOTAL ) 
(P'AAAAA,P'929221): 


と の ステ ー ト メン ト が 実行 され る と , 標準 入力 ファ イル 
SYSIN が 想定 され る 。 最初 の 5 桁 は , 英字 また は ブラ ン 
ク で な けれ ば な を なら ず , これ ら は NAME 割り 当て られ る 。 
次 の 4 桁 せ 」, プラ ンク 以外 の 数 字 で を けれ ば を ら 才 , これ ら 
は TOTAL (CC 割り 当て られ る 。 


制御 形 式 項目 


制 件 果 式 項目 に は , スペ ー ス 形式 項目 ( ) , お よび COLUMN, 
LINE, PAGE, SKIP の 各 形 式 項 目 が ある 。 ス ペー スラ 形式 項 
目 は , デー タ ・ ス トリ ー ム の 中 で の 相対 的 を スペ ー テ 送り を 指定 す 


る も の で ある 。 PAGE お よび LINE 形式 項目 は , PRINT フ 
ァイル の と きだ けり 使用 可能 な も る の で あり , し た が っ て 当然 , PUT 
ステ ー ト メン ト の 中 で し か 指定 する こと は で き な い 。 通常 , PAGE 
以外 は すべ て , 式 を 含ん で いる 。 L INE, PAGEB, お よび SKIP 
は , PUT ス テー トメ ント の 中 の オプ ショ ン と し て , 別個 指定 し 
て も よい し , SKIP は , GET ステ ー ト メン ト の 中 の オプ ショ ン と し 
て 指定 する と と も で きる 。 秋 ( て あげ る 例 は , 制御 形式 項目 の 用 法 を 
示し た も の で ある 。 


1. GET _ EDIT (NUMBER, REBATE) 
(CA(5) XX(5), A(5) ): 


と の ステ ー ト メン ト は , 標準 人力 ファ イル SYSTIN か ら の 
次 の 1 5 文字 を , 以下 の よう に し て 処理 する も の で ある 。 最 
初 の 5 文字 は NUMBER 割り 当て られ , 次 の 5 文字 は ス 
ベー ス さ れ て 無視 され , 残り の 5 文字 が REBATE (割り 
当て られ る 。 


2. GET FILE(IN) EDIT(MAN, OVERTIME ) 
(SKIP(1), A(6), COLUMN(60), F(4,2) ) : 


と の スネ ステー トメント は , IN と いう ファ イル 区 結び つけ られ 
た デー タ ・ セ ッ ト を , 次 の 行人 位置 づけ する も る の で ある 。 そ し 
て , その 行 の 最初 の 6 文字 が MANKC 割 り 当 て られ , 6 0 桁 
目 か ら の 4 文 字 が OVERTIME(C 割 り 当 て られ る 。 


3 PUT FILE(OUT ) EDIT (PART, COUNT ) 
(A(4) (2 F(5)): 


と の ステ ー ト メン ト は , PART の 値 を 表わす 4 文字 , 次 
2 桁 の ブラ ンク , さら 終り (CC, COUNT の 画定 小数 点数 
値 を 表わす 5 文字 を , OUT と いう 名 の FILE (CC 入れ る も 
の で ある 。 


4. 次 の 例 は , COLUMN, LINE, PAGE, ぉ よび SKIP 
形式 項目 を 他 の も の と 結び つけ て 使用 する 方 法 を 示し た も ゃ の 
で ある 。 


PUT EDIT (!「QUARTERLY STATEMENT' ) 
(PAGE, LINE(2), A(19) ) : 

PUT EDI T 
( AOOT#, BOUGHT , SOLD, 
PAYMENT, BALANCE ) 
(SKIP(3), A(6), COLUMN(14 ), 
F(7,2), COLUMN(30), F(7 ,2), 
COLUMN(45), F(7,2), 
COLUMN(60), F(7 ,2) ) : 


最初 の PUT ス テー トメ ント は , QUARTERLY 
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STATEMPENT と いう 見 出し を , 標準 出力 ファ イル 
SYSPRINT の 新しい ペー ジ の 2 行 目 (C 書 く と と を 指定 し 
て いる 。 2 番目 の ステ ー ト メン ト は , 2 行 ス キッ プ ( つ まり , 
* その 後 の 3 行 目 に スキ ッ プ する ” ) し て か ら , 5 番目 の 行 
の 最初 の 桁 か ら AC CT*# の 値 を 書く と と , 1 4 桁 目 か ら 
BOUGHT の 値 を 書く と と , 3 0 桁 目 か ら SOLD の 値 を 書 
く と と , 45 桁 目 か ら PAYMENT の 値 を 書く とこ と, 60 
桁 有 旧 か ら BALANCE の 値 を 書く と と , を 指定 し て いる 。 


注 : 制御 果 式 項目 は , 形式 リス ト の 中 (て 出 て きた 時 点 で 実行 され 


る 。 デ ー タ ・ リ スト が 使い 果 さ れ た あと K 出 て き 大 制御 彩 式 リス ト 
は , 何 も 効 力 を も た を な い 。 


遠隔 形式 項目 


遠隔 形式 項目 ( R ) は , 別 の と と ろ に ある FORMAT ステ ー ト 
メン ト の ラベ ル ( ま た は FORMAT ステ ー ト メン ト の ラベ ん ル の 値 
を も つ ラ ベル ァ メ 式 ) を 指定 する る の で ある 。 FORMAT ステ ー ト メ 
ント と , 遠隔 形式 項目 を 指定 する GET また は PUT ス テー トメ ン 
ト と は , 同じ ブロ ッ ク の 内 部 に を けれ ば を な ら な を な い 。 FORMAT ス 
テー トメ ント (は, 遠い 場所 に ある 形式 項目 が 含ま れ て いる 。 と の 
機能 は , 以下 の 例 C 示 す よ う K, 実行 時 点 で 別 の 形式 指定 を 選択 す 
る と と が で きる よう ら (C す る も の で ある 。 


DECLARE SWITCH LABEL: 

GET FILE(IN) LIST(CODE) : 

IF CODE = 1 
THEN SWITCH = L1: 
ELSE SWITCH = L2: 

GET FILE(IN) EDIT (W,X,Y,) 
(R(SWITCH) ) : 

L1: FORMAT (4 F(8, ぅ )): 

L2: FORMAT (4 RE(12,6)): 


ラベ ル 変 数 と し て SWITCH が 宮 言 され て いる の で , 2 番目 の 
CET ステ ー ト メン ト は , 2 つの FORMAT ステ ー ト メン ト の ど 
ちら か に よっ て 操作 する と と が で きる 。 


形式 項目 の 中 の 式 
項目 の 中 の 指定 と 同様 , 1 0 進 整定 数 で ある 必要 は を く <, 式 を 用 い 


て も よい 。 と れ ら は , 変数 また は 他 の 式 で あっ て も よい 。 


変数 (読み 込 き れ た 値 は , の ちと デ ー タ ・ リ スト の 中 で 別 の 変数 
結び つけ て , 形式 項目 の 中 で 使用 する と と が で きる 。 


PUT EDIT (NAME, NUMBER, CTITY) 
(A(N), A(N-4), A(10)): 
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GET EDIT (M,STRING_A,I,STRING_B) 
(F(2), A(M), 琉 (M), F(2 う , A(1)): 


最初 の 例 で は , NAME の 値 が , N 桁 フィ ー ル ド K 左 づめ され た 
文字 スト リン グ と し て スト リー ム K 挿 入 さ れる 。 NUMBER は , 
N- 4 桁 の フィ ー ル ド の 中 KC 左 づ め さ れ る 。 CITY は , 10 桁 の 
フィ ー ル ド 《 左 づめ され る 。 2 番目 の 例 で は , 最初 の 2 桁 が MC 割 
り 当 て られ る 。 そ の あと , STRING_AMC 割 り 当 て られ る 文字 の 
桁 数 を 指定 す る た め , お よび 2 桁 の 文字 を I (C 割 り 当 て る 前 人 無視 
する 桁 数 を 指定 する た め (C も , M の 値 が と られ る 。 さら, 
STRING_ BC 割り 当て られ る 文字 の 桁 数 が { の 値 を 用 いて , 指 
定 さ れ て いる 。 


PRINT ファ イル 


PR INT 属 性 は , STREAM OUTPUT ファ イル C だ け の 適用 
する と と が で きる 。 こと れ は , その ファ イル の デー タ が , 最終 的 に は 
印刷 され る と と を (最初 は , 印刷 ペー ジ 以 外 の 媒体 に 書き 出し て も 
よい ) 静 わす も る の で ある 。 PRINT ファ イル の 各 レ コー ド の 最初 
の デー タ ・ ズ バイ ト は , 印刷 制御 文字 用 に と っ て お か れる 。 制御 オプ 
ショ ン と 形式 項目 PAGE, SKIP, お よび LINE を 含む ステ ー 
トメ ント が 実行 され た と き (C, コン パイ ラー が 自動 的 (< 制 伯 娘 字 を 
挿入 する 。 


PRINT ファ イル の レイ アッ ウト は , 図 1 1.3 に リ スト され て い 
る オォ プシ ョ ン と 形式 項目 を 用 いて 制御 する と と が で きる 。 (PRINT 
以外 の ファ イル の 場合 も , LINESIZE, SKIP, お よび 
COLUMN を 使用 する と と が で きる と と 注意 し て いた だ きた い 。 ) 
LINESIZE と PAGES1ZE は , ペ ー ジ の 印刷 域 の 寸法 (脚注 
を の ぞ く ) を 決め る も の で ある 。 LINES1IZE オ プシ ョ ン は , 各 
印刷 行 (含ま れる 最高 の 文字 桁 数 を 指定 する も る の で あり , PRINT 
ファ イル 対し て と れ が 指定 され て いな いと き は け は, 省略 時 解釈 に よ 
っ て 1 2 0 桁 の 値 が と られ る ( ただし, PRINT 以外 の ファ イル 
の 場合 に は , 省略 時 解 釈 は な い ) 。PAGESTZE オ プション は , 
各 ペ ー ジ 印刷 され る 最高 の 行 数 を 指定 する も の で あり , 指定 され 
て いな を けれ ば , 省略 時 解 和 選 ヒ よっ て 6 0 行 と 人 みた な され る 。 次 の 例 
つい て 考え て 信 よ うら 。 


OPEN FILE( REPORT ) OUTPUT STREAM PRINT 
PAGESIZE(55 ) LINESTIZE(110): 


と の スネ ステー トメ ント は , REPORT と いう ファ イル を PRINT フ ラフ 
ァイル と し て 開く も の で ある 。 PAGESIZE(55 ) と いら 指定 
は , 各 ベ ペー ジ (C て は , 最高 5 5 行 が 含ま れ を けれ ば な ら な いと と を 表 
わし て いる 。 5 5 行 分 を 書き 終っ を た (あるいは スキ ッ プ し た ) あと 
で ペー ジ 上 (《 書 こう と する と , ENDPAGE 条 件 が 起 と る 。 
ENDPAGE 条 件 に 対す る 標準 の シス テム 処理 は , 新しい ペー ジ に 
スキ ッ プ する と と で ある が , プロ グラ マー は , ON ステ ー ト メン ト 
を 用 いて , 自分 た り の 女 置 を 設定 する と と が で きる 。 


ヽ ヘー ンー 


オプ ブ プション また は は 形式 項 


編集 指示 形式 項目 
メン ト 


LINESTIZE(w)! 
PAGESIZE(w) 
PAGE 
LINE(w) LINE(w) 
SKIP((x)〕! SKIP((x)〕} 
アテ COLUMN(w )* 


PAGE 


目 が 記入 され る ステ ー ト 


行 の 幅 を 決め る 

ペー ジ の 幅 を 決め る 
新しい ペー ジ に スキ ッ プ する 

指定 の 行 に スキ ッ プ する 

指定 され た 行 数 を スキ ッ プ する 

行 の 中 の 指定 され た 桁 に スキ ッ プ する 


1 。 PRINT 以外 の ファ イル に も 使用 可能 。 前記 の 「 転 送 ス チ テー トメ ント の オプ ショ ン | と 「 制 件 果 式 項目 ] , な よび 下記 の 「 行 の 
サイ ズ と レコ ー ド 形式 」 の 項 を 参照 の こと 。 


図 1 13 PRINT フ ァイル の レイ アッ ウゥ ト を 制御 する た め の オ ォ オプション と 形式 項目 


各 ペ ー ジ ご と 1 回 だ け , PNDPAGE 条 件 が 起こ る 。 し た が っ 
て , 最初 CENDPAGE 条 件 が 起 っ た あと も る も, 指定 され た 
PAGESIZE を 越え て , 印刷 を つづ ける と と が で きる 。 と れ は , 
た と えば , 各 ベ ページ の 下 の 方 脚注 を 書く ょ よう を な 場合 < 便利 で ある 。 
た と えば ,。 


ON ENDPAGE( REPORT ) BEGIN: 

PUT FILE(REPORT) SKIP LIST 
(FOOTING) : 

N 三 N 十 1: 

PUT FILE(REPORT) PAGE LIST 
(!PAGE'ITN): 

PUT FILE(REPORT) SKIP (3 ぅ ): 

END: 


前 の 例 で 示し た よう ら と, REPORT は PAGESIZE(55 ) と し 
て 開か れ て いる も の と し ょ 29。 5 6 行 目 KC 書 と うと する と ( ある い 
は 5 5 行 目 以降 に スキ ッ プ し ょ うと する と ) , ENDP AGE 条 件 が 
起こ り , 上 CC 示 され て いる 開始 ブロ ッ ク が 実行 され る 。 最初 の PUT 
ステ ー ト メン ト は , 1 行 分 スキ ッ プ し て , FOOTING の 値 (な そ 
らく は 廊 字 スト リン グ ) を 5 7 行 目印 刷 す る (ENDP AGE が 起 
っ た と き の 行 は , つね (CPAGESIZE 十 1 ) と と を 指定 し て いる 。 
ペー ジ 番 号 が 増やさ れ , REPORT ファ イル は 次 の ペー ジ C て セッ 
ト され , 文字 スト リン グ 「 PAGE! が 新しい ペー ジ 番 号 と 連結 さ 
れ て , 印刷 され る 。 最後 の PUT ステ ー ト メン ト は , 3 行 分 の スキ 
ッ プ を する の で , 次 の 行 は 4 行 目 C な る 。 開始 ブロ ッ ク か ら , 

ENDPAGE 条 件 を 引き 起 し た PUT ス テー トメ ント 制御 が 戻り め , デ 


ー タ が 印刷 され る 。 し か し , その ステ ー ト メン ト の 中 で 指定 され た 
SKIP ォ プシ ョ ン は も は や 効力 を も た な を ない 。 


ENDPAGE オ ン ・ ユ ニッ ト が な いと きけ は, SIGNAL 
ENDPAGE は 無視 され る と と 注意 し て いた だ きた い 。 


LINESIZE(110 ) と い 5 指 定 は , ペー ジ 上 の 各行 最高 
1 1 0 桁 を 収容 で きる と と を 示す も の で ある 。 1 1 0 桁 を 越え る 行 
を 書 と うと する と , 余分 な 文字 は , 次 の 行 K 入 れ ら れる と と に て な る 。 


標準 ファ イル SYSPRINT 


標準 ラフ ァイル SYSPRI NT は , 明示 的 (宣言 され て いな い 限 り , 
つね (CC PRINT 属性 が 与え られ る 。 ファ イル が 開か れる と き (, 
自動 的 に 新しい ペー ジ が 開始 され る 。 そ の ファ イル を 参照 する 最初 
の PUT ス テー トメ ント が PAGE オ プシ ョ ン を も っ て いる 場合 , 
また は 最初 の PUT ス テー トメ ント に , 最初 の 項目 と し て PAGE 
を も つ 形 式 リ スト が 含ま れ て いる 場合 は , プラ ンク の ペー ジ が で き 
る と と な る 。 


ENVIRONMENT 属性 
ENVIRONMENT 属 性 は , ファ イル と 結び つけ られ る デー タ ・ 
セッ ト の 物理 的 を 構成 に つい て の 情報 を 指定 する も の で ある 。 と の 


情報 は , 括弧 (CC 入れ た オプ ショ ン ・ リ スト の 中 CC 入れ る 。 その 一 般 
形式 は , 次 の 通り で ある 。 
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ENVIRONMENT (オプ ショ ン ・ リ スト ) 


スト リー ム 方 式 の 転送 で 使用 で きる オプ ショ ン は , 以下 の 通り で 
ある 。 


MEDIUM (記号 装置 名 〔 , 物理 装置 タイ プ 〕 ) 
[FUNCTION(sa〔 ,b]〕] )〕 

[ RCE〕 

[STACKER(n ) 〕 
[FIFEBIVIVBIDIDBIU〕 

[ RECSIZE( レ コー ド の 長 さ )〕 
[ BLKSIZE( ブ ロッ ク ・ サ イズ ) 〕 
( BUFFERS({112})〕 
[CONSECUTIVEJ〕 

LEAVE〕 

UNLOADJ〕 

(NOTAPEMK〕 

[NOLABEL〕 

[VERIFY] 

(ASCII〕 

[ BUFOFF((n) 〕〕 


と れ ら の オォ オプション は , どの よう な 順序 で 記入 し て も よく , ブラ 
ンク で 区 切っ て 記入 する 。 オ プシ ョ ン 自 体 の 中 に プラ ンク を 含め て 
は な ならない 。 


次 (C, と れ ら の オプ ショ ン K つ いて 説明 する 。 
装置 の タイ プ (MEDIUM) 
PL ンプ T の ファ イル 宣言 の 各々 対し て , MEDIUM オ ォ オプション を 


指定 し を けれ ば を な ら を い 。 と の オプ ショ ン に つい て は , 第 10 章 「 入 
力 と 出力 」 の と と ろ 史 説明 し て ある 。 


装置 の 機能 (FUNCTION) 


FUNCTION オ プシ ョ ン は , 3525 で 実行 され る 機能 を 指定 す 
る も の で ある 。 と の オプ ショ ン に つい て は , 第 1 0 章 「 入 力 と 出力 ] 
の と と ろ K 説 明 し て ある 。 


読取 桁 抑制 (RCE ) 


ENVIRONMENT 属 性 の RCE オ プシ ョ ン は , 350 5 また は 
35 25C よ る カー ド 桁 の 選択 的 を 読取 り を 指定 する も の で ある 。 
と の オプション を 使用 する と き は , その ブロ グラ ム に よっ て 読み 取 
られ る カー ド の デック の 最初 の カー ド は , RCE 形 式 記述 カー ド で 
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を けれ ば な ら た ない 。 形式 記述 カー ド の 形式 に つい て は , と の コン ババ 
ィ ラ ー 用 の ブロ グラ マー 手引 | 書 を みて いた だ きた い 。 


1. MEDIUM ォ オプ ショ ン の 中 で 指定 され て いる 装置 タイ プ は , 
3505, 3525, まん を は 3525T〒 で な けれ ば な ら な を ない 。 


2.。 MEDIUM オ ォ オプ ション の 中 で 指定 され て いる 論理 装置 は , 
SYSTIPT で あっ て は なら な い 。 


3 光学 式 マ ー ク 読取 り オ ォ オプション ( OMR ) を 指定 し て は な ら 
な い 。 


スタ ッ カ ー 選 択 (STACKER) 

STACKER 属 性 は ,3505 ま た は 3525 の どの スタ ッ カ ー に を 
カー ド を 落す か を 指定 する も る の で ある 。 と の オプ ショ ン は , 次 の よ 
ら な 形式 を し て いる 。 


STACKER(n) 


n は , 定数 か , また は は 精度 (31,0) の FIXED BINARY 
STATIC 変 数 で ある 。 


1. MEDIUM オ ォ オプション の 中 で 指定 され て いる 装置 タイ プ は , 
3505,3525, または 3525T で な けれ ば を な ら な を ない 。 


2. FUNCTION オォ プシ ョ ン で , 書 出 し (FUNCTION(w)) 
を 指定 し て は を ら を な い 。 


3 n は , 1 また は 2 で な けれ ば な を ならない 。 


STACER オ プション が 指定 され て いな いと き は , STACKER 
( 1 ) と み を され る 。 


レコ ー ド 形式 オプ ショ ン 
スト リー ム 方 式 の 転送 で は , レコ ー ド の 境界 は 無視 され る が , デー 


タ ・ セ ッ ト を 作成 する と き は , レコ ー ド 形式 は 重要 な 問題 で ある 。 
その 理由 と し て は , レコ ー ド 形式 如何 に よっ て , デー タ ・ セ ッ ト が 


占め る 記憶 域 ス ペー ス の 量 や , その デー タ を 処理 する プロ グラ ム の 
効率 が 左右 され る ば か り で な く , と の デー タ ・ モ キッ ト は の ちもと, レ 


コー ドド 方 式 の 転送 に よっ て 処理 され る と と も る も ある と と を ど が あげ 
られ る 。 レ コー ド 形 式 を 指定 し た あと , プロ グラ マー は , スト リー 
っ 方 式 の 転送 だ け を 使用 し て いる 限り は , レコ ー ド や ブロ ッ ク K つ 
いて 考慮 する 必要 は を い 。 つ まり , ブロ グラ マー は , いく つか の 行 


の 中 人 並べ られ た 一 連 の 文字 と し て その デー タ ・ モ セッ ト を 考え れ ば 
ょ よく, 新しい 行 を 選択 する た め (C は け は , SKIP オプ ショ ン ま た は 形 


式 項目 (PRINT ファ イル の 場合 は . さら ICPAGE お よび 
LINE オプ ショ ン と 形式 項目 ) を 使用 する こと が で きる 。 


レコ ー ド は , 次 の 7 つの 形式 の いずれ か (する と と が で きる 。 


固定 長 : F 非 ブ ロッ ク 化 


FB ブ ョ ッ ク 化 


可変 長 : V 非 ブ ロッ ク 化 


VB ブロック 化 


D 非 ブ ロッ ク 化 
(|「ASCI 1 デー タ ・ セ キット 」 の 項 を 参 
時 ) 


DB ブロ ッ ク 化 
(|[ASCTI 1I デー タ ・ セ モット ) の 項 を 参 
照 ) 
不定 長 : U プロ ッ ク 化 する と と は で き な い 。 
レコ ー ド の ブロ ッ ク 化 な よび 非 ブ ロッ ク 化 は , 自動 的 に 行なわ れ 
る 。 


どの よう な 形式 の も の で あっ て も , レコ ー ド は すべ て , デー タ ・ 
バイ ト と , 任意 選択 の 制御 バイ ト ま た は 接頭 語 バ イト か ら 構 成 さ れ て 
いる 。 可変 長 レ コード (C は , レコ ー ド また は ブロ ッ ク の 長 さ を 指定 
する た め の 制 件 バイ ト と 接頭 義 バ イト が 含ま れる 。 と れ ら の バイ ト 
の 用 法 に つい へ て は , こと の あと で 説明 する 。 さ ら C, PRINT ファ 
イィ ル 結 び つ けら れる レコ ュー ド ( どの よう な 形式 で あっ て $ ) の 先 
頭 に は , 印刷 制 卸 娘 字 と し て 解 和 収 さ れる デー タ ・ バ イト が つい て い 
る 。 コ ンズ ベイ ラー は , 関連 する PUT ステ ー ト メン ト を 分 析 し , 適 
当 を 文字 ( また は 省略 時 解釈 の 文字 ) を 挿入 する 。 


固定 長 レ コー ド 
デー タ ・ セ ッ ト の 中 の レコ ー ド は すべ て , 同じ 長 さ で ある 。 


レコ ー ド は ブロ ッ ク 化 され て い を い 。 1 つの レ ュ コー 
ド が それ ぞ れ 1 個 の ブロ ッ ク を 構成 する 。 


F 一 形式 ・ 


FB 一 形式 : レコ ー ド は ブロ ッ ク 化 され て いる 。 い くつ か の デブ プロ 
ッ ク は 短 プ ロッ ク で あっ て も よい 。 つ まり, 指定 さ 
れ を た プロ ッ ク ・ サ イズ より 短く て も よい 。 


可変 長 レコ ー ド 


各 レ コー ド は , 長 さ が 異な っ て いて も よい 。 
V 一 形式 : レコ ー ド は ブロ ッ ク 化 され て い を い 。 1 つの レ ュ ー 
ド が それ ぞ れ 1 個 の ブロ ッ ク を 構成 する 。 各 レコ ュー 
ド は , 次 の も ゃ の か ら 構 成 さ れ て いる 。 


4 バイ ト の 制 件 バイ ト 

デー タ ・ バ イト 
4 バイ ト の 制御 バイ ト (て は , レコ ー ド の 長 さ (つま 
り , 現在 の レコ ュー ド の 長 さ ) が 入っ て いる 。 と の 値 


は 自動 的 (て 挿入 され る も の で あり , プロ グラ マー は 
何 の 処 置 も と る 必要 は な い 。 


さら (て , ブロ ッ ク ( つま り , レコ ー ド ) の 先頭 ( 特 
別 の 4 バイ ト が つけ られ る 。 と これら の バイ ト K は , 


プロ ッ ク ・ サ イズ が 入っ て いる 。 と の 値 は , レコ ュー 
ド の 長 さ の 場合 と 同じ ょ うに し て 挿入 され る 。 


VB 一 形式: レコー ド は ブロ ッ ク 化 され て いる 。 各 レ コー ド は 次 の 


も の で 構成 され て いる 。 
4 バイト の 制御 バイ ト 
デー タ ・ ズ バイト 


4 バイ ト の 制御 バイ ト の 使用 目的 は , Vー 形 式 レ ュ 
ー ド の 場合 と 同じ で ある 。 


ブロ ッ ク は , Vー 形 式 レ ュー ド の 場合 と 同様 , ブロ 


ッ ク ・ サ イズ を 入れ る た め の 4 バイ ト の 特別 を 制御 
バイ ト を も っ て いる 。 


D 一 お よび 

ASCII デー タ ・ セ ッ ト 参照 の こと 。 
DB 一 形式 : 「 デ ッ ト | を 参照 吉 
不定 長 レ コー ド 
処理 は すべ て , ブロ グラ マー の 責任 で ある 。 長 さ の 指定 が レコ ュー ド 
の 中 必要 た 場合 せ は , プロ グラ マー が それ を 準備 し , 解釈 も る し な け 
れ ば な ら な い 。 
RECSIZE オ プシ ョ ン 


RECSIZE オ ォ オプ ション は , レコ ー ド の 長 さ を 指定 する も の で ある 。 
と れ は , 次 に あげ る も の の 合計 に を る 。 


1. デー タ 《 必 要 な を 長 さ 。 可 変 長 と 不定 長 レ コー ド の 場合 は , 最 
大 の 長 さ C す る 。 


2. 必要 と され る 制御 バイ ト 。 可変 長 レ ュー ド の 場合 は , レコ ュー 
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ド の 長 さ 用 (C 4 ベイ ト 必 要 。 固定 長 な よび 不定 長 レ ュー ド で 
は 不要 。 


レコ ー ド の 長 さ は , 1 0 進 整定 数 と し て , また は FIXED 
BINARY(31.0) STATTIC と いう 属性 を も つつ 変数 と し て , 
指定 する と と が で きる 。 


と の 値 は , 次 の 約束 を 守っ た も の で を けれ ば な を な ら な い 。 


最大 : 固定 長 な よび 
不定 長 の 場合 : 32.7 6 る 0 バイ ト 
可変 長 の 場合 : 32,7 56。 バ イト ASCI TI 
デー タ ・ モ ッ ト の 場合 は つね (C, 最高 ?299 ペ 
イト で ある 。 

ゼロ の 値 : 省略 時 解釈 が 適用 され る ( 「 レ コー トド 形式 の 省略 
時 解釈 」 の 項 を 参照 ) 。 

負 の 値 : UNDEFINEDFILE 条件 が 起こ と る 。 


LINESTIZE オ プシ ョ ン よ っ て 暗示 され る 値 は , 
RECSIZ 記 オプ ショ ン の 中 で 指定 され た 値 を 賀 き 換え る 。 


BLKSIZE オ プシ ョ ン 


BLKSTIZE オ プシ ョ ン は , ブロ ッ ク サ イズ を 指定 する も る の で ある 。 
と れ は , 次 の も の の 合計 に な る 。 


1. ブロ ッ ク 内 の 全 レ ュー ド の 長 さ 。 可変 長 レ コー ド の 場合 は , 
各 レ コー ド の 長 さ に は , レコ ー ド の 長 さ 用 の 4 バイ ト の 制 伯 
バイ ト も 含ま れる 。 


2. 必要 と され る 制御 バイ ト ま を た は ブロ ッ ク 接 頭 請 バイ ト 
(ASCIT デー タ ・ セ ッ ト の と き )。 可変 長 プ ロッ ク 化 レコ 
ー ド で は , ブロ ッ ク ・ サ イズ 用 (CC 4 バイ ト が 必要 で ある 。 固 
定 長 な よび 不定 長 レ ュ ー ド で は , 不要 で ある 。 


プ ブロッ クサ イズ は , 1 0 進 整定 数 と し て , ある い は FIXED 
BINARY(31 ,0 ) STATIC と いら 属性 を も つ 変 数 と し て 
指定 する と と が で きる 。 


と の 値 は , 次 の 約束 を 守っ た も の で を けれ ば を ら な い 。 
最大 : 32.760 バ イト ( BUFOFF(L ) が 指定 され 


て いる ASCI TI デー タ ・ セ ッ ト の 場合 は , 
の の の 90 
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ゼロ の 値 省略 時 解釈 が 適用 さき れる ( と の あと の 「 レ ュー ド 
形式 の 省略 時 解釈 」 を 参照 の と と )。 
負 の 値 UNDEF INED 条 件 が 起 と る 。 


プ ブロック ・ サ イズ と レコ ー ド の 長 さ と の 関係 は , レ ュ ー ド 形式 ェ 


プロ ッ ク ・ サ イズ は , レコ ー ド の 長 さ の 倍数 で な 
けれ ば な を ならない 。 


FB- 形 式 


プ ブロッ ク ・ サ イズ は , 次 の も の の 合計 と 同 じ か そ 
れ 以 上 で を けれ ば な を なら な いら 。 


VB- 形 式 


ブロ ッ ク 内 の 全 レ ュー ド の 長 さ 


ブロ ッ ク ・ サ イズ 用 の 4 バイ ト の 制御 バイ ト 


ブロ ッ ク ・ サ イズ は , 次 の も の の 合計 と 同じ し かそ 
れ 以 上 で な けれ ば な ら を な い 。 


DB- 形 式 


ブロ ッ ク 内 の 全 レ ュー ド の 長 さ 
ブロ ッ ク 接 頭 語 バイ ト ( あれ ば ) の 長 さ 
レコ ー ド 形式 の 省略 時 解釈 


ENVIRONMENT 属 性 の 中 で レ ュ ー ド 形式 オプ ショ ン が 何 も 指 
定 さ れ て い を ない とき は , 次 の 処置 が と られ る 。 


INPUT ファ イル : MEDIUM ォ オプ ショ ン の 中 で, 記号 装 賀 名 

SYSIPT ま た は ュ ユニット ・ レ コー ド 装 思 が 指定 され ん て いる と き の 

省略 時 解 収 は , レ ュ ー ド 形式 が F, レコ ー ド の 長 さ , ブロ ッ ク ・ サ 

イズ , LINESTZE の いずれ も が 8 0 に な る 。 それ 以外 の INPUT 
ファ イル の 場合 は すべ て , 次 の よう な る 。 


レコ ー ド 形式 : エラ ー・ メ ッ セ キー ジ が 作成 され る 。 


ブロック ・ サ イズ どちら か ーー 方 が 指定 さん て いる と き は , 他方 の 

また は レコ ー ド の 値 は , 指定 され ん た オォ オプション の 値 か ら 推 論 さ れ 

長 さ : る ( 制御 接頭 主 バ イト が 必要 で あっ た り , つい 
て いた りす る 場合 は , それ ら を 加え た り , 引い 
た り し た 上 で ) 。 と どちら も る 指定 され て い を いと 
き は , UNDEFINED 条 件 が 起 と る 。 


OUTPUT フ ァイル : MEDIUM オ ブシ ョ ン の 中 で 記号 装 償 名 
SYSPC 耳 また は カ ヵ カード トド 塞 孔 装置 が 指定 され て いる と き の 省 略 時 
解 息 は , レコ ュー トド 形 式 が F, LINESTIZE が 80, レコ ー ド の 長 


さと ブロ ッ ク ・ サ イズ の 両方 が 8 1 て を る 。 記号 装置 名 SYSLST, 


また は 行 印 刷 装置 が 指定 され て いる と き の 省 略 時 解 息 は , レコ ュー ド 
形式 が F, LINESTIZE が 120, レ コー ド の 長 さ と ブロ ッ ク ・ 
サイ ズ の 両方 が 1 2 1 と を る 。 これ 以外 の OUTPUT ファ イル の 
場合 は , 次 の よう て な る 。 


レコ ー ド 形式 : VB 形式 に 上 セッ ト され る ( ASCTT オブ プシ 


ュ ン が 指定 され て いる と き は DB 形式 )。 


レコ ー ド の 長 さ : 


PRINT ファ イル : 


F, FB, また は U: LINESIZE 十 1 


V, VB, D ま た は DB: LINESIZE 十 5 


と の 場合 は , L INESTIZE と し て 指定 され た 値 ほ た は 省 
略 時 解 釈 され た 値 が 使用 され る 。 


PRINT 以外 の ファ イル : 


F,FB, また は U: LINESIZE 


V, VB, D, また は DB: LINESIZE 十 4 


と の 場合 は , LINES TIZE と し て 指定 され た 値 が 用 いら 
れる 。 省略 時 解釈 の 値 は を ない 。 


プロ ッ ク ・ サ イズ : FEB: 5*( レ コー ド の 長 さ ) 
VB : 5*( レ コー ド の 長 さ ) 十 4 


緩衝 域 オ フ セ ッ ト : F, FB, また は U: D 
D, また は DB: 4 
DB : 5*( レコード の 長 さ ) 十 
( ブロ ッ ク 接 頭 主 バイ ト ) 
注 : 


1. PRINT ファ イル の 場合 は , L INES 1 Z 包 の 省略 時 解 秋 
の 値 は 1 2 0 で ある 。 PRINT 以 外 の ファ イル の 場合 は , 
L INES 1 ZE の 省略 時 解 釈 は を い 。 


2. 上 記 の よう に し て 計算 し た 値 が 32,7 6 0 より 大 きい 場合 は , 
プロ ッ ク ・ サ イズ は , レコ ー ド の 長 さ 十 4 て セッ ト さ れ , レ 
コー ド 形 式 は VC に セッ ト さ れる 。 ASCI IT デー タ ・ セ モッ ト 
の 場合 に , 省略 時 解 邊 の アロ ッ ク ・ サ イズ が 32,700 , ま 
た は 2999(BUFOFF が 接頭 語 の 長 さ の 値 を も た ず 《 指 定 
され て いる と き ) より 大 きい と , ブロ ッ ク ・ サ イズ は (レコ 
ー ド の 長 さ 十 ブ ロッ ク 接 頭 語 ) に と セット され , レコ ー ト 形式 
は D(C セ ッ ト さ れる 。 


3. 出力 ファ イル 上 の DB 形式 レ ュー ド の 場合 は , ブロ ッ ク 接 
頭 義 の 長 さ (つまり , 緩衝 域 オ フラ セッ ト ) は つね に, 0 また 
は 4 の どちら か で を けれ ば な を ならない 。 


緩衝 域 の 割 振り 


緩衝 域 は , デー タ ・ セ ッ ト と の 間 で 転送 され る デー タ の 中 間 的 を 記 
憶 域 と し て 用 いら れる 内 部 記憶 域 で ある 。 緩衝 域 を 使用 する と , 転 
送 の 時 間 と 計算 の 時 間 と を オォ オー バー ラッ プ さ せる と と が で きる 。 
レコ ー ド の ブロ ッ キ ング お 上 び デ プ ブロッ キン グ を 自動 的 (< 行 を ? 場 
合 に , 緩衝 域 は 重要 な 役割 を する 。 


BUFFERS オ プシ ョ ン 


BUFFEERS オ プシ ョ ン は , デ ー タ ・ セ ッ ト 対 し て 割り 振ら れ 
る 緩衝 域 の 数 を 指定 する る の で ある 。 と の 数 は , 1 また は 2 で を け 
れ ば な ら を い 。 スト リー ム ・ フ ァイル の 場合 は , 省略 時 解 釈 と し て 
2 つの 緩衝 城 が 用 いら れる が , ユー ザー が , と の 数 を 1 変え る と 
と も で きる 。 


デー タ ・ セ ッ ト の 編成 


デー タ が どの よう な 形 で デー タ ・ セ モット (C 記 録 さ れる か , また , そ 
の 後 , プロ グラ ム ( 転 送 で きる よう (て する た め (C デ ー タ が どの よう 
にし て 取り 出さ れる か , と いう と と は , デー タ ・ セ ッ ト の 編成 方 法 
の 如何 に よっ て 決ま る 。 と の コン バイ ラー は , デー タ ・ セ ッ ト の 編 
成 と し て , CONSECUTIVE, INDEXED, お よび 
REG I ONAL の 3 つ を 認識 する と と が で きる 。 ストリー ム 方 式 の 
転送 C に よっ て プク セス され る デー タ ・ セ ッ ト は , CONSECUTIVE 
編成 の も る の で を けれ ば を ら な い が , これ は , デー タ ・ セ ッ ト 編 成 の 
省略 時 解 収 で も る か ら , STREAM ファ イル 対し て と く K 指 定 
する 必要 は を い 。 


CONSECUTIVE デ ー タ ・ セ ッ ト 


CONSECUTIVE デ ー タ ・ セ キット の 中 の レコ ュー ド は , 書き 出さ : 
れ た 順序 通り (< て 並べ られ て な おり, これ ら は , それ と 同じ 順序 で し か 
取り 出す と と は で き な い 。 デ ー タ ・ セ モッ ト が 作成 され た あと , 関連 
する ファ イル を , 入力 の と き ( デー タ を 読む た め (C ) , また は 出力 
の と き に ( 未 尾 に レコ ー ド を 追加 する と と (よっ て デー タ ・ セ ッ ト 
を 拡張 する た め , また は デー タ ・ セ モット の 内 容 を 新しい デー タ で 置 
き 換 える た め (C ), 開く こと が で きる 。 


磁気 テー プ の 取扱 い オ プシ ョ ン 
LEAVE オ プシ ョ ン 
と の オォ オプション は , 後 で 逆 方 向 の 読取 り を する ファ イル の 場合 用 


いら れる も の で あり , ファ イル が 閉じ らち れ る と き C, テー プ ・ ポ リ 
ュー ム の 巻 戻 し を させ な いよ う (C て する 働き を も つ 。 
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UNLOAD オ プシ ョ ン 


UNLOAD オ プシ ョ ン は , フ ァイル が 閉じ られ る と き (C, テー プ を 
巻き 戻し し アン ロー ド す る と と を 指定 する た め C 用 いら れる 。 


NOTAPEMK オプション 


テー プ ・ フ ァイル 対し て NOTAPEMK オ ォ オプ ション を 指定 する と , 
プロ グラ マー は , ラベ ル の を い テ ー プ ・ フ ァイル 上 の デー タ ・ レ コ 
ー ド の 前 と 先行 テー プ ・ マ ー ク を 書か せな いよ うに する と と が で き 
る 。 


NOLA BEL が 指定 され て いる テー プ OUTPUT ファ イル K 対 
し て , NOTAPEMK を 使用 する と と が で きる 。 UNBUFFERPD 
ファ イル の 場合 は 。 と この ォ プ ショ ン は 許さ れ を な い 。 


NOLABEL オプ ショ ン 


NOLABEL し オプション は , 磁 気 テ ー プ ・ フ ァイル 対し て , ファ 
イル ・ ラ ベル を 処理 し な いと と を 指定 する た め C 用 いら れる 。 


出力 ファ イル 対し て NOLABEL オプ ショ ン が 指定 され て い 
る 場合 は , ENVI RONMENT 属 性 の 中 で , NOLABEL の (ほか と , 
NOTAPEMK が 指定 され ん てい を い 限 り , テー プ ・ マ ー ク が 自動 的 
と 書き 出さ れる 。 標準 外 ラ ベル ぉ よび 追加 の ユー ザー・ ラ ベル は 処 
理 さ れ な い 。 


ASCII1 デー タ ・ セ ッ ト 


ASC1I 1 を 使用 する 磁気 テー プ の デー タ ・ セ ッ ト を, PL ノ T で 作 
成 し た り , アク セス し た りす る と と が で きる 。 と の コン パイ ラー で 
は , F, U, お よび D レ ュ コート 形式 が サポ ー ト され て いる 。 FE お よ 
び U 形 式 は , 他 の デー タ ・ セ ッ ト の 場合 と 同じ ょ うら 扱わ れる 。D 
ぉ お よび DB 形式 は , 他 の デー タ ・ セ ッ ト の 場合 の V ぉ よび VB 形 式 
と 相当 する も の で , これ に つい て 以下 KK 説明 する 。 


レコ ー ド 形式 の ほか C, 2 つの BNVIRONMENT オ ォ オプション 
( ASC 1I IT お よび 緩衝 域 オ フ セ ッ ト ・ オ プシ ョ ン BUFOFF ) 
を 指定 する と と が で きる 。 


ASCII オ プシ ョ ン 


と の オプ ショ ン は , デー タ ・ セ ッ ト 上 の デー タ を 表わす の 用 いら 
れる コー ド が ASC TI I で ある と と を 指定 する も の で ある 。 


BUFOFF オ プシ ョ ン お よび ブロ ッ ク 接 頭 語 フ ィ ー ル ド 


ASCT 1T デー タ ・ セ ッ ト 内 の 各 ブ ロッ ク の 先頭 に は , ブロ ッ ク 接 
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頭 語 フ ィ ー ル ド と 呼ば れる フィ ー ル ド を 設け る と と が で きる 。 と れ 
は , 1 バイ ト か らら 9 9 バイト まで の 長 さ に する と と が で きる 。 繧 衝 
域 オ フ セ ッ ト ・ オ プシ ョ ン は , と の フィ ー ル ド の 長 さ を デー タ 管 理 
プログ ラム K 表 示 し て , 各 物 理 ブ ロッ ク の 先頭 か ら の と の オフ セッ 
ト か ら , デー タ の アク セス また は 作成 が 開始 され る よら (する た め 
の も の で ある 。 PL プ I は, と の フィ ー ル ド へ の アク セス を サポ ー ト 
し て お な お ら ず , また , 通常 , シス テム ググ 36 0 お よび シス テ ュ グ 37 0 
の コン バイ ラー で 使用 され る 情報 も ゃ 含ま れ て いな い 。 と の ブロ ッ ク 
反 頭 語 に 含ま れる 情報 を デー タ 管 理 ブ ログ ラム が 使用 する 状況 は 1 
つ だ け で , 非 プ ブロック 化 ま た は ブロ ッ ク 化 可変 長 レ コー ド ( つ まり , 
D- ま た は DB- 形式 レ ュ ー ド ) の 場合 Cc, ブロ ッ ク の 長 さ を 記録 
する た め に ブロ ッ ク 接 頭 語 フ ィ ー ル ド を 使用 する と と が で きる 。 と 
の 場合 の フィ ー ル ド は , 4 バイ ト の 長 さ で , ブロ ッ ク 接 頭 語 フィ ー 
ルド 自体 も 含め て ブロ ッ ク の 長 さ を バイ ト 単 位 で 示し た , 右 づ め の 
1 0 進数 文字 値 を 含ん で いる 。 と の あと , こと れ は , ブロック の 長 さ 
フィ ー ル ド と 全く 同じ C を る 。 


緩衝 域 オ フ セ ッ ト ・ オ プシ ョ ン の 形式 は , BUEOFE((n)〕 

で ある 。 接頭 請 の 長 さ 相当 する 数 値 は , " n "と し て 指定 する 。 
と これ は , 1 0 進 整定 数 , また は FIXED BIMARY(31,0), 
STATIC と いう 属性 を も つ 変 数 の どちら か と し て , 指定 する と 
と が で きる 。 そ の 最小 値 は ぞ ロ で , 最大 値 は 9? ? で ある 。 接頭 語 の 
長 さ の 指定 が を な いと と は , ブロ ッ ク 接 頭 語 が ブロ ッ ク の 長 さ フィ ー 
ルド と し て 用 いら れる こと を 示し て お ぉ お り , と の 場合 は , フィ ー ル ド 
の 長 さ が 4 バイト で ある こと と が 暗示 され る 。 ブ ロッ ク の 長 さ は , デ 
ー タ 管理 アプ ログ ラム と よっ て , 接頭 語 C 挿 入 さ れる 。 


入力 の 場合 , 1 か ら 9 9 ベイ ト の 長 さ の ブロッ ク 接 頭 語 フィ ー ル 
ド を も っ て いて も , ブロ ッ ク 接 頭 語 フィ ー ル ド を 全く も っ て いな く 
て も , ASC II デー タ ・ セ ッ ト を アク セス する と と が で きる 。 ま 
た , ブロ ッ ク の 長 さ フィ ー ル ド と し て プ ブロック 接頭 語 フ ィ ー ル ド が 
使用 され て いる か どら か 関係 な く , ASCI TI デー タ ・ セ キット 
を アク セス する と と が で きる 。 出力 の 場合 は , 3 つの 有効 を レコ ー 
ド 形 式 の いずれ か 1 つ を 使用 する デー タ ・ セ ッ ト は , ブロ ッ ク 接 頭 
語 を つけ ず 人 を 作成 する と と が で きる が , ブロ ッ ク 接 頭 語 の 作成 が 
PL/I (よっ て サポ ー ト され る 唯一 の 状況 は , それ が ブロ ッ ク の 長 
さ フ ィ ー ル ド と し て 使用 され る 場合 で ある 。 


BUFEOFRE オ プシ ョ ン は , ASCI IT デー タ ・ セ ッ ト の 場合 C だ 
けり 使用 する と と が で きる 。 


D 一 形式 お よび DB 形式 レコ ー ド 


各 レ コー ド の 長 さ は , 異な っ て いて も よい 。 と の 2 つの 形式 は , 次 
の 通り で ある 。 


D 一 形式 : 


DB 形式 : 


レコ ー ド は ブロ ッ ク 化 され て い を い 。 1 つの レコ 
ー ド が 1 つの ブロ ッ ク を 構成 する 。 各 レ コ ュ コード 
は , 次 の も の が 含ま れる 。 


4 バイ ト の 制 件 バイ ト 


デー タ ・ バ イト 


4 バイ ト の 制御 バイ ト に は , レコ ー ド の 長 さ が 含 
まれ て いる 。 と の 値 は , デー タ 管 理 ブ ログ ラム が 
挿入 する の で , プロ グラ マー は は 何 の 処置 も と る 必 
要 は を い 。 さ ら (C, ブロ ッ ク の 先頭 ブロ ッ ク 接 
頭 闘 フィー ルド が つけ られ る と と も ある が , と と 
(て は , ブロ ッ ク の 長 さ が 入る 場合 も ある 。 


レコ ー ド は ブロ ッ ク 化 され て いる 。 PD 形 式 対 し 
て 与え を られ る , と れ 以 外 の 情報 は すべ て , DB 
形式 て も 与え られ る 。 


省略 時 解釈 の 規則 


「 レ ュ ー ド 形式 の 省略 時 解釈 | の と と ろ で 述べ た 規則 の ほか (C, さ 
ら ( て 次 の よう な 規則 が 適用 され る 。 


ENVIRONMENT オ プシ ョ ン の 中 で ASC1I 1 は 指定 され て 


い を い が , BUFOFEF, D, また は DB の いずれ か 1 つが 指定 され 
て いる と いう 場合 は , ASC 1 1 と み を され る 。 


直接 アク セス 装置 の 用 法 

VERIFY オ プシ ョ ン 

VERIFY オ プシ ョ ン 人 は , 書 出し 操作 が 行なわ れる た びに その あと 
で 読取 り チ ェ ッ ク を 行なう と と を 指定 する た め (C, 用 いら れる も の 


で ある 。 と の オォ オプション は , 直接 アク セス 装置 の 場合 C だ け , 使用 
する と と が で きる 。 
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第 12 章 : レコ ー ド 方 式 の 転送 


と の 章 で は , レ ュ ー ド 方 式 の 転送 で 使用 され る 入出 力 ス テー トメ ン 
ト と つい て 解説 する 。 レ コー ド 方 式 と ヒエ ストリーム 方 式 の 転送 の ど ち 
ら C て も 等 しく 適用 され る PL/T[ の 機能 ( ファイル, ファ イル 属性 , 
ファ イル の 開閉 を ど ) ついては, 第 1 0 章 「 入 力 と 出力 」 の と と 
ろ で す で 《 説 明 し た 。 


レコ ー ド 方 式 の 転送 で は , デー タ ・ セ モット の 中 の デー タ は , オペ 
レー ティ ング ・ シ ステ ム 作 受け 入れ られ る 形式 で 記録 され た レ ュ コー 
ド の 集まり と み を され る 。 レ ュ コー 方 式 の 転送 の 間 に , デー タ 変 換 
は 行 を われ を い 。 入力 の と き C, READ ステ ー ト メン ト が 実行 さ 
れる と , 1 つの レコ ュー ド が , デー タ ・ セ ッ ト の 中 で 記録 され て いる 
通り の 形 で プロ グラ ム 変 数 (転送 され る か , また は 緩衝 域 の 中 に あ 
る 該当 の レコ ー ド を 指す よう ポイ ンタ ー が セッ ト さ れる 。 出力 の と 
き は , WRITE, REWRITE, また は LOCATE ステ ー ト メン ト 
が 実行 きれ る と , 1 つの レ ュ ー ド が , 内 部 的 (記録 され て いる 通り 
の 形 で ブロ グラ ム 変 数 か ら 転 送 さ れる 。 デー タ は , 実際 に は , プロ 
ッ ク 単 位 で デー タ ・ セ ッ ト と の 間 で 転送 され る が , レコ ュー トド ト 方 式 の 
転送 で 用 いら れる ステ ー ト メン ト が 関係 する の は , レコ ー ド だ け で 
あり , レコ ー ド は 自動 的 に ブロ ッ ク 化 また は デブ ロッ ク 化 され る 。 


転送 され る デー タ 

バラ メー ター や DEF INED 変数 も 含め て , 殆 ん どの 変数 は , レ 

ュー ド 方 式 の 転送 ステ ー ト メン ト よっ て 転送 する と と が で きる が , 

一 般 に , と の 章 で 述べ る と と は , すべ て の 変数 (C 対 し て 等 し く 適 用 

され る も の で ある 。 2, 3 の タイ プ の デー タ C つ いて は , 特別 を 考 

慮 事項 が あり , と れ ら に つい て 以下 説明 する 。 

デー タ の 集合 体 

デー タ の 集合 体 (C 対 し て , 次 の ょ うな 制約 が 適用 され る 。 

1. 集合 体 は , 連結 され た 記憶 域 に 入っ て いな けれ ば を ら な い 

( 集合 体 パ テラ テ メー ター は , CONNECTED 属 性 を も っ て い 
な けれ ば な ら な いら )。 


2. LOCATE ス テー トメ ント の 場合 , 変数 は , レベ ル 1 の 基底 
付 変数 で を けれ ば を ら を いら 。 


境界 合せ され な い ビ ッ ト ・ ス トリ ング 


炊 に あげ る も の は , 転送 する と と が で き な い 。 


1. 境界 合せ され て いな い 固 定 長 ビッ ト ・ ス トリ ング で ある 。, 
BASED, DEEINED, バ ラメ ー タ ー, 丘 字 付 . また は 構 
造 - 基底 - 要素 の 各 変 数 。 


2. 最初 また は 最後 の 基底 要素 が , 境界 合せ され て い を い 固 定 長 
ビッ ト ・ ス トリ ング で ある と うみ な 小 構造 ( た だ し , これ ら が , 
外側 の 大 構造 の 最初 また は 最後 の 要素 で も ある 場合 は の ぞ く )。 


3 。 BASED ま た は DEF INED 属 性 を も っ て いる か , また は 
バ パラ メー ター で ある よう な 大 構造 , な よび それ ら の 最初 また 
は 最後 の 要素 と し て , 境界 合せ され て いな いい 固定 長 ビ ッ ト ・ 
スト リン グ を も ゃ 一 大 構造 。 


長 さ の 変わ る スト リン グ と エリ ア 変 数 


長 さ の 変わ る スト リン グ を 指定 する 位置 指定 モー ド の ステ ー ト メン 
ト は , スト リン グ の 最大 の 長 さ と , スト リン グ の 現在 の 長 さ を 示す 
2 バイ ト の 接頭 語 と を 加え た も の (等 しい 長 さ を も つ フ ィ ー ル ド を 
転送 する 。 と の ファ イル 対し て は , SCALARVARY1ING ォ 
プシ ョ ン を 指定 し を けれ ば を ら な い 。 エリ プア 変 数 を 指定 する 位置 指 
定 モ ー ド の ステ ー ト メン ト は , エリ ア 対 し て 宣言 され た サイ ズ と , 
制御 情報 の 入っ て いる 1 6 バイト の 接頭 語 と を 加え を た も の (等 しい 
長 さ を も る つ フ ィ ー ル ド を 転送 する 。 


長 さ の 変わ る スト リン グ を 指定 する 移動 モー ド の 出力 ステ ー ト メ 
ント は , スト リン グ の 現在 の 長 さ だ け を 転送 する 。 2 バイ ト の 接頭 
語 は , SCALARVARYING オプ ショ ン が ファ イル KC 対し て 指 
定 さ れ て いる と き (C だ け , 含ま れる 。 要素 エリ ア 変 数 , また は 最後 
の 要素 が エリ ア 変 数 で ある よう みな 構造 を 指定 する 移動 モー ド の ステ 
ー ト メン ト は , エリ ア の 現在 の エク ステ ント 16 バ イト の 接頭 語 
を 加え た も の だ け を 転送 する 。 


デー タ 転 送 ス テー トメ ント 

次 に , レコ ー ド 方 式 の デー タ 転 送 ス テー トメ ント の 概要 を 説明 する 。 
と れ ら に つい て の 詳細 は , 了 節 「 ス テー トメ ント | の と と ろ で 解説 
され て いる 。 


実際 , 補助 記憶 装置 と の 間 で レコ ュー ド を 転送 する ステ ー ト メン 
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ト は 4 つ あ る 。 これ ら は , READ, WRITE, LOCATE お よ 
び REWR 1I TE で ある 。 5 番目 の ステ ー ト メン ト で ある DELETE 
スネ ステー トメント は , UPDATE フ ァイル か ら の レコー ド を 削除 する 
た め (C 用 いら れる も の で ある 。 ど の ステ ー ト メン ト が 使用 可能 で あ 
る か は , ファ イル の 届 性 に よっ て 決ま る 。 


READ ス テー トメ ント 


REPAD ステ ー ト メン ト は , どの よう な INPUT ま を た は UPDATE 
ファ イル 対し て も 使用 する と と が で きる 。 と れ は , デー タ ・ セ ッ 
ト か ら ブ ログ ラム へ (直接 的 変数 へ , ある い は 緩衝 域 へ ) レ ュ ー 
ド を 転送 する 働き を する 。 ブ ロッ ク 化 レコ ー ド の 場合 は , READ 
ステ ー ト メン ト は , 緩衝 域 か ら 変 数 に レコ ー ド を 転送 する か , また 
は 緩衝 域 の 中 の 該当 する レ ュ ー ド を 指す よう ポイ ンタ ー を セッ ト す 
る 。 し た が っ て , どの READ ステ ー ト メン ト も , 入力 装置 か ら デ 
ー タ を 転送 する と いう わけ で は な い 。 


WRITE ステ ー ト メン ト 


WRITE ステ ー ト メン ト は , OUTPUT フ ァイル また は 
DIRECT UPDATE フ ァイル 対し て 使用 する こと が で きる が , 
SEQUENTTIAL UPDATE フ ァイル 対し て は 使用 する こと と 
が で き な い 。 と の ステ ー ト メン ト は , プロ グラ ム か ら デ ー タ ・ セ ッ 
ト へ レコ ー ド を 転送 する 働き を する 。 非 プ ロッ ク 化 レコ ュー ド の 場合 
は , 変数 か ら 直 接 転送 する と と も で きる し , 緩衝 域 か ら 転 送 す る こ 
と も で きる 。 ブロ ッ ク 化 レコ ュー ド の 場合 は , WRITE ステ ー ト メ 
ント は , 論理 レ ュ ー ド を 緩衝 域 C 入 れ , さら (CC, レコ ー ド の ブロ ッ 
キン グ が 完了 し た と きだ け , 出力 装置 < 対し て 実際 に デー タ 転 送 
を 行 な ら 。 


REWRITE ス テー トメ ント 


REWR TI TE ステ ー ト メン ト は , UPDATE ファ イル 内 の レコ ー 
ド を 置き 換え る 働き を する 。 SEQUENTIAL UPDATE フ 
ァイル の 場合 は , REWRITE ステ ー ト メン ト は , その ファ イル 
か ら 読 み と ら れ 友 最後 の レ ュ ー ド を 書き 直す こと を 指定 する 。 し た 
が っ て , レコ ー ド は , 書き 直し を する 前 C, 読ん で むか を けれ ば な 
ら な い 。 DIRECT UPDATE ファ イル の 場合 は , レコ ー ド は , 
先 C 読 まれ て いる か どう か は 関係 な く , 書き 直す こと が で きる 。 


LOCATE ス テー トメ ント 


LOCATE ス テー トメ ント は , OUTPUT SEQUENTI AL 
BUFFERED ファ イル の 場合 に だ け 使 用 する こと が で きる 。 と の 
ステ ー ト メン ト は け , 出力 緩衝 域 の 中 で , 基底 付 変数 の た め の 記 憶 域 
を 割り 振り , 緩衝 域内 に 割り 振っ た 位置 に ポイ ンタ ー を セッ ト す る 。 
と の あと , と の ポイ ンタ ー を 使用 し て 割 振り を 参照 する こと より , 
デー タ を 緩衝 域 (C 移 動 す る と と が で きる 。 論理 レロ ュー ド の ブロ ッ ク 
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全体 が 緩衝 域 の 中 C あ る 場合 は , ブロ ッ ク は 出力 装 思 (C 転 送 さ れる 。 
DELETE ス テー トメ ント 


DELETE ス テー トメ ント は , UPDATE ファ イル 内 の レコ ー ド 
を 削除 する と と を 指定 する も る の で ある 。 


転送 ステ チー トメ ント の オプ ショ ン 


レコ ー ト 方 式 の デー タ 転 送 ス テー トメ ント で 使用 で きる オプ ショ ン 
は , ファ イル の 属性 お よび 結び つけ られ る デー タ ・ セ ッ ト の 性 質 
よっ て 異な を る 。 各々 の タイ プ の ファ イル で 使用 で き る 組合 せ の すべ 
て の リス ト が , と の 章 の 後 の 方 に ある 図 1 2.5, 1 2.6, お よび 
1 2.7 (C 示 し て ある 。 


各々 の オプ ショ ン は , キー ワー ド の 後 C 値 を つけ た も の か ら な っ 
て いる 。 と の 値 は , ファ イル 式 , 変数 , また は 式 を 括弧 で 囲ん だ も 
の で ある 。 ど の ステ ー ト メン ト の 場合 も , オプ ショ ン は どの よら な 
順序 で 記入 し て も よい 。 


FILE オ プシ ョ ン 


FILE オプ ショ ン は , すべ て の レ ュ ー ド 方 式 ス テー トメ ント の 中 
で 記入 し な けれ ば を ら を な い 。 と の オォ オプション は , その 操作 が 行 を わ 
れる ファ イル を 指定 する る の で ある 。 とれ は , キー ワー ド FILE 
の 後に , 括弧 で 胃 ん だ ファ イル 式 を つづ け て 記入 する と いう 形 に な 
っ て いる 。 と の セク ショ ン の 個々 の ステ ー ト メン ト の 説明 の と と ろ 
(CC, FILE オプ ショ ン の 例 が 示し て ある 。 


INTO オ プシ ョ ン 


INPUT ま た は UPDATE フ ァイル 人 対す る READ ステ ー ト メ 
ント の 中 で , INTO オプ ショ ン を 使用 する と と が で きる 。 INTO 
オプション は , 論理 レコ ー ド が 読み 込ま れる 変数 を 指定 する も の で 
ある 。 


READ FILE (DETAIL ) INTO (RECORD_1): 


こと これ は , 次 の 順番 の レヒ ュー ド を RECORD_1 と いう 9 変数 (C 読 み 込 
な と と を 指定 し て いる 。 


INTO オプ ショ ン は , 長 さ の 変わ る 要素 スト リン グ 変 数 を 指名 
する と と が で きる 点 人 注意 し て いた だ きた い 。 その ファ イル K 対 
し て , ENVI RONMENT 属 性 の SCALARVARYING オプ 
ショ ン が 指定 され て いる と き は , スト リン グ ・ デ ー タ の 長 さ を 指定 


する 2 バイト の 接頭 語 が 各 レ コー ド K 含 まれ て いる も の と みな され 
る 。 (以下 の IFROM オブ プ ション] の 項 を 参照 。 ) 


SCALARVARYING オプ ショ ン が 指定 され を か っ た と き は , 
入力 の 場合 , コン バイ ラー は , レコ ー ド の 長 さ か ら ス トリ ング の 長 
さ を 計 算 し , それ を 2 バイト の 接頭 主として つけ る 。 長 さ の 変わ る 
スト リン グ の 場合 は , と の 計算 の 結果 , 長 さ は 8 の 倍数 (C 切 り 上 げ 
られ る の で , 計算 され た 長 さ が , 宣言 され た 最大 の 長 さ より も 大 き 
く を る と と も ある 。 


FROM オ プシ ョ ン 


OUTPUT ま た は DIRECT UPDATE フ ァイル 対す る 
WRITE ステ ー ト メン ト の 中 で は , FROM オプ ショ ン を 使用 し 
を な けれ ば を ら な を い 。 また, UPDATE ファ イル 対す る 
REWRTI 和 TE ステ ー ト メン ト の 中 で も 使用 する こと と が で きる 。 
FROM オプ ショ ン は , レコ ー ド が そ と か ら 書 き 出 され る 変数 を 指 
定 す る も の で ある 。 


FROM オ ォ オプ ショ ン は , 長 さ の 変わ る 要素 スト リン グ 変 数 を 指名 
する と と が で きる 点 K と 注意 し て いた だ きた い 。FROM ォ プシ ョ ン 
を も つ WRITE ステ ー ト メン ト を 使用 する と き は , 長 さ の 変わ る 
スト リン グ の 現在 の 長 さ だ けが デー タ ・ セ ッ ト K 転 送 さ れる が , 長 
さ を 指 定 す る 2 バイ ト の 接頭 語 が つけ られ る と と も ある 。 と の 接頭 
語 は , その ファ イル KK 対し て BNVI RONMENT 属性 の 
SCALARVARYING オプ ショ ン が 指定 され て いる と き に だ け , 
つけ られ る 。 


SEQUENTIAL BUFFERED UPDATE ファ イル の 
場合 は , REPWRITE ス テー トメ ント の FROM オ プシ ョ ン を 省略 
する と と が で きる 。 最後 の レコ ュー ド が , INTO オプ ショ ン を も つ 
READ ステ ー ト メン ト ( て よっ て 読ま ほれ た 場合 は , FROM を も た 
を い ぃ い REWR TI TED は , データ ・ セ ッ ト 内 の レコ ュー ド K 対 し て 何 の 影 
響 も も た を い が , 最後 の レコ ー ド が , SET オ プシ ョ ン を も つ 
READ ステ ー ト メン ト (C よ っ て 読ま れ た 場合 は , 行なわ れ た 何ら 
か の 割当 て に よっ て , レコ ー ド は 緩衝 域 の 中 で 更新 され , デー タ ・ 
セッ ト K 書 き 戻 され る 。 


WRITE FILE (MASTER ) FROM (MAS_REC): 
REWRITE FILE (MASTER) FROM (MAS REC): 


上 の ステ ー ト メン ト は 両方 と も , 変数 MAS_REC の 値 が ファ イル 
MASTERK 書 き 出 され る と と を 指定 し て いる 。 WRITE ステ 
ー メ ント の 場合 は , SEQUENTTIAL OUTPUT ファ イル の 
中 の 新しい レコ ュ コード を 指定 レ し て い る 。 REEWRITE ステ ー ト メン 
ト は , SPQUENTIAL UPDATE ファ イル か ら 読ま れ た 最 
後 の レ コー ド を , MAS_REC (C よ っ て 置き 換え る と と を 指定 し 
て いる 。 


SET オ プシ ョ ン 


READ ステ ー ト メン ト ま を た は LOCATE ス テー トメ ント で , SET 
オプション を 使用 する と と が で きる 。 と れ は , READ 操作 中 (て デ 
ー タ が 入れ られ た 綾 衝 域 の 中 の 位置 , また は LOCATE ステ ー ト 
メン ト 低 よっ て 割り 振ら れ た 緩衝 域内 の 位 千 を 指す よう , 指名 さ 
れ た ポイ ンタ ー 変 数 を セッ ト す る よう 指定 する も る の で ある 。 


READ FILE(X) SET (P): 


と の ステ ー ト メン ト は は, 緩衝 域 の 中 (に ある 次 の 大 番 の レコ ー ド の 位 
置 (C, ポイ ンタ ー 変 数 P の 値 を モ セット する よら 指定 する も の で ある 。 
LOCATE ス テー トメ ント の 中 で SET オ プシ ョ ン が 省略 され て い 
る 場合 は , その レコ ー ド 変数 と いっ し ょ K 宮 言 さ れ て いる ポイ ンタ 
ー が セッ ト さ れる 。 


長 さ の 変わ る 要素 スト リン グ 変 数 を 転送 する 場合 は , その ファ イ 
ル 多 対し て SCALARVARY TNG オプション を 指定 し を な けれ ば を 
ら な いと と 注意 し て いた だ きた い 。 


IGNORE オプ ショ ン 


SEQUENTIAL INPUT また は SEQUENTIAL 
UPDATE ファ イル 対す る READ ステ ー ト メン ト の 中 で , 
IGNORE オプ ショ ン を 使用 する と と が で きる 。 と の オォ プション 
は , スキ ッ プ し て 無視 すべ き レコ ー ド の 数 を 指定 する 整数 値 を も つ 
式 を 指定 する も る の で ある 。 式 の 値 が 負 ま た は ゼロ の と き は , レコ ー 
ド は スキ ッ プ され な い 。 


READ FILE (IN) IGNORE (3 ぅ ): 


と の ステ ー ト メン ト は , ファ イル の 中 の 次 の ろう つの レコ ー ド を スキ 
ッ プ する よら 指定 し て いる 。 


READ ステ ー ト メメント, INTO, SET,. お よび IGNORE 
オプ ショ ン の いずれ も が 含ま れ て い を いと きけ は, IGNORE(1) 
と み を され る 。 


KEY オプ ショ ン 


KEY オプション は , INDEXED, REGIONAL, また は 
VS AM 編成 の デー タ ・ セ ッ ト と 結び つけ られ た KEYED ファ イ 
ル 《 対 し て だ け 適用 され る 。( レ ュー トド 方 式 の 転送 で 使用 で き る デー 
タ ・ セ ッ ト 編 成 の タイ プ に つい て は , と の 章 の 後 の 方 の 「 デー タ ・ 
セッ ト 編 成 ] の 項 で 説明 する 。 ) と の オプ ショ ン は , キー ワー ド 
KEY の 後 C 括 弧 に 入れ た 式 (文字 スト リン グ 定 数 , 変数 また は そ 
れ 以 外 の 要素 式 の いずれ で も よい ) を つづ けん た 形 (C す る 。 必要 な ら , 
式 が 評価 され , 文字 スト リン グ 変 換 さ れる 。 文字 スト リン グ の 長 
さ ぉ および それ が 表わす も の 関す る 規則 に つい て は , と の 章 の 後 の 
方 の 「 INDEXED 編 成 | な ょ よび 「REGTIONAL 編成 ]」 の と と 
ろ で 説明 する 。 
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KEY オォ オプション は , 特定 の レコ ュー ド を 識別 する る の で ある 。 と 
の オプ ショ ン は , INPUT ま た は は UPDATE ファ イル 対す る 
REBAD ステ ー ト メン ト の 中 , また は DIRECT UPDATE フ 
ァイル 対す る REWRTITE ステ ー ト メン ト の 中 で 使用 する こと 
が で きる 。 (結び つけ られ た デー タ ・ セ モッ ト の 編成 が , INDEXED 
で ある か , また は キー の 順 (C 並 べら れ た VS AM 編成 の 場合 だ け は , 
SEQUENTTAL フ ァイル (CC 対す る READ ステ ー ト メン ト の 中 
で , KEY オプ ショ ン を 使用 する と と が で きる 。 ) 


READ FILE (STOCK) INTO (ITEM) 
KEY (STKEY): 


と の ステ ー ト メン ト は け は, 変数 STKEY の 女 字 ス トリ ング 値 (て よっ 
て 識別 され る レコ ュー ド を , 変数 I TEM (読み 込む と と を 指定 する 
も の で ある 。 


KEYFROM お よび KEYTO オ プシ ョ ン 


KEYFROM お よび KEYTO オ ォ オプ ショ ン は , INDEXED, 
REBGIONAL, また は VSAM 編 成 の デー タ ・ セ モッ ト と 結び つけ 
られ た KEYED ファ イル (だ け 適 用 され る も の で ある 。 各々 の オォ 
プシ ョ ン は , KEYFEROM ま た は KEYTO と いう キー ワー ド の 後 
括弧 入れ た 式 を つづ ける 形 に を な っ て いる 。 KEYFROM の 場 
合 の 式 は , 文字 スト リン グ 定 数 , また は その 他 の 要素 式 に する と と 
が で きる 。 必要 な を なら ば , 式 は 評価 され , 文字 スト リン グ 人 変換 され 
る 。 KEYTO の 場合 の 式 は , 長 さ が 2 5 5 ベイ ト 以 下 の 廊 字 ス ト 
リン グ 変 数 で を けれ ば を ならない 。 文字 スト リン グ の 長 さ な よび それ 
ら が 表わし て いる も の 関す る 規則 CC つい て は , 以下 の 
「INDEXED 編 成 ]」 な よび 「REG1ONAL 編 成 」 の 項 で 述べ る 。 


KDYFPROM オプ ショ ン は , デー タ ・ セ ッ ト 上 の 該当 レコ ュー ド 
を 議 別 する キー を 指定 する も る の で ある 。 と の オォ オプション は , 

REG IONAL 編 成 の SEQUENT IAL OUTPUT フ ァイル , 
DIRECT UPDATE ファ イル , DIRECT OUTPUT ラフ 
ァイル 対す る WRITE ステ ー ト メン ト , ま を た は LOCATE ス 
テー トメ ント の 中 で 使用 する こと が で きる 。 


WRITE FILE (LOANS) FROM (LOANREC) 


KEYFROM (LOANNO ): 


と の ステ ー ト メン ト は , LOANREC の 値 を 1 つの レコ ラー ド と し 
て ファ イル LOANS の 中 (書き 出す と と , LOANNO の 文字 ス 
トリ ング 値 を , 後 で その レコ ュー ド を 取り 出す た め の キ ー と し て 使用 
する と と を 指定 し て いる 。 


KEYTO オプ ショ ン は , レコ ー ド の キー を 読み 込む 変数 の 値 を 
指定 する る の で ある 。 と れ は , SEQUENTIAL INPUT ま 
た は SEQUENTTIAL UPDATE ファ イル KC す る READ 
ステ ー ト メン ト の 中 で 使用 する と と が で きる 。 
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READ FILE (DETAIL ) INTO (INVTRY ) 
KEYTO (KEYFLD): 


と の ステ ー ト メン ト は , ファ イル DETAIL の 中 の 次 の レコ ー ド 
を 変数 INVTRY(C 読 み 込 むと こと, お よび その レコ ー ド の キー は 変 
数 KEYFLDC 読 み 込 むと と を 指定 し て いる 。 


EVENT オ プシ ョ ン 


EVENT オプ ショ ン は , キー ワー ド EVENT の 後 K 括 弧 C 入 れ 
た 事象 変数 の 名 前 を つづ け て 書く 形 に を っ て いる 。 ( EVENT オォ 
プシ ョ ン の 中 名 前 を 記入 する と , それ は , 事象 変数 を 文脈 的 < 宮 
言 し た と と C を る 。 ) CONSECUTIVE, REGIONAL, また 
は VS AM 編成 の UNBUFFERED フ ァイル , また は すべ て の 
DIRECT フ ァイル (ファ イル が VSAM の キー 順 の 編成 の と き は 
UNBUFFERED ) KC 洛 する READ, WRITE, また は 
REWRI TB ステ ー ト メン ト の 中 (人 C, と の オプ ショ ン を 記入 する と と 
が で きる 。 VSAM キー 順 の 編成 の UNBUFFERED フ ァイル に 
対す る DEBLETE ステ ー ト メン ト の 中 に も , と の オプ ショ ン を 記 
人 人 する と と が で きる 。 


EVENT オプ ショ ン は , 入出 力 操作 を 非同期 的 に 行 を うと と ( つ 
まり , その 間 に 他 の 処理 が つづ けら れる と と ) , ぉ よび 同じ 事象 変 
数 を 指定 する WAIT ステ ー ト メン ト が 実行 され る ま で, 入出 力 条 
件 (UNDEFINEDFLLE を の ぞ く ) を 起 さ を いと と を 指定 す 
る も の で ある 。 た と えば げ , 


READ FILE (MASTER) INTO (REC_VAR) 
EVENT (RECORD_1): 


WAIT (RECORD_1) : 


READ ステ ー ト メン ト の オプ ショ ン の 中 の 式 が 評価 され 終る と , 

入力 操作 が 開始 され る 。 と の あと すぐ と, 後 の ス テー トメ ント が 実 
行 さ れる 。 制御 が WAIT ステ ー ト メン ト K 達 する まで , RECORD, 
TRANSMI T, KEY, また は ENDF ILE 条 件 は 起 ら を い 。 

WAIT ステ ー ト メン ト が 実行 され た と きん 入力 操作 が 完了 し て い 
な い 場 合 , ぉ よび 4 つの 条件 が 1 つも る 起 っ て いな い 場 合 は , 操作 が 
完了 する まで , その 先 の ステ ー ト メン ト の 実行 は 延期 され る 。 操作 
が 正しく 完了 する と , WAIT ステー トメ ント の すぐ 後に ある ステ 
ー ト メン ト か ら 処 理 が 続行 され る 。 READ ステ ー ト メン ト を 実行 
し た 結果 , 4 つの 条件 の いずれ か が 起 っ て いる 場合 は , WAIT ス 
テー トメ ント が 実行 され た と き (, その 条件 が ひき 起 さ れる 。 と の 
コン ペイ ラー を 使っ た 場合 は , TRANSMIT と RECORD 条 件 
だ けが , 同時 C 起 り 得 る 。 TRANSMIT は , つね 最初 (と 処理 さ 
れる 。 そ の あと , 実行 され た オン ・ テ ユニ ッ ト か ら 正 常に 戻る と , 

WAIT ステ ー ト メン ト の すぐ 後 の ス テー トメ ント か ら , 処理 が 続 
行 さ れる 。 EVENT ォ オプ ショ ン は , 非同期 処理 を 指定 する も の で 
は ある が , 4 つの 条件 は いずれ も , WAIT ステ ー ト メン トト よっ 


て 処理 と 同期 され る ま で, 割込み を 起す と こと は で き な い 。 


1 つの ファ イル K 対 する 未 解 決 の 入出 力 操作 は , 1 つ し か 許さ れ 
を いと と 注意 し て いた だ きた い 。 あ る ファ イル KK 対す る 前 の 入出 
力 操作 が まだ WAIT され て いな いう らち, 同じ ファ イル 対し て 
入出 力 操作 を 開始 し ょ うと する と , ERROR 条件 が 起 と る 。 


EVENT オプ ショ ン を も つ ス テー トメ ント が 一 旦 実 行 され た 後 
は , その オプ ショ ン の 中 で 指名 され た 事象 変数 は , 活動 状態 に ある 
と みな され る 。 これ が 活動 状態 に ある 間 は , 同じ 事象 変数 を 再び 
EVENT オプ ショ ン の 中 で 指定 する と と は で き な いら 。 事象 変数 は , 
対応 する WAIT ステ ー ト メン ト が 実行 され ん た あと , また は ファ イ 
ル が 閉じ られ た と きた, 非 活動 状態 戻る 。 


DISPLAY ス テー トメ ント で も , EVENT オ ォ オプション を 使用 
する と と が で きる 。 


完了 値 と 状況 値 


事象 変数 は , 2 つの 別々 の 値 を も っ て いる 。 事象 が 完了 し て いる か 
どら か を 示す 完了 値 , お よび 事象 が 正常 (C 完 了 レ し た か どう か を 示す 
状況 値 の 2 つ で ある 。 完了 値 は , 1 つの ビット で ある が , 状況 値 は , 
省略 時 解釈 の 精度 ( 1 5 , 0 ) を も る つ 固 定 2 進数 で ある 。 非同期 式 
の 入出 力 操作 が 実行 され る と , 完了 値 は '「0' B(「 未 完了 | を 表 
わす ) に セッ ト さ れ , 状況 値 は ぞ ロ (「 異 常 た な く 完了 | を 表わす ) 
(C セ キッ ト さ れる 。 非同期 式 の 入出 力 操 作 が 完了 し , 関連 する WAIT 
ステ ー ト メン ト が 実行 され る と , 完了 値 は 「1' BC セッ ト さ れ , 

さら (, 非同期 式 入出 力 操作 を 実行 し た 結果 , 入出 力 条件 が 引き 起 
され た と き は 事象 変数 の 状況 値 は 1 (「 異 常 終了 ] )C モ ッ ト さ れ 
る (まだ その と き ゼ ロ で あっ た な ら ば )。 完了 値 は , 

C OMPLET1ION 組 込み 関数 に よっ て と り 出 す と と が で きる し , 

さら K 非 活動 状態 の 事象 変数 の 場合 は , COMPLETION 擬 似 変 
数 に よっ て セッ ト す る と と が で きる 。 状況 値 は , STATUS 組 込み 
関数 C よ ょ っ て 得る と と が で きる し , STATUS 擬似 変数 CK ょ っ て 
セッ ト す る と と が で きる 。 


処理 モー ド 


レコ ー ド 方 式 の 転送 で は , ブロ グラ マー 対し て , デー タ の 取扱 い 
関し て 2 つの 方 法 が 提供 され て いる 。 プログラマー は , 宣言 され 
た 記憶 域 の 中 で デー タ を 処理 する と と が で きる が , と の 方 法 で は , 
デー タ が 実際 に 主 記憶 域 の 中 へ ( ま た は 外 へ ) , 直接 的 に ある い は 
緩衝 域 を 通っ て 移動 され る の で , 移動 モー ド と 呼ば れる 。 も ら 1 つ 
の 方 法 で は , プロ グラ マー は , デー タ が 緩衝 域 の 中 (C あ る 間 (C 処 理 
する と と が で きる (つまり, 宣言 され た 記憶 域 C デ ー タ を 移動 し た 


い ) 。 と の 場合 は , デー タ 転 送 ス テー トメ ント を 実行 する と , 緩衝 
域 の 中 で レコ ュー ド 割 り 振 られ た 記憶 域 の 位置 が 識別 さん る だ け 
を の で , 位置 指定 モー ド と 呼ば れ る 。 位置 指定 モー ド は , 
BUFFEBREBD フ ァイル の 場合 に だ け 使 用 可能 で ある 。 ど ちら の モ 
ー ド が 用 いら れる か は , ブロ グラ マー が 使用 し て いる デー スタ 転送 ス 
テー トメ ント と オプ ショ ン て よっ て 決ま る 。 


移動 モー ド 


移動 モー ド で は , READ ステ ー ト メン ト が 与え を られ る と , レコ ー 
ド は , 外部 記憶 装置 か ら , INTO オプ ショ ン で 指名 され て い 々 る 変 
数 < 転送 され る ( BUFFERED ファ イル が 使用 3 され て いる と き は , 
入力 緩衝 域 を 通っ て ) 。 WRITE また は REWRITE ス テー トメ 
ント が 与え られ る と , レコ ー ド は , FROM オプ ショ ン で 指名 され 
て いる 変数 か ら 外 部 記憶 装置 (c 転 送 さ れる ( 多分 , 出力 緩衝 域 を 通 
っ て )。 INTO お プシ ョ ン お よび FROM オプ ショ ン で 指名 する 
変数 は , どの よら な 記憶 域 有 クラ ス の も の で あっ て も よい 。 


次 の 例 ( 図 1 2.1 示さ れ て いる ) に ついて, 考え て み 5。 
NEXT: RFAD FILE(IN) INTO(DATA) : 


WRITE FILE(OUT) FROM (DATA) : 
GO TO NEXT: 


最初 CREAD ステ ー ト メン ト が 実行 され た と き は , ファ イル IN 
(CC 結び つけ られ た デー タ ・ セ ッ ト か ら 入 力 緩衝 域 C 1 つの プロ ッ ク 
が 転送 され , その ブロ ッ ク の 最初 の レコ ー ド が 変数 DATA (移動 
され る 。 さらに その 後 で READ ステ ー ト メン ト が 実行 され る と , 
連続 する レコ ー ド が 緩衝 域 か ら DATA (移動 され る 。 緩 衝 域 の 中 
(C あ っ た すべ て の レコ ー ド の 処理 が 終っ た と き は , 次 の READ ス 
テー トメ ント が 与え られ る と , 新しい ブロ ッ ク が デー タ ・ セ ッ ト か 
ら 転送 され る が , 大 抵 の 場合 , 実際 に は 代替 の 緩衝 域 の 中 に ある 新 
し い レ コー ド が アク セス され , デー タク 転送 と 処理 の オー バー ラッ プ 
が で きる よう (て な っ て いる 。 WRITE ステ ー ト メン ト の 場合 も , 
出力 緩衝 域 の 中 (物理 レ ュ ー ド が 作成 され , 緩 笑 城 が いっ ぱい に な 
る た びと ファ イル OUT と 結び つけ られ た デー タ ・ セ ッ ト 転送 さ 
れる , と いう より らし て 同様 の 方 法 で 実行 され る 。 


移動 モー ド は , 緩衝 域 の 境界 合せ の 問題 が な な い の で , 位置 指定 モ 
ー ド より も 使い 方 が 簡単 で ある 。 さ ら (C て また , 同じ ヒレ ュー ド の 内 容 
を 何 回 も 参照 する と いう 場合 は , 位置 指定 モー ド で 使用 され る 間接 
テ ド レス 指定 の 技法 の と き 生じ る よう を オー バー ヘッ ド が な い の 
で , 実行 時 間 も 速 く な る と と も ある 。 
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緩衝 域 


変数 
(DATA ) 


図 1 2.1 


入力 
緩衝 域 


番 多 3 番目 の 
WRITE WRITE WRITE 


入力 と 出力 : 移動 モー ド 


最初 の | 2 番目 の |3 番 目 の 
READ| READI READ 


最初 の |2 番 目 の | 3 番目 の 


WRITE 


ITEY WRITE 


図 1 2.2 位置 指定 モー ド の 入力 , 移動 モー ド の 出力 
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位置 指定 モー ド 


位 信 指定 モー ド で は , 基底 付 変 数 を 使用 する 必要 が ある 。 緩衝 域 の 
中 の デー タ 基 底 付 変数 を 効果 的 に オー バー レー する と と が で きる 
の で , それ ぞ れ KK 同じ ポイ ンタ ー を 結び つけ る と と に よっ て , 異な 
る 基底 付 変数 を 用 いて 同じ データ を アク セス する と と が で きる 。 し 
た が っ て , 同じ ヒレ データ を 別 の 方 法 で 解 和 収 する と と が で きる わけ で あ 
る 。 位置 指定 モー ド は , 自己 定義 の レコ ー ド を 読む た めも 使用 す 
る と と が で き る 。 と の 場合 は , レ ュ ー ド の 一 部 分 に ある 情報 を 用 い 
て , レコ ー ド の 残り の 部 分 の 構造 が 表示 され る 。 た と えば , と の 情 
報 は . サ プ フ ィ ー ル ド の 操 返 し の 回 数 の カウ ント で あっ て も よい し , 
レコ ー ド を 解釈 する た め に どの クラ ス の 構造 を 使用 すれ ば よい か を 
示す コード で あっ て も よい 。 


REPAD ステ ー ト メン ト が 与え られ る と , デー タ ・ セ ッ ト か ら 入 
力 緩 笑 城 に C1 プロ ッ ク の デー タ が 転送 され (必要 を ら ), さら K, 
組 衝 域 に と ある 次 の レコ ー ド の 位置 を 指す よう , SET オ プシ ョ ン で 
指名 され て いる ポイ ンタ ー 変 数 が セッ ト さ れる 。 と の あと , レコ ー 
ド 内 の デー タ は , と の ポイ ンタ ー 変 数 と 結び つけ られ て いる 基底 付 
変数 を 参照 する と と (C ょ っ て , 処理 する と と が で きる 。 と の レコ ュ コー 
ド は , 同じ ファ イル を 参照 する 次 の READ ステ ー ト メン ト か 実行 
され る まで の 間 だ け , 使用 可能 で ある 。 


LOCATE ステ ー ト メン ト が 与え られ る と , 基底 付 変数 に 対す 
る 記憶 域 が 出力 緩衝 域 の 中 に 割り 振ら れ , 割り 振ら れ た 記憶 域 
を 識別 する ボイン ター が セッ ト さ れる 。 その 結果 , 基底 付 変数 は , 
それ KC 割り 当て られ た 値 を も つよ うな る 。 同じ ファ イル K 対 し て 
次 の LOCATE, WRITE, また は CLOSE ス テー トメ ント が か が 与 
えら れる と , 必要 を なら 出力 緩衝 域 の 中 の デー タ が デー タ ・ セ ッ ト 
転送 され る 。 


位置 指定 モー ド で は , デー タ の 移動 が 少 を く , また 記憶 域 も 少な 
く て すむ の で , 移動 モー ド の 場合 より も 実行 時 間 が 速く な る と と が 
多い 。 し か し , と の モー ド は 充分 注意 し て 使用 し な けれ ば な ら な い 。 
と とく, ブロ グラ マー は , 緩衝 域 の 中 で デー タ が どの よう 境界 合 
せ さ れ て いる か , 構造 の デー タ が どの よう な マッ プ に を っ て いる か 
と いら とこ と 注意 し な けれ ば な ら な い 。 構造 の マッ プ お よび デー タ 
の 境界 合せ に つい て は , K 節 「 デ ー タ マッ プ の 作成 」 の と と ろ で 説 
明 す る 。 


図 1 2.2 は , SEQUENTTI AL ファ イル 対す る 以下 の 例 を 図 
示し た も の で ある が , と と で は , 入力 対し て は 位 罰 指定 モー ド , 
出力 に 対し て は 移動 モー ド が 使用 され て いる 。 


DCL DATA BASED(P): 
NEXT: READ FILE(IN) SET(P): 


WRITE FIiLE(OUT) FROMCDATA):: 
GO TO NEXT: 


最初 に CREAD ステ ー ト メン ト か 実行 され る と , ファ イル INK 結 
び つ けら れ た デー タ ・ セ ッ ト か ら 入 力 緩衝 域 に 1 つの ブロッ ク が 転 
送 さ れ , 緩衝 域 の 中 の 最初 の レコ ー ド を 指す よう , ポイ ンタ ー 変 数 
P が セッ ト さ れる 。 と の あと , 変数 DATA また は ポイ ンタ ーPKC 
よっ て 修飾 され た その 他 の 基底 付 変数 を 参照 する と , 実際 に, と の 
最初 の レコ ュー ド を 参照 する と と に を る 。 さらに と の あと , READ 
ステ ー ト メン ト を 実行 する と , 緩衝 域 の 中 の 後続 の レコ ー ド を 指す 
よら ポイン ター 変数 P が セッ ト され る 。 緩衝 域 の 中 に ある すべ て の 
レコ ー ド の 処理 が 終る と , 次 の READ ステ ー ト メン ト は , デー タ 
・ セ ッ ト か ら , 新しい ブロ ッ ク を 転送 する 。 


上 の 例 の 中 で , 入力 と 出力 の 両方 と 位 國 指 定 モ ー ド を 使用 し た と 
し て も る , 効率 が 上 が る か どう か 交わ し い 。 入力 移動 モー ド を 使用 
し , 出力 位置 指定 モー ド を 使用 する 方 法 $ ある 。 た と えば げ , 


DCL DATA BASED(P): 


NEXT: LOCAT DATA FILE(OUT): 
READ FILE(IN) INTO(DATA): 


GO TO NEXT: 


LOCATEB ス テー トメ ント が 実行 され る た びに K, 基底 付 変 数 DATA 
を 新しく 割り 振る た め K 出 力 緩衝 域 の 中 (< 記 憶 域 が 確保 され , と 
の 記憶 域 を 指す よう ポイ ンタ ー 変 数 P が セッ ト さ れる 。 最初 
READ ステ ー ト メン ト が 実行 され る と , ファ イル INK 結び つけ 
られ た デー タ ・ セ ッ ト か ら 入 力 緩 衛 域 に ブロ ッ ク が 転送 され , ブロ 
ッ ク の 中 の 最初 の レコ ー ド が DATA の 最初 の 割 振り (割り 当て ら 
れ る 。 そ の あと READ ス テー トメ ント が 実行 され る と , 後続 の 
論理 レコ ュー ド が , その と き の DATA の 割 振り (< 割り 当て られ る 。 
緩 衛 城 の 中 に ある すべ て の レコ ー ド の 処理 が 終る と , 次 の READ 
ステ ー ト メン ト に て よっ て 新しい ブロ ッ ク が デー タ ・ セ ッ ト か ら 転 送 
され る 。 各 レ コー ド は , READ ス テー トメ ント を 実行 し て か ら 次 
(CLO0A 和 TB ステ ー ト メン ト が 実行 され る まで の 間 , 使用 する と 
と が で きる 。 出力 緩衝 域 の 中 に 使用 可能 を スベ ペース が な を なくなっ た と 
き は , 次 の LOOATE ス テー トメ ント が 実行 され る と , ファ イル 
OUTK 結 び つ けら れ た デー タ ・ セ ッ ト に C ブ ロッ ク が 転送 され , 新 
し い 緩 衝 域 が 割り 振ら れる 。 
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READ ステ ー ト メン ト が ENDFEILE 条件 に な っ た と き は , フ 
ァイル が 閉じ られ る と き 転送 され る 緩衝 域 が ファ イル OUT KC 割 
り 振 られ て いる は ず で ある こと 注意 し て いた だ きた い 。 


ENVIRONMENT 属性 


ENVIRONMENT 属 性 は . ファ イル 結び つけ られ る デー タ ・ 
モッ ト の 物理 的 を 編成 関す る 情報 を 指定 する も る の で ある 。 と の 情 
報 は , 括弧 (入れ た オプ ショ ン ・ リ スト 人 入れ る 。 一 般 形 式 は 次 の 
通り で ある 。 


ENVIRONMENT (オプ ショ ン ・ リ スト ) 


レコ ー ド 方 式 の 転送 適用 され る オプ ショ ン は は, 以下 の 通り で あ 
る 。 


MEDIUM (記号 装置 名 ( , 物理 装置 タイ プ 〕 ) 
[FUNCTION(a〔(,b])〕 
[ASSOCIATE( フ ァ イ ッ 名 ) 〕 
CRCE]〕 
[ OMR〕 
[COLBINJ 
[STACKER(n)〕 
(FIFBIVIVBIDIDBIU) 
[ RECSIZE( レコ ュー ド の 長 さ ) 〕 
[ BLKSIZE( ブ ロッ ク ・ サ イズ ) 〕 
[BUFFERS({112})〕 
CONSECUTIVE 

INDEXED 


REGIONAL({113)) 
VS AM 


[PASSWORD( バス ワー ド 指 定 ) 〕 
[LEAVEJ〕 

[UNLOADJ〕 

[NOTAPEMK 〕 

[NOLABEL) 


(VERIFYj) 

(EXTENTNUMBER((n)〕〕) 

し INDEXMULTIPLE) 
HIGHTINDEX(231112314123211333013340 ) ] 
(OFLTRACKSCn)〕 


し GENKEY〕 


[CTLASAJ] 
[CTL360) 


LCOBOL〕 
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LINDEXAREA( 索 引 区 域 サ イズ ) 〕 
[ NOWR TI TE 〕 
し ADDBUFEF(n)〕 


[SCALARVARYING〕 
[KEYLENGTH(n ) 〕 
[KEYLOC(n)〕 
[LASCII〕) 
[BUFOFE((n)〕)〕 


1 0 進 整定 数 の 引数 を 必要 と する ENV1IRONMENT 属 性 の オォ オプ 
ショ ン の 殖 ん どの も の 関し て ( ブロ ッ ク ・ サ イズ や レコ ー ド の 長 さ , 
を ど ) , 定数 また は 変数 を 使用 する と と が で きる 。 
EXTENTNUMBER お よび BUFFERS オ ォ オプ ショ ン の 場合 は , 
定数 が 必要 で ある 。 と の 場合 の 変数 は , FIXED BINARY 
(31,0 ) と STAT1IC 属性 を も も , 添字 や 修飾 を つけ て い を い 
も の で を な けれ ば な ら を い 。 


これ ら の オプ ショ ン は , どの よう な 順 で 記入 し て も よい が , プラン 
ク で 区 切る 。 オ プシ ョ ン 自 体 は プラ ンク を 含ん で いて は な を なら な い 。 


と れ ら の オォ オプション に つい て , 以下 KK 説明 する 。 
装置 タイ プ (MEDIUM) 
VS AM ファ イル の 場合 を の ぞい て , PL プ ] の 各 フ ァイル の 宣言 で 
は , MEDIUM オプション を 指定 し を けれ ば な を ら な い 。 と の オプ 


ショ ン に つい て は , 第 1 0 章 「 入 力 と 出力 」 の と と ろ で 許し く 説 明 
し て ある 。 


装置 の 機能 (FUNCTION) 


FUNCTION オ プシ ョ ン は , 3 5 2 5 で 実行 され る 機能 を 指定 す 
る も の で ある 。 こ と の オプ ショ ン に つい て は , 第 1 0 章 「 入 力 と 出力 | 
の と と ろ で 説明 し て ある 。 


ASSOCIATE オ プシ ョ ン 
ENVIRONMENT 属 性 の ASSOCIATE オ ォ オプ ション は , 1 BM 
3 5 2 5 で 複数 操作 を 行なう ( た と えば , 読取 り の の ち X 孔 ) と 
と が で きる よら (て す る も の で ある 。 必要 な 操作 ど と に 1 つ ず つ フ ァ 
イル を 宣言 し , ASSOCIATE ォ オプション を 使っ て , いく つか の 
ファ イル を 与 い (て 「 結 び つ ける 」 。 


ASSOCIATE オ プション は , 次 の よう な 形式 を し て いる 。 


ASSOCIATE( フ ァイル 名 ) 


1 "ファ イル 名 ” は , 同じ 外部 プロ シー ジャ ー の 中 で 宣言 され 
た ファ イル 定数 で を けれ ば な を なら な い 。 


2. MEDIUM オプ ショ ン の 中 で 指定 する 装置 タイ プ は , 
3525 か 3 ぅ 5 2 5 和 T で を けれ ば な ら な い 。 


3 MEDIUM オプ ショ ン の 中 で 指定 する 論理 装置 は , 
SYSLST, SYSIP 穫 また は SYSPCH で あっ て は を ら な 
い 。 


4. ファ イル は , RECORD 属 性 を も っ て いな を な けれ ば な ら な い 。 


5.、 カー ド の 読取 り ま た は 宇 了 C 用 いら れる ファ イル KK 対し て , 
明示 的 (て C, また は 省略 時 解 息 に より , BUFFERS(1) を 
指定 し な けれ ば を ならない 。 


6 結び つけ られ る いく つか の ファ イル の セッ ト 作 対応 する 2 番 
目 の オ ベラ ント と いっ し しょ, FUNCTION オ プシ ョ ン を 
使用 し な けれ ば な ら な い ( 第 10 章 「 入 力 と 出力 」 を 参照 ) 。 


ファ イル は , | 読取 一 光 也 一 印刷 一 読取 」 の 順に 結び つけ を けれ 
印刷 する た め の 3 つ の ファ イル 人 対す る 宣言 を 示 し た も の で ある 。 


DCL READ FILE RECORD INPUT 


ENV(…FUNCTION(R,RPW), ASSOCIATE(PUNCH)… 


PUNCH FILE RECORD OUTPUT 


ENV(…FUNCTION(P,RPW), ASSOCIATE(PRINT)… 


PRINT FILE RECORD OUTPUT 


ENV(…FUNCTION(W,RPW), ASSOCI ATE(READ か ・): 


結び つけ られ た ファ イル の セッ ト K 対 する 入出 力 操作 は , ファ イ 
ル が 結び つけ られ た た 順 (C 行 を わな けれ ば を ら な い 。 上 の 例 C あ げた 
3 つの ファ イル の 場合 , 正 し い 順序 は 次 の 通り で ある 。 


READ FILE (READ) も 
WRITE FILE (PUNCH) eo: 
WRITEB FILE (PRINT) …… の の の lo: 


ブロ グラ マー は , 正しい 順序 が 守ら ちら れ て いる か どう か 確認 し なけ 
れ ば な ならない 。 た だ し , と の 順序 (と 印刷 操作 が 含ま れ て いる 場合 は 
ゼロ ( 印刷 操作 を 省略 ) か ら , その 装置 で 許さ れる 最大 の 数 ( 2 か 
ら 2 5 ) ま で 何 回 で も , 印刷 操作 を 連続 し て 行なう り と と が で きる 。 


入 ノ 出力 の 順序 の 最初 の ファ イル は , 味 示 的 開い て も よい の 。 残 
り の ファ イル は , 結び つけ られ た ファ イル の いずれ か (対し て 操作 
が 行なわ れる 前 明示 的 に 開か を けれ ば な ら な い 。 


結び つけ られ た ファ イル の セッ ト K 対 し て 行 を われ る すべ て の 入 
出力 操作 が 完了 する 前 (C, 結び つけ られ た ファ イル の いずれ か が 閉 


じ ら れ る と と の な いよ うら, ブロ グラ マー は 確認 し な けれ ば な ら な い 。 
と の よう な 理由 か ら , 位置 指定 モー ド の 入出 力 を 使用 し て いる と き 
は , 結び つけ られ た ファ イル の セッ ト を 閉じ る た め (C, 複数 閉止 の 
ステ ー ト メン ト を 使用 する と よい 。 


読取 桁 抑制 ( RCE) 


ENV1IRONMENT 属 性 の RCE オ プシ ョ ン は , 350 5 また は 
3 5 2 5 (C よ る 。 カー ド 桁 の 選択 的 を 読取 り を 指定 する も る の で ある 。 
と の オォ オプション を 使用 する 場合 は . その プロ グラ ム C よ っ て 読み 取 
られ る カー ド ・ デ ッ ク の 最初 の カー ド は , RCE 形 式 記述 カー ド で 
を けれ ば な ら な い 。 形式 記述 カー ド の 形式 は , と の コン バイ ラー を 
対す る プロ グラ マー の 手引 書 で 説明 され て いる 。 


1 MEDIUM オプ ショ ン で 指定 する 装置 タイ プ は , 3505, 
3525, ま を は 3525T で を けれ ば な ら な い 。 


2. MEDIUM オプ ショ ン で 指定 する 論理 装置 は , SYSIPT 
で あっ て は な を ならない 。 


3 光学 式 マ ー ク 読取 操作 ( OMR ) を 指定 し て は を ら な い 。 
光学 式 マ ー ク 読取 (OMR ) 


ENVIRONMENT 属 性 の OMR オ ブ プション は , 3 5 0 5 て よっ 
て , 標準 の 8 0 桁 カ ー ド の 中 の マー ク を 光学 的 読み 取る と と を 指 
定 す る る の で ある 。 と の オプ ショ ン を 使用 し て いる と き は , その プ 
ログ ラム (て よっ て 読み 取ら れる カー ド ・ デ ッ ク の 最初 の カー ド は , 
OMR 形式 記述 カー ド で を けれ ば な ら な い 。 形式 記述 カー ド の 形式 
は , と の コン バイ ラー の ブロ グラ マッ ー の 手引 書 で 説明 され て いる 。 


1. ファ イル は , RECORD 属 性 を も ね っ て いな けれ ば な を ならない 。 


2. 明示 的 , また は 省略 時 解釈 と エ っ て , BUFFERS(1) を 
指定 し を けれ ば な ら な いら 。 


3 MEDIUM オプ ショ ン の 中 の 装置 タイ プ は , 3505 で な 
けれ ば な ら な い 。 


4. 読取 桁 抑制 オプ ショ ン ( RCE ) を 指定 し て は を ら を い 。 
80(EBCD1IC の と き ) ま た は 1620 (カラ ム ・ バ イナ リー の 
と き ) より 小さ い ブ ロッ クサ イズ ( BLKSIZE ) が 指定 され ん てい 
る と き は , ブロ ッ ク サ イズ 人 は, 8 0 また は 1。 0 の どちら か 適当 な 
方 変更 され る 。 
カラ ム ・ バ イナ リー(COLBIN) 
ENV 1I RONMENT 属 性 の COLBIN オ プシ ョ ン は ,3505 ま 


た は 35 25C エ っ て 処理 され る カー ド の デー タ は , カラ ム ・ ズ ベイ 
ナリ ー 形 式 で 収容 さん て いる と と を 指定 する も る の で ある 。 
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1 ファ イル は , RECORD 属 性 を も っ て いな けれ ば な ら な い 。 


2. MEDIUM オプ ショ ン の 中 の 装置 タイ プ は , 350 5, 
3525, また は け は 3525T で な けれ ば を な ら な らい 。 


3 FEUNCTION ォ オプション で , 塞 孔 翻訳 ( FUNCTION 
(P , [) ) また は 書 出 し (FUNCTION (w) ) を 指定 
し て は を ら な い 。 
スタ ッ カ ー 選 択 (STACKER) 
ENVIRONMENT 属 性 の STACKER オ プシ ョ ン は , 3505 
また は 3525 の どの スタ ッッ カー カー ド を 落す か を 指定 する も の 
で ある 。 と の オプ ショ ン は , 次 の よら みか 形式 を し て いる 。 


STACKER(n) 


BINARY STAT1IC 変数 で ある 。 


1. MEDIUM オプ ショ ン で 指定 する 装 罰 タ イプ は , 3505, 
3525, また は 3525T で な けれ ば な ら な いら 。 


2. FUNCTION オ ォ オプ ション で 書 出 し (FUNCTION() ) 
を 指定 し て は を ら な い 。 


3 n は , 1 また を は 2 の どちら か で を な けれ ば な ら な い 。 


STACKEBR オプ ショ ン が 指定 され て いな いと き は け , 
STACKER( 1 ) と みな を なさ れる 。 


レコ ー ド 形式 オプ ショ ン 


レコ ー ド の 形式 は , 次 に あげ る 7 つの 形式 の いずれ か に する と と が 
で き る 。 


固定 長 : F 非 ブ ロッ ク 化 
FB ブロ ッ ク 化 
可変 長 V 非 プ ロッ ク 化 


VB ブ ョ ロッ ク 化 


D 非 ブ ロッ ク 化 
(「ASCTI デー タ ・ セ ッ ト 」 を 参照 ) 


DB デブ ロック 化 
(|「ASCI IT デー タ ・ モ セッ ト | を 参照 ) 


不定 長 : U ブロ ッ ク 化 する こと は で き な い 。 
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レコ ー ド の プロ ッ キ ング お 上 よび デ プ ブロッキング は け は, 自動 的 《C 行 を わ 
れる 。 


どの 形式 の も る の で あっ て も , レコ ー ド は すべ て , デー タ ・ ズ ベイト 
と , 任意 選択 の 制御 バイ ト か ら 構 成 さ れ て いる 。 可変 長 レ コー ド ほ に 
は , レコ ー ド と ブロ ッ ク の 長 さ を 指定 する た め の 制 伯 バ イト が 含ま 
れ て いる 。 こと これら の 制 件 バイ ト の 用 法 に つい て は , と の あと で 説明 
する 。 さら, どの レ ュ ー ド も (形式 の 如何 を 問わ ず ) 任意 選択 に 
より , 最初 の データ ・ バ イト (印刷 また は 機械 制 件 娘 字 を 入れ て おぉ 
く と と が で きる 。 と の 文字 は , プロ グラ マー が 自分 で 押入 し な けれ 
ば を た ら ず , また , ENVIRONMENT 属 性 の CTLASA また 
は CTL360 オプ ショ ン を 用 いて , この よら な 文字 が ある と と を 
表示 し な けれ ば な ら な い 。 


どの 形式 の レコ ュー ド の 場合 も , SCALARVARYTING オプ ショ 
ン ( と の あと , 説明 する ) を 指定 する と と が で きる 。 最初 の バイ ト 
印刷 また は 機械 制御 文字 が 含ま れ て いる と き は , と の オプ ショ ン 
を 指定 する と と は で き な い 。 指定 する と , こと の バイ ト の 解 邊 が 不明 
確 C な を る 。 


固定 長 レ コー ド 


デー タ ・ セ ッ ト の 中 の レコ ー ド は すべ て , 同じ 長 さ で ある 。 


F 形式 : レコ ー ド は ブロ ッ ク 化 され て いな い 。 1 つの レ ュ コー 
ド が 各々 1 ブロック を 構成 し て いる 。 

F B 一 形式 : レコ ー ド は ブロ ッ ク 化 され て いる 。 ブロ ッ ク の ある 
も の は け は, 短 ブ ロッ ク ( 指定 され た プロ ッ ク ・ サ イズ よ 
り 短い ) で あっ て も よい 。 

可変 長 レ コー ド 


答 レコ ー ド の 長 さ は , 異な っ て いて よい 。 


レコ ー ド は ブロ ッ ク 化 され て いな い 。 1 つの レ ュ コー 
ド が それ ぞ れ , 1 ブロ ッ ク を 構成 し て いる 。 各 レ コ 
ー ド は 次 の も の か ら な っ て いる 。 


V 一 形式 : 


4 ベイ ト の 制御 ベイ ト 


デー タ ・ ズ ベイ ト 


4 バイ ト の 制 伯 バイ ト (C は , レコ ー ド の 長 さ ( 4 バ 
ィ ト の 制御 バイ ト $ 含 め て 現在 の レコ ュー ド の 長 さ ) 
が 和信 っ て いる 。 と の 値 は 自動 的 に 挿入 され る の で , 
プロ グラ マー は , 何 $ 処 置 を と る 必要 は ない 。 さら 
(て , 4 バイ ト の 余分 の 制 倒 バ イト が , ブロ ッ ク の 先 
頭 に 入れ られ る 。 とれ ら の バイ ト (て は , すべ て の 制 
伯 バ イト も 含め た ブロ ッ ク サ イズ が 含ま れる 。 と の 


値 は , 同じ よう に し て レコ ュー ド の 長 さ 挿入 され 


る 。 
VB- 形 式 レコ ー ド は ブロ ッ ク 化 され て いる 。 各 レ コー ド は , 
次 の も の か ら 構 成 さ れる 。 
4 ベイ ト の 制御 バイ ト 
デー タ ・ ベ イト 
4 バイ ト の 制御 バイ ト は , V 一 形式 レコ ュー ド の 場 
合 と 同じ 目的 を も ねっ て いる 。 さら, ブロ ッ ク は , 
V 一 形式 レロ ー ド の 場合 と 同様 , プ ブロック ・ サ イズ 
用 と し て 4 バイ ト の 余分 を 制作 バイト を も っ て い 
る 。 
ASC IT I デー タ ・ ャ ッ ト 」 の 項 を 参照 
デー * ss 誠 昌 。 
DB 形式 : d 
不定 長 レ コー ド 


処理 は すべ て , プロ グラ マー の 責任 に な いて 行なわ れる 。 レコ ー ド 
の 中 KK 長 さ を 指定 する 必要 が あれ ば , プロ グラ マー が 準備 し , 解釈 
し を けれ ば な ら な い 。 


RECSI1ZE オ プシ ョ ン 


RECSIZE オ プシ ョ ン は , レコ ー ド の 長 さ を 指定 する も の で ある 。 
と れ は , 次 の も の の 合計 に を る 。 


1. デー タ 人 必要 な 長 さ 。 可変 長 な よび 不定 長 レ ュー ド の 場合 は , 
最大 の 長 さ に する 。 


2. 必要 を 制御 バイ ト 。 可変 長 レ ュー ド の 場合 は , レコ ュー ド の 長 
さ 用 に 4 バイ ト 必 要 。 固定 長 な ょ び 不 定 長 レ コー ド の 場合 は 
不要 。 


レコ ー ド の 長 さ は , 1 0 進 整 定数 , また は FIXED BINARY 
(31,.0) STATIC 属 性 を も つ 変 数 と し て 指定 する と と が で 
きる 。 


と の 値 は , 次 の 規則 人 C 従 2。 
本 6 固定 長 よ び 不 定 長 : 3 2.7 60 ベイト 


可変 長 : 32.7756 ベ イト 
ASCIT デー タ ・ セ ッ ト で は , 最大 2299 


ゼロ の 値 ・ 省略 時 解釈 の 処置 が と られ る ( 「 レ ュー ド 形 式 の 省 
略 時 解釈 | の 項 を 参照 ) 。 
負 の 値 : UNDEFINEBDE ILE 条件 が 起 と る 。 


BLKSIZE オ プシ ョ ン 


BLKST ZD オ プシ ョ ン は , デ ー タ ・ セ ッ ト 上 の 最大 の プロ ッ ク サ 
ィ ズ を 指定 する も の で ある 。 プ ロッ ク の 長 さ は , 次 の も の の 合計 
な る 。 


1. 次 の いずれ か の 合計 の 長 さ 
1 個 の レコ ー ド 
数 個 の レコ ー ド 


可変 長 レ ュー ド の 場合 は , レコ ュー ド の 長 さ 用 の 制御 バイ ト 
( 4 ベイ ト ) を 各 レ コー ド の 長 さ 含め る 。 


2. 上 の ほか (必要 な 制御 ベイト, また は ブロ ッ ク 接 頭 五 バイ ト 
( ASCII デー タ ・ セ ッ ト の 場合 ) 。 可変 長 ブロ ッ ク 化 レ 
コー ド の 場合 は , ブロ ッ ク ・ サ イズ 用 (C 4 バイ ト 必 要 。 固定 長 
ぉ よび 不定 長 レ コー ド で は 不要 。 


BLKS 1IZE の 値 は , 1 0 進 整定 数 , また は FIXED 
BINARY(31,0) STAT1IC 属 性 を も つつ 変数 と し て 指 
定 す る と と が で きる 。 


と の 値 は , 次 の 規則 ( 従 2。 
最大 : 32,.760 ベ イト (接頭 語 の 長 さ の 値 を も た 


を い BUFOFEF が 指定 され て いる ASCTTI 
デー タ ・ セ ッ ト の 場合 は , 2222) 


ゼロ の 値 : 省略 時 解 釈 の 処置 が と られ る ( と の あと の 
[「 レコ ー ド 形式 の 省略 時 解 釈 」 の 項 を 参照 ) 。 
負 の 値 : UNDEF INEDF ILE 条件 が 起 と る 。 


ブロ ッ ク ・ サ イズ と レコ ー ド の 長 さ の 関係 は , レコ ー ド 形式 C よ っ て 
壮 を る 。 


F B 一 形式 プロ ッ ク ・ サ イズ は , レコ ー ド の 長 さ の 倍数 で 
な けれ ば を な ら な い 。 
VB 一 形式 ブロ ッ ク ・ サ イズ は , 次 の 合計 と 同じ か それ 以 


上 で な けれ ば な を ならない 。 


レコ ー ド の 最大 の 長 さ 


4 ベイ ト の 制御 バイ ト の 長 さ 
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プ ブロッ クサ イズ は , 次 の も の の 合計 と 同じ か 
それ より 大 きい も の で を けれ ば ならない 。 


DB 形式 


レコ ー ド の 最大 の 長 さ 


ブロ ッ ク 接 頭 語 ( つい て いる 場合 ) の 長 
さ 


注 : VSAM デー タ ・ セ ッ ト ( こと の 章 の 後 の 方 で 説明 する ) KK 結 
び つ けら れる ファ イル の 場合 に , 使用 で き る 唯一 の レコ ュー 形式 オ 
プシ ジョ ン は , RECSTIZE だ け で ある (デー タ ・ セ ッ ト の 実際 の 
レコ ー ド ・ サ イズ と 一 致し て い を けれ ば な を ならない ) 。 その ほか の も 
の (つま り , BLKSIZE オプ ショ ン , お 上 び プ ロッ キン グ の タ 
イプ を 示す 各種 の 文字 の 組合 せ ) は , 指定 し て も 無視 され る 。 


レコ ー ド 形式 の 省略 時 解釈 


レコ ー ド 形式 の オプ ショ ン が 何 も 指 定 さ れん て いな い 場 合 は , 次 の 処 
置 が と られ る 。 


レコ ー ド 形式 : エラ ー・ メ ッ セ ー ジ が 出さ れる 。 


ブロ ッ ク サ イズ また どちら か 一 方 が 指定 され て いる と き は , 指定 


は レコ ー ド 形式 : され た オォ オプション か ら , 他方 の 値 が 推測 され 
る ( 制 人 バ イト また は 接頭 語 バ イト が あれ ば , 
それ ら が 加え られ た り , 引か れ た りす る )。 
どちら も る 指定 され て い を いと きけ は , 
UNDEFEINEDFILE 条件 が 起こ る 。 

緩衝 域 の 割 振り 


緩 衛 域 は . デー タ ・ セ モット と の 間 で 転送 され る デー タ の 中 間 的 を 記 
憶 域 と し て 使用 され る 主 記 憶 域 で ある 。 緩衝 域 を 使用 する と , 
SEQUENTTI AL ファ イル の 処理 の 速度 を 上 げ る と と が で きる 。 
組 衝 域 は , レコ ー ド の 自動 的 を プロ ッ キ ング お よび デ プ ロ ッ キン グ 
や , 位置 指定 モー ド の 転送 に と っ て , 重要 を 意味 を も っ て いる 。 


BUFFERS オ プシ ョ ン 


BUFFERS オ プシ ョ ン は , データ ・ セ ッ ト 割 り 振ら れる 緩衝 
域 の 数 を 指定 する も る の で ある 。 こと の 数 は , 1 また は 2 で な けれ ば な 
ら な い 。 順次 アク セス を する CONSECUTIVE また は 
INDEXED RECORD ファ イル の 場合 は , 省略 時 解釈 に ょ り 
2 つの 緩衝 域 が 与え を られ る が , ユー ザー が と れ を 1 変え る と と も 
で きる 。 と れ 以 外 の レコ ー ド ・ フ ァイル の 場合 は すべ て , 省略 時 解 
釈 は 1 で あり , ユー ザー が とこ と れ を 変え る と と は で き な い 。 
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デー タ ・ セ ッ ト 編 成 


デー タ ・ モ ッ ト の 編成 方 式 の 如何 C に よって, デー タ ・ セ モッ ト ・ ポ ボリ 
ュー^ ム (デー タ が どの よら 記録 され る か , また , 後 で デー タ を プ 
ログ ラム 人 転送 する た め C に どの よう らし て 取り 出す か , と いら と と 
が 決ま る 。 レ コード は , 連続 する 物理 的 を 位置 また は 論理 的 な 位置 
を も と て し て 順次 的 に , また は デー タ 転 送 ス テー トメ ント の 中 で 指 
定 さ れ て いる キー を 用 いて 直接 的 に , デー タ ・ セ ッ ト K 有 貯え られ た 
り , そ と か ら 取 り 出 され た りす る 。 と の よう な 貯え か た , 取り 出し 
か た と し て , PL プ I に は , 4 つの 一 般 的 を デー タ ・ セ ッ ト 編 成 方 法 
が ある 。 と の 4 つ は , CONSECUTIVE, INDEXED, 
REG TONAL, お よび VSAM で , デー タ ・ セ ッ ト 編 成 が 指定 さ 
れ て いな いと き は , 省略 時 解 息 に よ エ っ て CONSECUTIVE とみ 
を され る 。 


CONSECUTIVE 編 成 の デー タ ・ セ ッ ト の 場合 は , レコ ー ド 
は , それ ら の 連続 する 物理 的 を 位置 だ け を も と し て 編成 され て ぉ 
り , 順次 的 を 順序 で だ け 取 り 出さ れる ( キー は 使用 され な い ) 。 
INDEXED デ ー タ ・ セ モッ ト の レコ ー ド は , 各 々 の レコ ー ド 結び 
つけ られ た キー に し た が っ て 論理 的 を 順に 並べ さら れ て いる 。 レコ ー 
ド は , キー の 昇順 に 並ん で ふり, デー タ ・ セ ッ ト の 中 (は 索引 が 継 
続 さ れ て いて , レコ ー ド の 取出 し C 用 いら れる 。REGCTIONAL 編 
成 の デー タ ・ セ ッ ト は , いく つか の 区 域 C 分 割 さ れ て いる 。 と の 区 
域 の 各々 は , 区 域 番号 に よっ て 議 別 され , それ ぞ れ 1 個 以上 の レ ュ 
ー ド が 入れ られ て いる 。 取出 し の 際 (C は , 指定 され た キー(C よ っ て 
区 域 番号 が 与え られ , そ と か ら レ コー ド の 探索 が 始め られ る 。 


CONSECUTIVE デ ー タ ・ モ セ モット は , 3 つの タイ プ の 中 で は け は, 
作成 や 使用 の 方 法 が 最も 簡単 な る の で あり , 外部 記憶 装置 の 必要 量 
が 少 を いと いら 利点 を も っ て いる 。 しかし, CONSECUTIVE 
デー タ ・ セ ッ ト の レコ ー ド は , 現在 並ん で いる 性 序 で し か 更新 する 
と と が で きず , レコ ー ド を 挿入 し た いと き は , 新しい デー タ ・ セ ッ 
ト を 作ら を けれ ば を ら な い 。 磁気 テー プ の 場合 , 更新 の 方 法 は サポ 
ー ト され て いな い 。 


INDEXED デ ー タ ・ セ ッ ト は , 順次 的 C 作 成 し を な けれ ば な ら な 
い が , 一 旦 出 来 上 っ た あと は , ラン ダム な 取出 し , 更新 , 追加 が 可 
能 で ある 。 INDEXED デー タ ・ モ セット を 順次 的 CK 処理 し た 場合 
は , その 中 の レコ ー ド が 物理 的 を 順 (C 取 り 出さ れる と は 限ら な い の 
で , と れ と 相当 する CONSECUTIVE デ ー タ ・ セ ッ ト の 場合 ェ 
りゃ , 速度 が 遅く な る 。 さら (C て また , ラン ダム (て アク セス する 場合 
も , INDEXED デー タ ・ セ ッ ト で は , レコ ー ド を 探し 当て る た 
め 索 引 を 探索 し な けれ ば な を な ら を い の で , REGTIONAL デー タ ・ 
セッ ト (くらべ て 効率 が 悪 @b。 と の ほか C, INDEXED デー タ 
・ セ ッ ト の 短所 と し て , CONSECUTIVE デ ー タ ・ セ ッ ト よ り 


る 補助 記憶 装置 の スペ ー ス が 余計 必要 で ある と と や , 順次 処理 を す 
る と き で も , 複数 ボ が リ ュー ム ・ デ ー タ ・ セ ッ ト の 場合 は すべ て の ボ 
リュ ー ム を の せ て お か を けれ ば な を な ら を いと と , が あげ られ る 。 


REGIONAL デ ー タ ・ セ ッ ト は , 直接 的 に アク セス し た と きけ は , 
INDEXED デー タ ・ セ ッ ト の 場合 より も 速い が , 順次 的 に 処理 
する と , レコ ー ド は ラン ダム な 順 (C 提 示さ れる と い 2 う 短所 を も っ て 
いる 。 順次 的 を 取出 し の 順序 は , 必ず し も レコ ュー ド が 提示 され る 順 
序 と は 一 致し を た いし, また 相対 的 を キー の 値 と 関係 を も っ て いる 必 
要 も な を い 。 REGIONAL デ ー タ ・ セ ッ ト で は , レコ ー ド を ブロ ッ 
ク 化 する と と は で き な い 。 


注 : キー ワー ド VSAM は , その ファ イル が VSAM デー タ ・ モ 
ッ ト ( と の 章 の 後 の 方 で 説明 する ) 結び つけ られ る と と を 表示 す 
る た め K 使 用 され る 。VSAM デー タ ・ モ ッ ト は , キー 順 ま た は エ 


ント リー 用 の どちら か の 編成 に な っ て いる 。 通常 , と れ ら の 編成 は , 


PL ノン T の INDEBXED ぉ よび CONSECUTIVE 編成 に それ ぞ 
れ 対 応 する 。 


PASSWORD オ プシ ョ ン 


PASSWORD オ プシ ョ ン は , VSAM デ ー タ ・ セ ッ ト と 結び つけ 
られ る ファ イル 対し て だ け 使 用 され る 。 VSAM デー タ ・ セ ッ ト 
が シス テム 対し て 定義 され る と き ( て (アク セス 方 式 サ ービス の 

DEFINE 指令 を 用 いて ) , READ お よび UPDATEE ベ バス ワー 
ド を と れ に 結び つけ る と と が で きる 。 そ の あと で , と の デー タ ・ セ 


ッ ト を アク セス する た め ( 使 用 され る PL プ I フ ァイル の 宣言 の 中 と , 


該当 する バス ワー ド を 含め た けれ ば な ら な い 。 と の オプ ショ ン の 形 
式 は , 以下 の 通り で ある 。 


PASSWORD( パス ワー ド の 指定 ) 


と と で , バス ワー ド の 指定 は , 文字 スト リン グ 定 数 また は 
STATIC 属 性 を も つ 文 字 ス トリ ング 変数 で ある 。 と の 文字 スト リン グ 
は , 8 桁 に た る よら 補 わ れ た り , 切り 捨て られ た り し た 上 で , 検 
査 の た め VSAM 渡さ れる 。 正しい パス ワー ド を 指定 する た め の 
チャ ンス が 何 回 みか , シス テム ュ 操 作 員 (C 対 し て 与え られ る 。 許さ れる 
チャ ンス の 回 数 は , デー タ ・ セ ッ ト を 定義 する と き ( 指 定 する 。 と 
の 回 数 ま で 試行 が ろう まく ゆか な いと , UNDEEINEDFEILE 条 
件 が 起 と る 。 


入出 力 操作 の 最適 化 


一 般 C, 入出 力 操 作 は , コン バイ ル さ れ た コード か ら 呼 び 出 され た 
ライ プラ リー・ サ プル ー チ ン ( と て よって, 行 を われ る 。 し か し , ある 
特定 の 条件 の も る と で は , コン バイ ラー は , と の よう な 操作 を 実行 す 
る た め の イ ン ラ イン ・ コ ー ド を 作り , ライ ブラ リー 呼出 し の ォ ー 
バー ヘッ ド を 節減 する と と も で きる 。 と の よう な 場 合 は , 入出 力 ス 


テー トメ ント の 実行 速度 は 相当 速く を る 。 


イン ライ ン で 実行 され る 入出 力 ス テー トメ ント の 場合 ., アク セ 
ス ま た は 作成 され る デー タ ・ セ モッ ト は CONSECUT IVE で を け 
れ ば な ら ず , 使用 され る ファ イル は , SEQUENTT AL, 
BUFFERED, の 両 属性 と , INPUT ま た は OUTPUT の どちら か 
の 属性 を も つ , 非 ズ ラメ ー タ ー の ファ イル 定数 で を けれ ば を ならない 。 
ENVIRONMENT 属 性 で は , SCALARVARYING オプ ブシ 
ョ ン ( 可変 長 ス トリ ング が 転送 され る 場合 ) , な お よび Fー, FBー-, 
また は け は U-ー レ コー ド 形 式 の いずれ か の オォ オプ ション を 指定 し な けれ ば 
を ら な い 。 し た が っ て , ファ イル の 宣言 は 以下 の よう て な る 。 


DCL F FILE RECORD SEQUENTI AL BUFFERED 
INPUTIOUTPUT ENV(CONSECUTIVE 
FIFBIU [SCALARVARYING 〕 
[RECSIZE(xx)〕[BLKSIZE(xx)〕): 


標準 の 省略 時 解釈 の 属性 と オプ ショ ン (C は け は, 下線 が 引い て ある 。 

下線 の ある 属性 の うら 最低 1 つ は 指定 し を けれ ば を ら な い 。 指定 し 
を いと , 省略 時 解 息 に と エ っ て , ファ イル KC は STREAM 属性 が 与 
えら れる 。 


ファ イル を 印刷 する と き は , 印刷 - 窪 也 制 件 オプ ショ ン CTLASA 
また は CTL360 の どちら か る も, ENVI RONMENT 属 性 で 指 
定 し な けれ ば を ならない 。 


READ SET ス テー トメ ント は , U- 形 式 レ コー ド を 転送 する 
た め CBACKWARDS 属 性 が 使用 され て いる 場合 を の ぞい て , つ 
ね (C, イン ライ ン ・ コ ー ド よっ て 実施 され る 。 それ 以外 の レ ュ 
ー ド 入出 力 ス テー トメ ント , すなわち READ INTO, WRITE 
FROM, ぉ お よび LOCATE の 場合 は , 次 の 条件 (C 合 っ て いる と き 
は , イン ライ ン ・ コ ー ド が 生成 され る 。 


1. レコ ー ド 変数 の 宣言 に し, スト リン グ の 長 さ , 配列 の 限界 , ま 
た は エリ ア ・ サ イズ が 含ま れ て いる 。 


2. Fー ま た は FB- 形 式 レ コー ド の と き は , レコ ー ド ・ サ イズ , 
また は U- 形 式 レ コー ド の と きけ は ブ ロッ クサ イズ が , 
ENVIRONMENT 属性 で , 指定 され て いる 。 


入出 力 ス テー トメ ント を 実施 する た め C, イン ライ ン ・ コ ー ド 
が 使用 され て いる 場合 は , コン バイ ラー が 情報 メッ セージ を 出す 。 


INDEXED デ ー タ ・ セ モッ ト を アク セス する 際 (, 
INDEXAREA, NOWR 1I TE, ぉ よび ADDBUFE オプ ショ 
ン を 用 いる と と (よって, 入出 力 操作 の 速度 を 上 げ る と と が で きる 。 
詳細 (と つい て は , と の 章 の 後 の 方 の 「 デ ー タ 管理 の 最適 化 」 の と こと 
ろ で 説明 する 。 
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磁気 テー プ の 取扱 い オ プシ ョ ン 
LEAVE オ プシ ョ ン 


LEAVE オプ ショ ン は , ファ イル を 開く と きま た は 閉じ る と き K, 
巻 戻 し 操作 を 行なわ な いと と を 指定 する た め に 用 いら れる 。 と の ォ 
プシ ョ ン は , BACKWARDS 属 性 を も つ フ ァイル KK 対し て 与え ら 
れる も の で あり , それ 以外 の 場合 は , テー プ は 巻き 戻さ れる 。 


UNLOAD オ プシ ョ ン 


UNLOAD オ プシ ョ ン は , フ ァイル を 閉じ る と き テ ー プ を 巻き 戻 
し て , アン ロー ド す る と と を 指定 する た め に 用 いら れる 。 


NOTAPEMK オプ ショ ン 


テー プ ・ フ ァイル 対し て NOTAPEMK オプ ショ ン を 指定 する 
と , ブロ グラ マー は , ラベ ル な し の テー プ ・ フ ァイル 上 の デー タ ・ 
レコ ー ド の 前 先行 テー プ ・ マ ー ク が 書か れ を いよ うに する と と が 
で き る 。 そ の 結果 ., その デー タ ・ セ ッ ト は , ASC TI 1 デー タ ・ セ 
ッ ト の 場合 を の ぞい て , 逆 方 向 の 読取 り が 不可 能 ( て を る 。 


NOLABEL が 指定 され て いる テー プ OUTPUT ファ イル 
対し て , NOTAPPEMK を 使用 する と と が で きる 。 
UNBUFFERED フ ァイル 対し て と の オプ ショ ン を 使用 する と 
と は で き な い 。 


NOLABEL オプション 


NOLABEL オプ ショ ン は , 磁気 テー プ ・ フ ァイル 対し て , フ 
ァイル ・ ラ ベル の 処理 を し を いと と を 指定 する た め に 用 いら れる 。 


出力 ファ イル 対し て NOLABEL オプ ショ ン が 指定 され て い 
る と , ENVIRONMENT 属 性 の 中 で , NOLABEL の ほか 
NOTAPEMK オ ォ オプション が 指定 され て い を い の 限 り , テー プ ・ マ ー 
ク が , テー ブ 上 の 最初 の レコ ー ド と し て 書か れる 。 標準 外 ラ ベル ぉ 
よび 追加 の テ ユー ザー・ ラ ベル は , 処理 され ない 。 


直接 アク セス 装置 の 用 法 
VERIFY オ プシ ョ ン 
VERTITY オ プシ ョ ン は , 書 出し 操作 が 行なわ れる た びに その あと 


で 読取 チェ ッ ク を 行なう ら と と を 指定 する も る の で ある 。 と の オォ プシ ョ 
ン は , 直接 アク セス 装置 の 場合 C に だけ 許さ れる 。 こ とこ れ は , 2321 
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と 対 し て 想定 され る 。 
EXTENTNUMBER オ プシ ョ ン 
EXTENTNUMBER オ ォ オプ ション は , REG TIONAL ま た は 


INDE 区 ED デー タ ・ セ ッ ト 多 対 し て 用 いら れる エク ステ ント の 数 を 
指定 する も の で ある 。 


REGTIONAL デ ー タ ・ セ ッ ト の 場合 は , EXTENTNUMBER 


2 5 6 より 小さ いも の で な けれ ば を ならない 。 n の 省略 時 解釈 は 1 で 
ある 。 


INDEXED デ ー タ ・ セ ッ ト の 場合 は , EXTENTNUMBER 
( n ) は 任意 選択 で ある 。 指定 する と き は , n の 値 (は , すべ て の 
デー タ 域 エク ステ ント , マス ター 索引 お よび シリンダー 索引 ェ エクス 
テン ト (互い (と 隣り 合っ て い を けれ ば な を ならない ), お よび すべ て の 独 
立 オ ー バ ー フ ロー・ エ クス テン ト を 含め を な けれ ば な を ならない 。 マ スタ 
一 索 引 と シリ ンダ ー 索 引 は , それ ぞ れ 別 の EXTENT ジュン 利和 飼 
ステ ー ト メン ト を 必要 と する が , 1 つの エク ステ ント と し て 数 える 。 
し た が っ て , 指定 する と と の で きる 最低 の 数 は , 2 で ある ( 1 個 の 
主要 デー タ 域 (C 対 し て 1 つの エク ステ ント , シリ ンダ ー 索 引 C 対 し 
て 1 つ )。 n の 最高 値 は 2 5 5 で , 省略 時 解釈 の 値 は 2 で ある 。 


EXTENTNUMBER オプ ショ ン の 用 法 の さら に くわ し いら 点 に 
つい て は , この コン バイ ラー の プロ グラ マー の 手引 を 参照 の と と 。 


INDEXMULTIPLE オ プシ ョ ン 


INDEXMULTIPLE オプ ショ ン は , INDEXED デー タ ・ 
セッ ト の 場合 に, この ファ イル KK 対し て マス ター 索引 が 作ら れる か , 
また は 作ら れ た こと を 指定 する た め の も の で ある 。 


HIGHINDEX オ プシ ョ ン 


HIGHINDEX オ ォ オプション は , INDEXD デー タ ・ セ ッ ト の 場 
合 に , 高位 の レベ ル の 索引 が , MEDIUM オォ プション で 指定 され 
た 装置 タイ プ と な は 違う 装置 に 入っ て いる と き ( その 装置 の タイ プ 
(2311, 2314, 2321, 3330, ま た は 3340 ) を 指定 
する の 用 いら れる 。 


OFLTRACKS (n ) オプション 
OFLTRACKS(n ) オプ ショ ン は , INDEXED 編成 の 


OUTPUT フ ァイル の 場合 と, 追加 レ ュー ド 用 に 各 シリ ンダ ー 確 
保 さ れる トラ ッ ク の 数 を 指定 する た めし 用 いら れる 。 指定 する 数 は 


ーー 


9 ILIUECL を 印刷 後 の 働 き 印刷 を 伴 を わな いと き の 勿 き 


00000001 印刷 の み ( ス ペー ス な し ) 
M 00001001 0000101 1 行え ペース 
0 00010001 0001001 2 行え ペース 
デ 00011001 0001101 3 行 ス ペー ス 
1 10001001 1000101 チャ ネル 1 ヘ へ スキップ 
2 10010001 1001001 チャ ネル 2 ヘ へ スキ ッ プ 
3 10011001 1001101 チャ ネル 3 ヘス キッ プ 
4 0100001 1010001 チャ ネル 4 へ スネ スキップ 
5 0101001 1010101 チャ ネル 5 ヘス キッ プ 
6 0110001 1011001 チャ ネル 6 へ ヘス キッ プ 
7 0111001 0 年 01 チャ ネル 7 へ スキ ッ プ 
8 1000001 1100001 チャ ネル 8 へ ヘス キッ プ 
9 1001001 1100101 チャ ネル 9 へ ヘス キッ プ 
A 1010001 1101001 チャ ネル 10 ヘ スキップ 
B 鹿本 0 抽 1101101 チャ ネル 11 ヘ スキップ 
ee C 1100001 1110001 チャ ネネ と 12 ヘス キッ グ 
図 12.3 IBM1403 おぉ お ょ び 5203 有 印刷 制 御 コ ュー ド 
行 | 
Y DDO000001 | スタ ッ カ ー1 選 択 2 Br 
W 01000001 スタ ッ カ ー2 選 択 DO0OU11101 3 行 目 (て 印刷 
を し 10000001 スタ ッ カ ー3 選 択 D0100101 4 行 目 (C 印 刷 
こみ 00101101 5 行 目印 刷 
= mo 00110101 6 行 目印 刷 
図 12.4 IBM2540 カ ヵ ー ト 読取 塗 孔 装 置 の 制御 コ ー ド 22 2 笛 目 記 男 避 
01000101 8 行 目印 刷 
- 1001101 9 行 
5 4 
b 1 行 ス ペー ス し て 印刷 01011101 1 1 行 目 印刷 
0 2 行 ス ペー ス し て 印刷 01100101 1 2 行 目印 刷 
還 3 ぅ 行 ス ペー ス し て 印刷 01101101 1 3 行 目印 刷 
1 チャ ネル 1 ヘス キッ プ し た た 後 で 印刷 年 < 仙 訂 害 旧 1 1 4 行 目 印刷 
2 チャ ネル 2 へ スキ ッ プ し た 後 で 印刷 0D1111101 15 行 目印 刷 
に 3 チャ ネル 3 へ スキ ッ プ し た 後 で 印刷 10000101 1 6 行 目 印刷 
4 チャ ネル 4 へ スネ キッ プ し た を 後 で 印刷 10001101 17 行 目印 刷 
5 チャ ネル 5 へ ヘス キッ プ し た 後 で 印刷 10010101 18 行 目印 刷 
6 チャ ネル 6 へ スキ ッ プ し た 後 で 印刷 MMIC 1 行 目印 刷 
7 チャ ネル 7 へ スネ キッ プ し た 後 で 印刷 10100101 2 0 行 目 印刷 
8 チャ ネル 8 へ スキ ッ プ し た 後 で 印刷 人 人 和 
M チャ ネル 9? ヘス キッ プ し 災後 で 印刷 10111101 2 3 行 目 C 印 刷 
A チャ ネル 10 へ スキ ッ プ し た 後 で 印刷 11000101 2 4 行 目 と 印刷 
B チャ ネル 1 1 へ ヘス キップ し 災後 で 印刷 11001101 25 行 目印 刷 
C チャ ネル 12 へ スキップ し た 後 で 印刷 
図 12.5 IBM3525 ヵ ー ド 冠 孔 印 刷 装置 制御 コー ド 図 126 EBM3525 カー ド 宣 印刷 装置 制 側 ー ト 
(CTL360) 
(CTLASA ) 
次 の 範囲 に 上 ある も の で を けれ ば な ら な い 。 0<n<18 上 記 以 外 の 装置 上 に ある と き 
0<n< 8 デー タ ・ セ ッ ト が 231 1 上 に ある と き INPUT ファ イル お よび UPDATE ファ イル の 場合 は , レコ ー 
6 
0<n< 17 デー タ ・ セ ッ ト が 3330 上 (て ある と き 
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ド が 追加 され な けれ ば , と の オプ ショ ン は 無視 され る 。 
印刷 グ 容 孔 の 制御 (CTL360 プ CTLASA) 

印刷 の 宛 孔 の 制 倒 オ プシ ョ ン CTLASA お よび CTL360 は , 
CONSECUTIVE デ ー タ ・ セ ッ ト と 結び つけ られ た OUTPUT 
ファ イル 対し て だ け 用 いら れる 。 と の オプ ショ ン は , レコ ー ド の 
最初 の 文字 を 制御 文字 と し て 解 息 す る と と を 指定 する も の で ある 。 


1 CTLASA オプ ショ ン で は , ANS 制 伯 婦 字 を 指定 する 。 


2. CTL360 オプ ショ ン で は , IBM シス テム ュ グ 36 0 機械 
コー ド 制 件 文字 を 指定 する 。 


上 記 の オプ ショ ン で 使用 で きる コー ド と その 働き が , 図 1 2.3, 
12.4。 12.5, 1 2.6, 12.7 お よび 1 2.8C リ スト し て ある 。 


装置 か ら の CTLASA 
ホッ パー*+ 
で 


慎 層 慎 圭 慎 は 区 区 区 
N く K 良 くく マミ < 


に に に 


+ ホッ ペー 選択 は , FUNCTION オ プション, また は 

ASSGN ステ ー ト メン ト (装置 独立 の ファ イル の 場合 ) の 
どちら か (に よっ て 行 & う 。 ス タッ カー 選択 の 如何 に か か わら 
ず , 2 つの ホッ ペー を 独立 し て 使用 する と と が で きる 。 別 の 
ホッ パー か ら 入 っ た カー ド の 間 で は , 競争 は 行なわ れ な い 。 
(第 1 0 章 の 「 ENVIRONMENT 属 性 ]」 を 参照 の と と 。 ) 


2 5425 を 使用 し て いる と き , また は 使用 中 の 2560 が ス 
タッ カー を 4 つ し か も た な い モ デル で ある と き は , スタ ッ カ 
ー 4 が 用 いら れる 。 


注 : FUNCTION(w) オ プシ ョ ン を も つ RECORD ラ 
ァイル の 場合 は , 2560 で 印刷 制御 文字 を 使用 する こと が で 
き な を ない の で , CTLASA ま た は CTL3 う 60 オ ォ オプション を も つ 
と と は で き な い 。 


図 12.7 IBM2560 ぉ お ょ び 5425 多 能 カ ー ド 処理 装置 制御 
コー ド (CTLASA) 
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Cmse0 =ー 


0001001 スタ ッ カ ー 選 択 


1 1 
1 0010001 スタ ッ カ ー 選 択 2 
1 DO011001 スタ ッ カ ー 選 択 3 
1 0100001 スタ ッ カ ー 選 択 4 
1 0101001 スタ ッ カ ー 選 択 52 
2 1001 ロ 001 スタ ッッ カー 選択 1 
2 1010001 スタ ッ カ ー 選 択 2 
2 1011001 スネ スタッ カー 選択 3 
2 1100001 スタ ッ カ ー 選 択 4 
2 1101001 スス タッカー 選択 5<* 


1! ホッ ペー の 選択 は , FUNCTION オ プシ ョ ン ( て よっ て 行 を 
われ る 。 ス タッ カー 選択 の 如何 C か か わら ず , 2 つの ホッ ズ 
ー を 独立 し て 使用 する と と が で きる 。 別 の ホッ パー か ら 入 っ 
た カー ド の 間 で は 競争 は 行 を われ を い 。 (第 1 0 章 の 

「BNVIRONMENT 属 性 」 を 参照 の と と 。 ) 


5425 を 使用 し て いる と き , また は 使用 中 の 2560 が ス 
タッ カー を 4 つ し か も た な を な い モ デル の と き は , スタ ッ カ ー4 
が 用 いら れる 。 


注 : FUNCTION(w) オプ ショ ン を も つ RECORD フラ 
ァイル の 場合 は , 2560 で 印刷 制御 女 字 を 使用 する と と が で 
き な い の で , CTLASA ま た は CTL360 オ プシ ョ ン を も つ 
と と は で き な い 。 


図 12.8 IBM2560 ぉ ょ び 5425 多 能 カー ト 処 理 装 置 制 伯 
ョ ー ド (CTL3860 ) 


デー タ 交 換 (COBOL ) 


と の COBOL オプ ショ ン は , PL プ 1 で 書か れ た ブロ グラ ム と 
COBOL で 書か れ た プロ グラ ム と の 間 で , デー タ の 交換 を 行なわ せる 
た め の も の で ある 。 と の オプ ショ ン は , ファ イル 結び つけ られ た 
デー タ ・ セ ッ ト の 中 ある 構造 が , COBOL の 算法 に し た が っ て 
マッ プ さ れ て いる と と を 指定 し て いる 。 以下 C 示 す よ うな 制約 が , 
COBOL オプ ショ ン を も つ フ ァイル の 取扱 いて 適 用 され る 。 
COBOL の デー タ ・ タ イプ % 対 応 す る PL 1 の デー タ ・ タ イプ に つい て 
は , 第 1 7 莉 の 「 言 語 間 の 連絡 機能 ] で 説明 する 。 


COBOL オプ ショ ン を も つ フ ァイル は は, READ INTO, 
WRITE FROM, お よび REWRITE FROM ステ ー ト メン 
ト C 対 し て だ け 使用 する と と が で きる 。 ファ イル 名 を 引数 と し て 太 
し た り , ファ イル 変数 (C 割 り 当 て た りす る と と は で き な い 。 転送 さ 
れる 変数 C, 病 字 を つけ て は な ら な い 。 


READ ステ ー ト メン ト の 実行 中 CE ON- 条件 が 起 っ た と き に , 
INTO オ プシ ョ ン で 指名 され た 変数 を オン ・ ユ ニッ ト の 中 で 使用 
する と と は で き な い 。 完了 し た 1 NTO 変数 が 必要 を と き は , オン 
・ ユ ニッ ト か ら 正 常に と 戻っ て か ら に し な けれ ば な を ら な い 。 


EVENT オプ ショ ン は , PL ン T と COBOL の 両方 の 構造 の て 
ッ プ が 全く 同じ で ある (つま り , すべ て の 要素 項目 の 限界 が 同じ し で ある 
る ) と コン バイ ラー が 判断 で き る 場合 に だ け , 使用 する と と が で き 
る 。 マッ プ が 同じ で を な いと き , また は 両方 が 同じ で ある か どう か コ 
ン バ イ ラー に わか ら な を いと き は , COBOL の 算法 に よっ て マッ プ 
され を た レベ ル 1 の 項目 を 表わす 中 間 的 を 変数 が 作ら れる 。 PL ン ] の 
変数 は , WR I TE ステ ー ト メン ト が 実行 され る 前 に と の 中 間 的 た 
変数 割り 当て られ る か , ある い は READ ステ ー ト メン ト が 実行 
され た あと , て の 変数 か ら 割 り 当 て られ る 。 


デー タ 管 理 の 最適 化 
(INDEXAREANOWR ITE プ ADDBUFF ) 


ENVIRONMENT 属 性 の デー タ 管 理 の 最適 化 オ ブ プション は , 
INDEXED デー タ ・ セ モッ ト を アク セス する と き , ある 特定 の 環 
境 の 場合 に プロ グラ ム の 効率 を 上 げ る た め の も の で ある 。 


TNDEXAREA オ プシ ョ ン は , INPUT また は UPDATE 
多 対 し て 開か れ た DIRECT ファ イル の 転送 の 速度 を 上 げ る た め 
の も の で , と の オプ ショ ン が ある と , シリ ンダ ー 索 引 の 全体 また は 
一 部 が 主 記憶 域 C 入 れ ら れる 。 割り 振る サイ ズ は , 次 の も ゃ の で な 
けれ ば なら な い 。 


(m 十 3 )* (キー の 長 さ 十 6) 


と と で 「'm「' は , 主 記憶 域 の 中 (CC 入れ る 索引 エン トリ ー の 数 で ある 。 
(1 つの 索引 エン トリ ー は それ ぞ れ , 1 シリ ンダ ー の デー タ K& 対 応 
し て いる ) 。 す べ て の 索引 が 主 記憶 域 (収容 され る 場合 は , 'm' 

の 値 は デー タ ・ シ リン ダー の 数 ょ り 1 だ け 大 きい も の で を けれ ば な 
ら な い 。 


NOWRT TE オプ ショ ン は , DIRECT UPDATEB フ ァイル 
代 対 し て 使用 され る 。 と の オプ ショ ン は , と の デー タ ・ セ モット は 
レコ ー ド が 追加 され を な いと と , お よび レコ ュー ド の 追加 と だ け 関 係 の 
ある デー タ 管 理 モ ジュ ー ル は 不要 で ある と と を コン パイ ラー 知ら 
せる 働き を する 。 と の 結果 , 目的 プロ グラ ム の サイ ズ を 減ら す と と 
が で きる 。 


ADDBUFFE オ プシ ョ ン は , DIRECT フ ァイル の 場合 (て, 新 
し い レ コー ド を 追加 する と き , デー タ ・ セ モット 上 の レ ュ コード を 並べ 
直す た め の 作業 スペ ー ス と し て 使用 で き る 内 部 記憶 域 の 量 を 指定 す 
る の (用 いら れる 。 指定 で きる 記憶 域 の 最低 量 は , 次 の 式 に よっ て 
決ま る 。 


m( ブ ロッ ク ・ サ イズ 十 キー の 長 さ 十 50) 十 24 
と と で , 「m' は , 一 時 点 記憶 域 (C 読 込ま れる ブロ ッ ク の 数 で 


ある 。 指定 可能 を 最適 の ブロ ッ ク 数 は , 直接 アク セス 装置 の 1 トラ 
ッ ク に いっ ぱい に C を る も の で ある 。 


キー の 分 類 


GENKEY (総称 キー) オ プシ ョ ン は , INDEXED お よび キー 
有 質 の VSAM デー タ ・ セ ッ ト K 対 し て だ け 用 いら れる 。 と の オォ プシ 
ョ ン を 用 いる と , ブロ グラ マー は , デー タ ・ セ ッ ト の 中 (記録 され 
た キー を 分 類 し , その キー の クラ ス C し た が っ て レコ ー ド を アク モ セ 
ス す る た め (CSEQUENTIAL KEYED INPUT また は 
SEQUENTIAL KEYED UPDATE ファ イル を 使用 する 
と と が で きる よら じ な る 。 


総称 キー は , キー の クラ ス を 識別 する 文字 スト リン グ で ある ( そ 

の スト リン グ で 始ま る すべ て の キー は , その クラ ス の メン バー で あ 
る ) 。 た と えば , 記録 され た キー' ABCD!, ! ABCE お よび 
「 ABDF ! は すべ て , 総称 キー'A! お よび 「AB! C エ よっ て 議 別 
され る クラ ス の メン バー で ある が , 最初 の 2 つ は , クラ ス ! ABC! 
の メン バー で も ある 。 また, 3 つの 記録 され た キー は , それぞれ , 
クラ ス ! ABCD', !「 ABCE'「, お よび 「 ABDFE ! の 唯一 の メン 
バー で ある と 考 ん える と と が で きる 。 


GENKEY オ ォ オプ ショ ン を 使用 する と , プ ブロ グラ マー は , 特定 クラ 
ス の キー を も ゃ もつ 最初 の レコ ー ド か ら , INDEXED デー タ ・ セ ッ 
ト の 用 次 的 を 読取 り ま た は 更新 を 開始 する こと と が で きる 。 と の 場合 , 
その クラ ス は , READ ステ ー ト メン ト の KEY オプ ショ ン の 中 
その 総称 キー を 含め る と と (C ょ よっ て 識別 され る 。 ( 特定 の クラ ス の 
キー を も ゃ つ 最 初 の レコ ー ド は , READ KEY(C よ っ て 取り 出す と 
と が で きる が , KEY オプ ショ ン と 同じ ステ ー ト メン ト の 中 で 
KEYTO オプ ショ ン を 使用 する と と が で き な い の で , 実際 の キー 
は , レコ ー ド の 中 に キー が か が 内蔵 され て いな い 限 り , 取り 出す と と は 
で き な い 。 ) 後 読 の レコ ー ド は , KEY オォ オプション を も た な い 
READ ステ ー ト メン ト (て よっ て , 読む と こと が で きる 。 キ ー・ ク ラ 
ス の 終り に を っ て も , 表示 は 行なわ れ を い 。 


次 の 例 で は , キー の 長 さ は 4 ベイ ト 以 上 と する 。 


DCL IND FILE RECORD SEQUENT TI AL KEYD 
UPDATE ENV (INDEXED GENKEY…) : 


READ FILE(TND) INTO (INFIELD) KEY (ABC): 
NEXT: READ FILE (IND) INTO (INFIELD) : 


GO TO NEXT: 


最初 の READ ス テー トメ ント は , デー タ ・ セ ッ ト の 中 C あ る, 

「 ABC' で 始ま る キー を も つつ 最初 の レコ ュー ド を INFIELD 
読み 込む 働き を する 。 そ の あぁ と , 2 番目 の READ ステ ー ト メン ト 
が 実行 され る た び (, 次 (高い キー を も つ レ コー ド が 取り 出さ れる 。 
2 番目 の READ ステ ー ト メン ト を 繰り 返し て 実行 し て ゆく うち と , 
キー・ ク ラス の 終り (C を っ て も 表示 は 行 を われ な い の で , より? 高い 
キー・ ク ラス か ら レ コー ド を 読む と と も で きる 。 そ の キー・ ク ラス 


第 12 章 : レコ ー ド 方 式 の 転送 157 


の 範囲 外 の も の を 読み た く な い 場 合 は , ブロ グラ マー の 責任 に な い 
て , 各 キ ー を チェ ッ ク し を けれ ば を ら な を な い 。 の も し と , 最初 の READ 
ステ ー ト メン ト を 実行 する と , デー タ ・ セ ッ ト は つね , キー・ ク 
ラス ' ABC! の 最初 の レコ ー ド 再び 位置 づけ され る 。 


指定 され た クラ ス の キー を も つ レ コー ド が デー タ ・ セ ッ ト の 中 
を い 場 合 は , KEY 条件 が 起こ とこ る 。 と の あと , デー タ ・ セ ッ ト は , 
それ より 高い キー を も つつ 次 の レコ ー ド か , また は ファ イル の 終り の 
どちら か 位置 づけ され る 。 


KEYLENGTH オ プシ ョ ン で 指定 され た 長 さ より も 短い 原始 キ 
ー を 指定 し て いる READ ステー トメ ント が 実行 され る と き , そ と 
(C GEBNKEY オプ ショ ン が ある か な いか (よっ て どの よら みな 効果 
の 違い が ある か 注意 し て いた だ きた い 。 GENKEY が あれ ば , キ 
ー は 総称 キー と し て 解 収 され , デー タ ・ セ モット は, その 原始 キー で 
始ま る キー を も つ , デー タ ・ セ ッ ト 内 の 最初 の レコ ー ド 位置 づけ 
され る 。 GENKEY オプ ショ ン が 指定 され て い を けれ ば , 短い 原 
始 キ ー は , 指定 され ん た キー の 長 さ に を る よら 右側 ヒデ プラ ンク が 補充 
され , デー タ ・ セ モット は , と の 補充 され た キー を も つ レ コー ド 位 
置 づ けさ れる (と の よう な レコ ー ド が 存在 し て いれ ば ) 。 


GENKEY オ プシ ョ ン を 使用 し て いる と き 。, 指 定 さ れ た キー の 長 
さと 同じ か それ より 長い 原始 キー を 与え て も その 結果 (C 影 響 は な い 。 
と の 場合 , 原始 キー は , 必要 応じ て 右側 で 切り 捨て られ , 指定 の 
レコ ー ド を 議 別 する ( と の レコ ー ド の キー は , その クラ ス の 唯一 の 
メン バー で ある と 考え られ る )。 


長 さ の 変わ る スト リン グ ・ オ フシ ョ ン ( SCALARVARYING) 


SCALARVARYING オプション は , 長 さ の 変わ る スト リン グ 
の 入出 力 の 場合 C 用 いら れる 。 長 さ の 変わ る スト リン グ を 位置 指定 
モー ド C よ っ て 転送 で きる の は , と の オプ ショ ン を 使用 し て いる と 
きだ け で ある 。 ス トリ ング が 転送 され る と き 長 さ の 変わ る 要素 ス 
トリ ング 2 ベイ ト の 長 さ 接頭 請 を 含め る と と (と よっ て (あるいは 
それ を 誰 識 する と と (C よ っ て ) , と の よう ら な と と が 可能 (C な る 。 


長 さ の 変わ る スト リン グ K& 記 憶 域 を 割り 振る と き , コン ベイ ラ 
ー は , スト リン グ の 現在 の 長 さ を 指定 する 2 バイ ト の 接頭 語 を その 
中 に 含め る 。 長 さ の 変わ る 要素 スト リン グ の 場合 , 
SCALARVARYING が その ファ イル KK 対し て 指定 され て いる 
と きだ け , と の 接頭 語 が 含め られ た り ( 出 力 の と き ), 認識 され た 
りす る (入力 の と き )。 


長 さ の 変わ る 要素 スト リン グ を も つ デ ー タ ・ モ セット の 作成 な よび 
読取 り K 位 置 指 定 モー ド の ステ ー ト メン ト (LOCATE ち ぉ お ょ よび 
READ SET ) を 用 いる と き は , 緩衝 域 の 位置 を 指定 する ボイン 
ター は つね に 長 さ 接頭 語 の 先頭 を 指す と みな を され る の で , 長 さ 接頭 
語 が 存在 し て いる と と を 表わす た め C, SCALARVA RYING 
を 指定 し を けれ ば を ら な い 。 
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1. ファ イル 多 対 し て SCALARVARYING が 指定 きれ て い 
る 場合 は , それ 書き 出し た り , それ か ら 読 ん だ りす る と と 
が で きる の は , 構造 形式 で な く , 次 元 も も た な い , レベ ル 1 
の スカ ラー の , 長 さ の 変わ ちる ス トリ ング だ け で ある 。 ブロ グ 
ラマ ー は , レコ ー ド の 長 さ を 決め る と き , と の 長 さ 接頭 語 を 
人 れる た め (C 2 ベイ ト の 余裕 を みて ぉ お か な けれ ば な を ならない 。 


2. SCALARVARYING を 用 いて 作成 され た デー タ ・ セ ッ 
ト は , SCALARVARYING を 指定 し て いる ファ イル 
よっ て の み ア クセ モ ス し な けれ ば な ら な い 。 


3 SCALARVARYING と CTLASA プ CTL360 の 両 
方 を 同じ ファ イル を 対し て 指定 し て は を なら を ない (と の よう に 
する と , 最初 の デー タ ・ ベ イト が 不明 確 C な る )。 < 


4. PL プ エ T D ま た は PL プ T F コ ン バ ペイ ラー と よっ て 作成 さ 
れ た デー タ ・ セ ッ ト K 対 し て , SCALARVARYING を 
使用 し て は なら を い 。 と れ ら の コン バイ ラー で は , 長 さ 接頭 
語 の 作成 も 認識 も 行 を われ を い 。 


キー の 長 さ オプ ショ ン (KEYLENGTH) 


KEYLENGTH オ ォ オプション は , KEYED ファ イル 対し て , 記 
録 さ れ た キー の 長 さ を 指定 する も る の で ある 。 INDEXED また は 
REGTONAL(3 ) ファ イル の 場合 は , KEYLENGTH を 必ず 
指定 し を な けれ ば な ら な い 。 


キー の 位置 オプ ショ ン (KEYLOC) 


KEYLOC オプ ショ ン は , INDEXED デー タ ・ セ ッ ト を 作成 
する と き に , レコ ー ド の 中 の 内 蔵 さ れ た キー の 先頭 の 位置 を 指定 す 
る た め K 使 用 する こと と が で きる 。 非 ブ ロッ ク 化 レ コー ド の 場合 は , 
KEYLOC は 任意 選択 で ある が , ブ ロッ ク 化 レコ ー ド の 場合 は , 必 
ず KEYLOC を 指定 し を けれ ば な を ならない 。 その 位置 は , 次 の 範囲 
内 の も る の で を けれ ば な ら な いら 。 


1 ご nm レコ ー ド サイ ズ 一 キー の 長 さ 十 1 


つま り , キー は , レコ ー ド より 大 きい も の で あっ て は な ら ず , レコ 
ー ド 内 完全 (C 収 まる も る の で を けれ ば を ら な いら 。 


VSAM デ ー タ ・ セ ッ ト 


VSAM デー タ ・ モ セッ ト は つね (CC, 直接 アク セス 装置 上 C に あり, キ 
ー 遥 ま た は エン トリ ー 順 の 編成 と な っ て いる 。 と れ ら の 編成 は 通常 , 
PL プ j の INDEXED ぉ お よび CONSECUT IVE 編成 に それ ぞ 
れ 対 応 し て いる 。 VSAM デー タ ・ セ ッ ト 人 結び つけ られ る ファ イ 


PASSWORD 


ENV IRONMENT(VSAM ) を 指定 し て は な ら な い 。 


キー 順 (INDBXBD ) ェ ン トリ ー 腺 (CONSECUTIVE) 


RECSIZE 開か れる と き (C チ ェ ッ ク さ れる 開か れる と き に チェ ッ ク さ れる 
BLKSIZE 無視 され る 無視 され る 

COBOL INDEXED の 場合 CONSECUT IVE の 場合 
VERIFY 無視 され る 無視 され る 
EXTENTNUMBER 無視 され る 適用 され を い 
INDEXMULTIPLE 無視 され る 適用 され を い 
HIGHINDEX 無視 され る 適用 され を ない 
OFLTRACKS 無視 され る 適用 され な い 
INDEXAREA 無視 され る 適用 され を ない 

NOWR {I TE 無視 され る 適用 され な い 

ADDBUFF 無視 され る 適用 され な い 

GEBNKEY INDEXED の 場合 適用 され を ない 
SCALARVARYING INDEXED の 場合 CONSECUT IVE の 場合 
KEYLENGTH 開か れる と き (C て チェ ッ ク さ れる 適用 され を い 

KEYLOC 開か れる と き (C て チェ ッ ク さ れる * 適用 され ない 

BUFFERS 無視 され る 無視 され る 

レ ュ ー ド 形式 無視 され る 無視 され る 


VSAM (と よっ て チェ ッ ク さ れる 


+ キー 遥 の VS AM デー タ ・ セ モッ ト は すべ て , 内 蔵 さ れ た キー を も っ て いる 。 INDE 双 ED デー タ ・ セ ッ ト か とら 変換 され た VS AM デー 
タ ・ セ ッ ト を ブロ グラ ム が 使用 し て かり, し か も , 元 の ブロ グラ ム が , 内 蔵 さ れ な を な い キ ー を も つよ 2 う 設 計 さ れ て いる 場合 は , 


VSAM (て よっ て チェ ッ ク さ れる 


図 1 2.2 VSAM デ ー タ ・ モ セット (対し て 使用 され た 場合 の ENVIRONMENT オ プシ ョ ン の 効果 


ル の 宮 言 は , ENVIRONMENT( VSAM ) を 指定 する 点 以外 は , 
本 質 的 に C は 対応 する INDEXEBD ま を た は CONSECUTIVE フ 
ァイル の 場合 と 同じ で ある 。 キー 順 の VSAM デー タ ・ セ ッ ト K 対 
し て ENV( INDEXED ) が 指定 され て いる と , オペ レー ティ ン 
グ ・ シ ステ ム ( て よっ て 自動 的 に ISAM イン ター フェ ー ス が 使用 さ 
れる 。 と の コン バイ ラー の ブロ グラ マー の 手引 書 (C, VSAM デー 
タタ ・ セ ッ ト 編 成 C 関 する 詳細 , JCL を 通じ て 使用 で きる 機能 , 
PL プ I ファ イル を 通し て VSAM デ ー タ ・ セ ッ ト を アク セス する 方 
法 , を と が 記載 され て いる 。 


ファ イル の 宣言 と 開き 方 


最初 CVSAM デー タ ・ セ ッ ト を 開く 前 に , DEFINE ユー ティ 
リティ ー・ ブ ログ ラム 低 上 よっ て , デー タ ・ セ ッ ト の 構造 ( レコ ー ド 
お よび キー の 長 さ を ど ) が シス テム 人 対し て 定義 きれ る 。 し た が っ 
て , デー タ ・ セ ッ ト の 構造 と 影響 を 与え る ENVIRONMENT ォ 
プシ ョ ン の 多く は , 定義 され た 値 と 矛盾 し て いる 場合 を の ぞい て , 
無視 され る 。 矛盾 し て いる と き は , UNDEFINEDFEILE 条件 
が 起こ と る 。 


図 1 2.? は , ディ スク ・ デ ー タ ・ セ ッ ト が VSAM デー タ ・ セ ッ 
ト と 対 し て 使用 され る と き ( 適 用 され る すべ て の 
ENVIRONMENT ォ オプ ショ ン の 影響 を 要約 し た も の で ある 。 


INDEXED 編成 の 場合 C は 許さ れ を い 2 つの 属性 の 組合 せ が , 
キー 順 の VS AM デー タ ・ セ キッ ト 区 結び つけ られ る ファ イル の 場合 


(て は 許さ れ て いる 。 これら の 組合 せ と は , 直接 アク セス で の 入力 
位置 指定 モー ド を 使用 する た め の , BUFFERED と DIRECT 
の 組合 せ , な ぉ よび 用 次 アク セス で EVENT オプ ショ ン を 使用 する 
た め の (任意 の 一 時 点 で は , 1 つの 操作 だ け を 未 解 決 の 状態 上 する 
と と が で きる ), UNBUFFERED と SEQUENT1 AL の 組合 
せ で ある 。 


ェ エン トリ ー 順 の デー タ ・ セ ッ ト と 結び つけ られ る ファ イル の 場合 
許さ れる 属性 は , CONSECUT IVE 編成 の 場合 と 同じ で ある 。 


操 作 


INDEXED ぉ よび CONSECUTIVE 編成 の 場合 に 有効 を ス 
テー トメ ント は すべ て , 対応 する VSAM デー タ ・ セ ッ ト の 場合 
も 有効 で ある 。 さ ら , INDEXED の 場合 に は 有効 で を い ス テー 
トメ ント の 中 (て も , キー 歳 の デー タ ・ セ ッ ト の 場合 に は 有効 を も の 
が ある 。 


図 1 2.1 3 は, キー 用 の VSAM デー タ ・ セ ッ ト で 使用 で きる ス 
テー トメ ント と オプ ショ ン を 要約 し た も の で ある 。 エ ント リー 順 の 


ASCI] 1 データ ・ セ ッ ト 
ASC II を 用 いる 磁気 テー プ ト 上 の デー タ ・ セ キット を , PL ノ [{ で 作 


成 ま た は アク セス する と と が で きる 。 と の コン バイ ラー で は , F, 
F B, U, D, お よび DB レコ ー ド 形式 ボ が サポ ー ト され て いる 。 
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F, F B, お よび U 形 式 は , 他 の デー タ ・ セ ッ ト の 場合 と 同じ ょ 5 
扱わ れる 。D ぉ な よび DB 形式 ( 他 の デー タ ・ セ ッ ト の 場合 の V ぉ 
ょ よび VB 形 式 C 相 当 す る ) に ついては, 次 説明 する 。 


レコ ー ド 形式 の ほか に C, 2 つの ENVIRONMENT オ プシ ョ ン 
( ASC TI 1 , ぉ お よび 緩衝 域 オ フ セ ッ ト ・ オ プシ ョ ン BUFROFF ) 
を 指定 する こと と が で きる 。 


ASCI 1 デー タ ・ セ ッ ト K 書 く と と が で きる の は , 文字 デー タ 
だ け で ある 。 し た が っ て , と の デー タ ・ セ ッ ト を 作成 する と き は , 
文字 スト リン グ 変 数 か ら 転 送 し な けれ ば な ら な を い 。 と の 変数 は , 
CHARACTER と 同様 , VARYING 属性 を も る つと と が で きる 
が , 長 さ の 変わ る 文字 スト リン グ の 長 さ バイ ト ( 2 バイト ) を 転送 
する と と は で き な い 。 い いか えれ ば げ ば, 長 さ の 変わ る 文字 スト リン グ 
は , SCALARVARYING ファ イル を 使用 し て いる ASCII 
デー タ ・ セ ッ ト 転送 する と と は で き な い 。 また , 長 さ の 変わ る ス 
トリ ング が 含ま れ て いる デー クタ 集 合体 $, 転送 する と と が で き な い 。 


ASCTII デー タ ・ セ ッ ト は 磁気 テー プ 上 (CC な けれ ば な を ならない の 
で , これ は 当然 CONSERCUTIVE 編 成 の も ゃ る の で を けれ ば な ら な 
ぃ い 。 結び つけ られ る ファ イル は , 緩衝 域 を も っ て いな けれ ば な ら な 
い 。 


ASCII オ プシ ョ ン 


と の オプ ショ ン は , デー タ ・ セ ッ ト 上 の デー タ を 表わす の (KC 用 いら 
れる コー ド が ASC [ 1 で ある と と を 指定 する も る の で ある 。 


BUFOFF オ プション お よび プ ブロック 接頭 語 フィ ー ル ド 


ASC TI 1 デー タ ・ セ ッ ト の 各 ブ ロッ ク の 先頭 に , ブロ ッ ク 接 頭 請 
フィ ー ル ド と 呼ば れる フィ ー ル ド を つけ る と と が で きる 。 と の 長 さ 
は , 1 か ら ?2 9 ベイト ま で の いずれ で も よい 。 と の 緩衝 域 オ フ セ モッ 
ト ・ オ プシ ョ ン は , と の フィ ー ル ド の 長 さ を デー タク タ 管理 プロ グラ ム 
(C 表 示す る 働き を する の で , デー タ ・ セ ッ ト の アク セス また は け 作 成 
は , 各 物理 プロ ッ ク の 先頭 か ら の と の オフ ャ ッ ト の 位置 で 開始 され 
る 。 PL ノン I は , この フィ ー ル ド へ の アク セス は サポ ー ト し て お ら ず , 
また , シス テム 3 6 0 お よび シス テ ュ グ 3 7 0 で 使用 され る 情報 
も 含ん で いな い 。 と の ブロ ッ ク 接 頭 語 に 入っ て いる 情報 を デー タ 泡 
理 プ ログ ラム が 使用 する の は , 非 ブ ロッ ク 化 また は ブロ ッ ク 化 可変 
長 レ コー ド (つまり, D- ま た は DB- 形 式 レ ュー ド ) の 場合 C, 
ブロ ッ ク の 長 さ を 記録 する た め に ブロ ッ ク 接 頭 語 フ ィ ー ル ド を 使用 
で きる 場合 だ が け で ある 。 と の 場合 , と の フィ ー ル ド は 4 バイ ト の 長 
さ で , ブロ ッ ク 接 頭 語 フィ ー ル ド 自 体 も 含め て ブロッ ク の 長 さ を べ 
ィ イト 単位 で 示す , 右 づ め の 1 0 進数 文字 値 を 含ん で いる 。 と れ は , 
ブロ ッ ク の 長 さ フィ ー ル ド と 全く 同じ C を な る 。 


緩衝 域 オ フ セ ッ ト ・ オ プシ ョ ン の 形式 は BUFOFF( n ) で ある 。 
接頭 嗜 の 長 さ を 表わす 数 値 は . "n' と し て 指定 し を けれ ば を ら な 
い 。 とれ は , 1 0 進 整 定数 また は FIXED BINARY(31,0) 
STATIC と いう 属性 を も つ 変 数 と し て 指定 する と と が で きる 。 
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その 最小 値 は で ロ で , 最大 値 は ? 9 で ある 。 接頭 語 の 長 さ の 指定 が 
な を いと いう と と は , ブロ ッ ク 接 頭 請 が ブロ ッ ク の 長 さ フィ ー ル ド と 
し て 用 いら れる と と , つま り と の フィ ー ル ド が 4 ベイト で ある と と 
を 意味 し て いる 。 ブ ロッ ク の 長 さ は , デー タ 管 理 ブ ログ ラム よっ 
て , 接頭 語 C 挿 入 さ れる 。 


入力 の 場合 , ASC II デー タ ・ セ ッ ト は , 1 か ら 9 9 ベイ ト ま 
で の 長 さ の ブロ ッ ク 接 頭 二 フィ ー ル ド を も っ て いる か , また は プロ 
ッ ク 接 頭 語 フ ィ ー ル ド を 全く も っ て いな いと きけ は, アク セス する と 
と が で きる 。 と れ は , ブロ ッ ク 接 頭 語 フィ ー ル ド が ブロ ッ ク の 長 さ 
フィ ー ル ド と し て 使用 され て いる か どう か 関係 な く ア クセ ス 可 能 


・ で ある 。 出力 の 場合 , 正しい レコ ー ド 形式 の いずれ か を 使用 し て い 


る デー タ ・ セ モッ ト は , ブロ ッ ク 接 頭 語 を つけ ず 《 作 成す る と と が で 
きる が , ブロ ッ ク 接 頭 語 の 作成 が PL ノ I で サポ ー ト され る の は , そ 
れ が プ ブロック の 長 さ フィ ー ル ド と し て 使用 で きる と きだ け で ある 。 


BUROFF オ プシ ョ ン は , ASCII デ ー タ ・ セ ッ ト の 場合 (C だ 
け 使 用 する と と が で きる 。 


D- 形 式 お よび DB 形式 レコ ー ド 


各 レ コー ド は , それ ぞ れ 長 さ が 違っ て いて も よい 。 と の 2 つの 形式 
は 以下 の 通り で ある 。 


レコ ー ド は ブロ ッ ク 化 され て お おら ず , 1 つの レコ 
ー ド が 1 つの ブロ ッ ク を 構成 し て いる 。 各 レコ ー 
ド は , 次 の も ゃ の か ら 構 成 さ れ て いる 。 


D- 形 式 : 


4 ベイ ト の 制御 バイト 


デー タ ・ バ イト 


4 ベイ ト の 制 件 バイ ト (て は , レコ ー ド の 長 さ が 入 
る 。 と の 値 は デー タク 管理 プロ グラ ム (C よ っ て 振 入 
され る の で , ブロ グラ マー は 何 ゃ 処置 を と る 必要 
が な い 。 さら, ブロ ッ ク の 先頭 に ブロ ッ ク 接 頭 
語 フ ィ ー ル ド が あっ て よく , と と MC て は, ブロ ッ ク 
の 長 さ を 入れ て お むく と と が で きる 。 


レコ ー ド は ブロ ッ ク 化 され て いる 。 と の 点 以外 
つい て D- 形 式 の と と ろ で 述べ た と と が , その ま 
ま DB- 形式 C 上 も あて は まる 。 


DB- 形式 : 


省略 時 解釈 の 規則 


「 レ コー ド 形 式 の 省略 時 解釈 」 の と と ろ で 述べ た 規則 の ほか (と, 次 
の よら な 規則 も 適用 され る 。 


ENVIRONMENT オ ォ オブ ション の 中 で ASC1 [は 指定 さ 
れ て いな いら が, BUFOFF, D, また は DB の いずれ か が 指 
定 さ れ て いる と いう 場合 は , ASC 1 }T と 作 な され る 。 


CONSECUTIVE 編成 


CONSECUTIVE 編 成 の デー タ ・ セ ッ ト で け は , レコ ー ド は キー 
を も っ て い を い 。 デー タ ・ セ モット が 作成 され る と き , レコ ー ド は 提 
示さ れ た 順 (連続 的 C 書 き 出さ れる 。 レコ ュー ド は , 書き 出さ れ た 用 , 
ある い は BACKWARDS 属性 を 使用 し て いる と き は その 逆 の 順 
で だ け 取 り 出 す と と が で きる 。 したがって, 結び つけ る ファ イル は け は, 
SEQUENT 1I AL 属性 を る つも の で な けれ ば な を なら な い 。 
CONSECUTTIVE デ ー タ ・ セ ッ ト C は , PF - 形 式 , FE B - 形 式 , 
V - 形 式 , VB - 形式 , D -, DB -, また は U - 形 式 レ ュー ド を 
収容 する と と が で きる 。 デ ー タ ・ セ ッ ト 内 の レコ ー ド が Vー, 

VB -, D- ま た は DB - 形式 の 場合 は , BACKWA RDS 属 性 を 
指定 する と と は で き な い 。 


ENVIRONMENT 属 性 の CONSECUTTIVE オ プシ ョ ン と 
SEQUENTT AL 属性 の 違い 注意 し て いた だ きた い 。 
CONSECUT 1 VE は , デー タ ・ セ ッ ト の 物理 的 を 構成 を 指定 する の 
対し て , SEQUENTTI AL は , ファ イル を どの よう 処理 する か 
を 指定 する も る の で ある 。 CONSECUTIVE 編 成 の デー タ ・ セ ッ ト 
は , SEQUENTTIAL フ ァイル と 結び つけ を けれ ば な を ならない が , 
INDEXED ま た は REGIONAL 編成 の デー タ ・ セ ッ ト は , 
SEQUENTTAL ま た は DIRECT ファ イル の どちら と で も き 結 
び つ ける と と が で きる 。 


磁気 テー プ 上 の CONSECUTIVE デ ー タ ・ セ ッ ト は , 前 向き 
また は 後向き 読む と と が で きる 。 デ ー タ ・ セ ッ ト を 後向き 読む 
と き は , 結び つけ られ る ファ イル は , BACKWARDS 属 性 を も っ 
て いな を な けれ ば な ら な い 。 最初 に デー タ ・ セ モッ ト を 前 向き C 読 むか 書 
く か し て か ら , 同じ レブ ログ ラム で 後向き 読む と いう 場合 は , ファ 
イル が 閉じ られ る と き (また は 複数 だ が リュ ー ム ・ デ ー タ ・ セ ッ ト で 
は , ボリューム 切替 え が 行 な われ る と き ) (C, 通常 の 巻 戻 し を 行 を 


わな を いよ うす る た め (C, ENVTRONMENT 属 性 の 中 で LEAVE 


オプ ショ ン を 指定 し を けれ ば な ら な い 。 可変 長 レ コー ド の デー タ ・ 
セッ ト を 後向き 読む と と は で き な い 。 


CONSECUTIVE デ ー タ ・ セ ッ ト が 作成 され た あと , それ を 
テア クセ ス す る ファ イル は , SEQUENTTI AL INPUT, 
OUTPUT, ま を た は UPDATE( こと れ は , 磁気 テー プ ・ デ ー タ ・ セ ッ ト 
の 場合 を の ぞ く ) と し て 開く こと が で きる 。 ( OUTPUT と し て 
開か れ た と き は , デー タ ・ セ キッ ト は 前 の も の を 消し て 書か れる 。 ) 
図 1 2.6 は , CONSECUTIVE デ ー タ ・ セ モット の 作成 と アク セ 
ス 人 使用 で きる デー タ 転 送 ス テー トメ ント と オプ ジョ ン を リス トレ 
た も の で ある 。 


SEQUENTIAL UPDATE 


CONSECUTIVE デ ー タ ・ モ キッ ト が SEQUENTI AL 
UPDATE フ ァイル に よっ て プク セ モス され る と きけ は, REWRITE 
ステ ー ト メン ト ( て よっ て 更新 で きる よう (する た め に C, 前 も っ て レ 
コー ド を READ ステ ー ト メン ト よ っ て 取り 出し て ちな か を けれ ば 
を ら な を ない 。 し か し , 取り 出し た レコ ー ド を すべ て 書き 直す 必要 は な 
い 。 REWRITE ステ ー ト メン ト は つね に , 読ま れ た 最後 の レコ 
ー ド を 更新 する 。 


炊 の 例 C つ いて 考え て みよ ら 。 
READ FILE(F) INTO(A): 
READ BN INTO(B):・ 
0 FILE(F) FROM(A): 


と の REWRITE ステ ー ト メン ト は , 2 番目 の READ ステ ー ト 
メン ト (C よ っ て 読ま れ た レコ ー ド を 更新 する 。 最初 の ステ ー ト メン 
ト (C よ っ て 読ま れ た レコ ー ド は , 2 番目 の READ ステ ー ト メン ト 
が 実行 され た あと で 書き 直す と と は で き を な い 。 


INDEXED 編 成 


INDEXED 編成 の デー タ ・ セ ッ ト は , 直接 アク セス 装置 上 (C な 
けれ ば を ならない 。 その レコ ー ド は , F- ま た は FE B- 形 式 レ コー ド 
で な を けれ ば な ら ず , 各 レ コー ドド KC 結びつけ られ る キー に し た が っ て 
論理 的 を 順序 で 並べ られ て いる 。 キー は , 各 レ コー ド を 唯一 無 二 の 
も の と し て 識別 で きる 文字 スト リン グ で ある 。 論理 レロ ー ド は , シ 
ステ ム ブ 3 6 0 お よび シス テム 3 7 0 の 乳 合 順序 C し た が っ て , 
キー の 時 遥 に デー タ ・ セ ッ ト の 中 (並べ られ る 。 オペレーティング 
・ シ ステ ム の デー タ 管 理 ー チ ン は , キー が 与え られ た と き , デー 
タ ・ セ ッ ト の 中 組み 込ま れ て いる キー を 使用 し て , レコ ー ド の 位 
賀 を 探し 当て る 。 


CONSECUTI VE 編 成 と は 異 た り , INDEXED 編 成 の 場合 
は , すべ て の レコ ー ド を 順次 方 式 で テク セス する 必要 は を い 。 
INDEXED デ ー タ ・ セ ッ ト は , 順次 的 に 作成 し を けれ ば ならない 
が , 一 旦 作成 し た あと は , 結び つけ られ る ファ イル の も びび 属性 は , 
SEQUENT TAL ま た は DIREC T, ある い は TINPU 和 T ま た は 
UPDATE の いずれ で あっ て も よい 。 フ ァイル が DIRECT 属 
性 を る も る っ て いる と き は , レコ ュー ド の 取出 し , 追加 , ぉ よび 儲 換 え を 
ラン ダム 行なう と と が で きる 。 


図 1 2.1 1 は , INDE 双 ED デー タ ・ セ ッ ト の 作成 お よび アテ アク 
セス 人 使用 する と と の で きる デー タタ 転送 ステ ー ト メン ト と オプ ショ 
ン を リス ト し た も の で ある 。 


・ 記録 され た キー と 原始 キー の 2 種類 が ある 。 記録 され た 
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ピコ 


キー は , その レコ ュー ド を 議 別 す る た め (C デ ー タ ・ セ ッ ト 内 の 各 レ コ 
ー ド 実際 (C 出 て くる 文字 スト リン グ で ある 。 と の 長 さ は , 255 
桁 を 越え て は な を ら な い 。 原始 キー は , デー タ 転 送 ス テー トメ ント の 
KEY また は KEYFEROM オプ ショ ン の 中 KC 出 て くる 式 の 文字 ス 
トリ ング 値 で あり , その ステ ー ト メン ト が 参照 し て いる レコ ー ド を 
識別 する た め C 用 いら れる 。 TI NDEXED デ ー タ ・ セ ッ ト を 直接 ア 
クセ ス す る 場合 は , 転送 ステ ー ト メン ト それ ぞ れ 原始 キー を 含め 
を けれ ば な ら な い 。 


INDEXED デー タ ・ セ ッ ト の 中 の 記録 され た キー の 長 さ は , 
ENV IRONMRBNT の KEYLENGTH オ プシ ョ ン に よっ て 定義 
する 。 原始 キー の 長 さ が , 記録 され た キー 対し て 指定 され た 長 さ 
ょ り 大 きい と き は け は , 原始 キー は 右側 で 切り 捨て らち れる 。 原始 キー が , 
指定 され た キー の 長 さ より 短く , し か も GENKEY オプ ショ ン が 
使用 され て いな いと きけ, 原始 キー は , 指定 され た 長 さ (C 合 わせ て 
右側 C プ ラン ク が 補 わ れる 。 


INDEXPED デー タ ・ セ ッ ト の 記録 され た キー は , 論理 レ ュ ー 
ド の 中 内蔵 し て も よい し , 別に し て も よい 。 キ ー を レコ ー ド の 中 
(C 内 蔵 す る 場合 は , レコ ー ド 内 に お ける キー の 位置 を 与え を る た め に , 
ENVIRONMENT の KEYLOC(n) オ ブ プション を 指定 し を なけ 
れ ば な ら な い 。 


内 蔵 さ れ た キー 


レコ ー ド が ブロ ッ ク 化 され て いる INDEXED デー タ ・ セ ッ ト は, 
ゼロ より 大 きい 値 が 指定 され た ENVIRONMENT 属 性 の 
KEYLOC ォ プシ ョ ン を も っ て いな けれ ば ならない 。 KEYLOC オブ 
ショ ン は , 内 蔵 さ れ た キー の レコ ー ド 内 に C ぉ ける 絶対 的 を 位置 を 指 
定 す る る の で ある と と に 注意 し て いた だ きた い 。 


レコ ー ド が ブロ ッ ク 化 され て いな を い INDBEBEXED デー タ ・ セ ッ 
ト は , レコ ー ド が , 内 蔵 さ れ た キー を も っ て いる と きだ け , 
KEYLOC オ ォ プ ション を 指定 し な を なけれ ば を な ら を な い 。 KEYLOC が 指定 
され て いな いか , また は ゼロ の と き は , その レコ ー ド は , 内 蔵 さ れ 
た キー を も た な いも の と 人 みな され る 。 


内 蔵 さ れ た キー を 使用 する と , 順次 入力 中 (C KEYTO オプ ショ 
ン を 使用 する 必要 が を く を な る が , 出力 の 場合 , KEYFROM オプ 
ショ ン は や は り 必 要 で ある 。 ( し か し , KEYFROM オブ プ ション 
て よっ て 指定 され る デー タ が , レコ ー ド 変数 の 内 蔵 さ れ た キー 部 分 
その も の で あっ て 構わ を な い 。 ) レコ ー ド が ブロ ッ ク 化 され て いな 
い デ ー タ ・ セ ッ ト の 場合 は , 内 蔵 さ れ た キー が ある 場合 で も , 各 レ 
ュー ド の 前 て 別個 の 記録 され た キー が つけ られ る 。 し た が っ て , 非 
プ ブロック 化 レ コー ド の 場合 は , キー 情報 の た め の 追 加 ス ペー ス か 必 
要 で ある 。 レコ ー ド が ブロ ッ ク 化 され て いる 場合 は , 各 ブ ロッ ク の 
最後 の レコ ー ド の キー だ けが , ブロ ッ ク の 前 多 別 C 記 録 さ れる 。 
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内 蔵 さ れ た キー を も つ デ ー タ ・ セ ッッ トレ コー ド を 追加 する た め 
の LOCATE ま た は WRITE ステ ー ト メン ト の 実行 中 に は , 
KEYFROM ォ プシ ョ ン の 中 の 式 の 値 が , レ ュ ー 変数 の 中 の 内 蔵 さ れ 
た キー の 位置 IC 割 り 当 て られ る 。 レコ ー ト 変数 は , 構造 メン バー と 
し て 宣言 され た 内 蔵 さ れ た キー を も つ び つ 構 造 と し て 宣言 する と と が で 
きる が , と の よら な 内 蔵 さ れ た キー は , 長 さ の 変わ る スト リン グ と 
し て 宣言 し て は を ら を いと と 注意 し て いた だ きた い 。 


デー タ ・ セ ッ ト の 作成 


INDEXED デー タ ・ セ ッ ト を 作成 する と き は , 結び つけ る ファ 
イル は SEQUENTIAL OUTPUT と し て 開か を な けれ ば なら 
ず , また , キー の 値 の 昇順 に レコ ュー ド を 提示 し な けれ ば な を なら な い 。 
( キー の 順序 が 間違っ て いる と きけ は , KEY 条件 が 起こ と る 。 ) 
INDEXED デー タ ・ セ ッ ト を 作成 する た め (C DIRECT ファ 
イル を 使用 する こと は で き な い 。 


INDEXED デー タ ・ セ キッ ト を 作成 し た あと , それ を アク セス 
する ファ イル は , SEQUENTIAL INPUT ま た は UPDATE 
と し て , ある い は DIRECT INPUT ま た は UPDATE と し 
て 開く と と が で きる 。 また, デー タ ・ セ ッ ト の 終り (て と レ コー ド を 追 
加 す る た め C, OUTPUT と し て 開く と と も で きる 。 と の よう な 
レコ ー ド の キー は , その デー タ ・ セ ッ ト の 既存 の キー ょ り も 高い 値 
を も っ て い を けれ ば な ら ず , また , 昇 遥 C 並 ん で いな けれ ば な ら な 
い 。 出力 と し て 開く と き (C, デー タ ・ セ ッ ト 割 り 振 られ る 訪 憶 
域 を 増やす と と も で きる 。 


順次 アク セス 


INDEXED デー タ ・ モ セッ ト を アク セス する の (用 いら れる 
SEQUENT TI AL ファ イル は け は, INPUT また は UPDATE 属 
性 の どちら か を 指定 し て 開く こと が で きる 。 デー タク 転送 ステ ー ト メ 
ント 原始 キー を 含め る 必要 $ を いし , また ファ イル が KEYED 
属性 を も っ て いる 必要 も を い 。 順次 アク セス は , 記録 され た キー の 
値 の 昇順 C 行 を われ る 。 つ まり , レコ ー ド は 上 記 の 順 (取り 出さ れ 
る の で あっ て , 必ず し も , デー タ ・ セ ッ ト (入れ られ た 順番 で は な 
い , と いう と と で ある 。 


INDPXED デー タ ・ セ ッ ト を アク セス する SEQUENT1I AL 
UPDATE ファ イル KK 対す る READ と REWR TI TE の 両 ス テー 
トメ ント の 関係 に つい て の 規則 は , EVENT オ プシ ョ ン を 使用 で 
き な を ない 点 を の ぞ け ば , CONSECUT IVE デー タ ・ セ ッ ト の 場合 
(上述 ) と 同じ で ある 。 


更新 され る レコ ー ド の 中 て ある , 内 蔵 さ れ た キー を 変更 し て は な 
ら な い 。 修正 され た レコ ー ド は つね に て , デー タ ・ セ ッ ト の 中 の 更新 
され る レコ ー ド の 上 KK 書き 出さ れる 。 


INDEXED デー タ ・ セ ッ ト を 順次 アク セス し て いる と き (C, 
READ ステ ー ト メン ト の KEY オプ ショ ン の 中 で 原始 キー を 与え 


る と と よって, 特定 の レコ ー ド を 読み , その 地点 か ら , デー タ ・ セ ッ ト 
の 用 次 的 を 読取 り を つづ ける と と が で きる 。 (結び つけ られ た ファ 
ィ ル は , KEYED 属性 を も ね っ て いな けれ ば を ら な い 。 ) し た が っ 
て , KEY オプ ショ ン を 含む READ ステ ー ト メン ト は , その キー 
が 与え を られ て いる レコ ー ド を 読む と と に な る 。 該当 する レコ ー ド が 
存在 し て いな を い と, KEY 条件 が 起 と る 。 KEY オプ ショ ン を も た 
な い 後 続 の RPAD ステ ー ト メン ト は , 次 高い 記録 され た キー を 
も つ レ コー ド を 読む 。 


直接 アク セス 


INDEXED デー タ ・ セ モッ ト を アク セス する た め C 用 いら れる 
DIRECT ファ イル は , INPUT ま た は UPDATE 属性 の ど 
ちら か を つけ て 開く と と が で きる 。 デー クタ 転送 ステ ー ト メン ト は す 
べ て , 原始 キー を も っ て いな けれ ば ぱ ば ならない ( DIRECT 属性 は , 
KEYED 属性 を 暗示 し て いる た め ) 。 


DIRECT UPDATE ファ イル は , INDEXED デー タ ・ 
セッ ト の 中 の レ ュ ー ド の 取出 し , 追加 . また は 償 換 え の た め K 使 用 
する と と が で きる 。 レコ ー ド の 罰 換 え (C は , 次 の 規則 が 適用 され る 。 


REWRITE ステ ー ト メン ト の 中 の 原始 キー よっ て 指定 され 
た レコ ー ド が , 新しい レコ ー ド に よっ て 置き 換え られ る 。 デー タ ・ 
セッ ト 《K 含 まれ る レコ ー ド が F B- 形式 の 場合 は , 前 の 入出 力 ス テ 
ー ト メン ト が , 置き 換え られ る レコ ー ド を 読ん だ REAE ステ ー ト 
メン ト で な い 限 り , REWRITEP スレ ー ト メン ト で レコ ー ド が 世 
き 換 えら れる と , READ ステ ー ト メン ト が 暗示 的 実行 され る 。 


REGIONAL 編成 


REGIONAL 編成 の デー タ ・ セ モット は , 区 域 番号 に よっ て 識別 
され る 区 域 (C 分 割 さ れん て ぉ り , その それ ぞ れ の 区 域 に は , 

REG IONAL 編 成 の タイ ブ の 如何 に よっ て , 1 個 の レコ ー ド また 
は 数 個 の レ ュ ー ド を 入れ る と と が で きる 。 区 域 は , ゼロ か ら 始 まる 
連続 番号 を も っ て お り , デー タ 転 送 ス テー トメ ント の 中 で その 区 域 
番号 ( さら KC 大 抵 の 場合 は キー も ) を 指定 する と と (よって, レコ 
ー ド を アク セス する と と が で きる 。 


デー タ ・ セ キット を REGIONAL 編成 に する と , プロ グラ マー 
は , デー タ ・ セ ッ ト 内 に お ける レ ュ ー ド の 物理 的 を 位 思 を 制御 する 
と と が で きる 。 


REGTIONAL デー タ ・ セ ッ ト は , CONSECUTIVE ま た 
は INDEXED デー タ ・ モ セッ ト の 場合 と 同じ ょ う (C, 区 域 番 号 の 
昇順 に レコ ュー ド を 提示 し て 作成 する と と が で きる 。 か わり (と, 直接 
テク セス を 使用 する と と も で きる が 。, こと の 場合 は , レコ ュー ド を ラン 
ダム な 順序 で 提示 し て , 前 も っ て 形式 設定 され た 区 域 と 直接 挿入 す 
る と と が で きる 。 一旦 REGIONAL デー タ ・ セ モッ ト が 作成 され 


た あと は , SEQUENT TI AL し また は DIRECT, お よび ENPUT 


また は UPDA TE 属性 を も る つ フ ァイル (て よ っ て , アク モス する と と 
が で きる 。 デ ー タ ・ セ ッ ト が SEQUENT1TAL INPUT ま た は 
SEQUENTTIAL UPDATE フ ァイル と 結び つけ られ て いる 場 
合 は , 区 域 番号 も キー も 指定 する 必要 が な いと と (注意 し て いた だ 
きた い 。 フ ァイル が D1IRECT 属性 を も っ て いる 場合 は , レコ ュー 
ド の 取出 し, 追加 , 思 換 を を ラン ダム KK 行なう と と が で きる 。 


図 1 2.1 2 は , REGIONAL デー タ ・ セ モット の 作成 お よび ア 
クセ ス 人 使用 で きる デー タ 転 送 ス テー トメ ント と オプ ショ ン を リス 
ト し た も の で ある 。 


キ = 


キー は, 記録 され た キー と 原始 キー の 2 種類 が ある 。 記録 され た 
キー は , デー タ ・ モ セッ ト 内 の 各 レ コー ド の 直前 に あり , その レコ ー 
ド を 識別 する た め の 文 字 ス トリ ング で ある 。 原始 キー は , デー タ 転 
送 ス テー トメ ント の KEY また は KEYFROM オプ ショ ン の 中 人 
ある 式 の 文字 スト リン グ 値 で あり , その ステ ー ト メン ト が 参照 する 
レコ ュー ド を 識別 する も の で ある 。 REGIONAL デー タ ・ セ キット 
の 中 の レコ ュー ド を アク セス する と き は , 原始 キー に よっ て 区 域 番号 が 
与え られ る 。 記録 され た キー が 与え られ る とこ と も ある 。 


REGIONAL( 3 ) デー タ ・ セ ッ ト の 記録 され た キー の 長 さ は , 
結び つけ られ た ファ イル の ENV IRONMENT 属性 の 
KEYLENGTH ォ オプション よっ て 定義 され る 。 INDEXED 
デー タ ・ セ ッ ト の キー と は 違っ て , REGIONAL し デー タ ・ セ モット 
の 記録 され た キー は , レ ュ ー ド の 中 内 蔵 さ れ て いる と き は , 認識 
され な い 。 


REGIONAL 編 成 の タイ プ 
REGIONAL 編成 に は , 次 の 2 つの タイ プ が ある 。 


1. REGIONAL(1 ) デー タ ・ セ ッ ト (は, 記録 され た キー 
を も た な を い F - 形 式 レ ロー ド が 入っ て いる 。 デー タ ・ セ ッ ト 内 
の 各区 域 に は , レコ ー ド は 1 つ し か 入れ られ な い 。 し た が っ 
て , 各区 域 の 番号 は , デー タ ・ セ ッ ト 内 C お ける 相 対 的 を レ 
ュ コート 位置 対応 し て いる 。 


2. REGIONAL(3 ) デー タ ・ セ ッ ト に は , 記録 され た キー 
を も つ F - 形式 また は U- 形式 の レコ ー ド が 入っ て いる 。 デ 
ー タ ・ セ ッ ト 内 の 各区 域 は , 直接 アク セス 装置 上 の 1 トラ ッ 
ク に 相当 し , 通常 は 1 個 ま た は 数 個 の レコ ュー ド を 収容 する と 
と が で きる 。 RECIONAL( 3 ) デー タ ・ セ ッ ト を 直接 ア 
クセ ス す る と き は , 所 要 の 区 域 を 探し 当て る た め に と , 原始 キ 
ー の 中 で 指定 され た 区 域 番 号 が 用 いら れる 。 区 域 が 探し 当て 
られ た あと で , レコ ー ド を 追加 する スペ ー ス , また は 原始 キ 
ー で 与え られ た も の と 同じ の 記録 され た キー を も つ レ コー ド を 
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探す た め , 順次 的 を 探索 を 行なう と と が で きる 。 
REGIONAL( 1 ) 編成 


RPBGIONAL( 1 ) デー タ ・ セ ッ ト で は け は, 記録 され た キー が な を な い 
の で , 特定 の レコ ュー ド を 識別 する た め の 唯 一 の 標識 は , 区 域 番 号 で 
ある 。 原始 キー の 文字 スト リン グ 値 は , 符号 を し の 1 0 進 整定 数 
(16777215 を 越え を を な いも の ) を 表わす も の で を けれ ば を な ら な を 
い 。 区 域 番号 が と の 数 ょ り 大 きい と き は , 16777216 の 剰余 モ 
ジュ ロ が 用 いら れる 。 た と えば , 16777226 は 10 と みな され 
る 。 原始 キ 一 の 中 で は , 0 から 2 まで の 文字 と プラ ンク だ けが 有効 
で ある 。 先行 アラ テン ク は ゼロ と 解 生 さ れる が , 数 の 間 に プ ラン ク が 
あっ て は な を ならない 。 も し ある と , 間 (C は さま っ た ブラ ンク が 最初 C 
みつ か っ た と と ろ で , 区 域 番 号 は 終り (C を る 。 キー の 中 の 文字 が 8 
桁 よ り 大 きい と き は , 右側 の 8 桁 だ けが 区 域 番号 と し て 用 いら れる 。 
8 桁 よ り 小 さい と き は , 左側 に プラ ンク ( ゼロ と みな され る ) が と 
られ る 。 


見 か け レ コー ド 


REGIONAL( 1 ) デー タ ・ セ ッ ト 内 の レコ ュー ド は , 有効 を デー 
タ を 含む 実際 の レコ ュー ド また は 見 か け レ コー ド の どちら か で ある 。 
REGIONAL( 1 ) デー タ ・ セ ッ ト の 中 の 見 か け レ コー ド は , そ 
の 最初 の バイ ト 定数 ( 8 ) '1 「 B が ある と と よっ て 識別 され 
る 。 と の よう な 見 か け レ コー ド は , 作成 され る と き (C と デー タ ・ セ ッ 
ト C 自 動 的 (< 挿入 され る が , デー タ ・ セ ッ ト が 読ま れる と き (C は 無 
視 さ れ な い の で , それ ら を 認識 で きる よう, PL プ I ブロ グラ ム を 稚 
備 し を けれ ば を ら な い 。 見 か け レ ュー ド を , 有効 を デー タ で 思 き 換 
える と と が で きる 。 


プロ グラ マー が 最初 の バイ ト C(8 ) ! 1 !B を 挿入 し た 場合 は , 
その 中 の 見 か け レ ュー ド を 取り 出さ な いよ うな デー タ ・ セ ッ ト ( フ 
ァイル を 複写 する と , その レコ ュー ド は 失 を われ る の で , 注意 し て い 
た だ きた い 。 


REGIONAL(1 ) データ ・ セ ッ ト の 作成 


REGIONAL( 1 ) デー タ ・ セ モット は , 順次 的 に , また は 直接 ア 
クセ ス ほ し と っ て 作成 する こと が で きる 。 


デー タ ・ モ セッ ト を 作成 する た め C SEQUENT1IAL 
OUTPUT フ ァイル を 使用 し て いる 場合 は , ファ イル を 開く と , デ 
ー タ ・ セ ッ ト 内 の すべ て の トラ ッ ク が クリ アー され , その トラ ッ ク 
上 の 使用 可能 な スペ ー ス の 量 を 記録 する た め C 各 トラ ッ ク の 先頭 に 
容量 レコ ュー ド が 作成 され る 。 レコ ュー ド は , 区 域 番 号 の 昇順 に 提示 し 
を けれ ば を ら を い 。 と の 順序 の 中 で 省略 され た 区 域 は , 見 か け レ ュ 
ー ド で 埋め られ る 。 と の 順序 に 誤り が あっ た と き , また は キー が 重 
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複 し て 提示 され た 場合 は , KEY 条件 が 起こ る 。 フ ァイル が 閉じ ら 
れる と き , デー タ ・ セ ッ ト の 終り CC 残っ た スペ ー ス は , 見 か け レ ュ 
ー ド で 埋め られ る 。 


緩衝 域 を も つ フ ァイル を 用 いて デー タ ・ モ ッ ト が 作成 され て いる 
場合 に , ファ イル が 閉じ し られ る 前 C 出 され た 最後 の WRITE また 
は LOCATE ス テー トメ ント が , その デー タ ・ セ ッ ト の 限界 を 越 
えて レコ ー ド を 出力 し と うら と する と , CLOSE ステー トメント 
よっ て エラ ー 条 件 が 引き 起 さ れる と と が ある 。 


デー タ ・ セ ッ ト を 作成 する た め CDIRECT OUTPUT フ ラファ 
イル が 用 いら れる 場合 は , ファ イル が 開か れる と き , デー タ ・ セ ッ 
ト 全体 が 見 か け レ コー ド で 埋め られ る 。 


REGIONAL( 1 ) デー タ ・ セ ッ ト が 作成 され た あと , それ を 
アク セス する た め の フ ァイル は , SEQUENTTIAL INPUT ま 
た は け は UPDATE, ある い は DIRECT INPUT ま を は UPDATE 
と し て 開く と と が で きる 。 既存 の デー タ ・ セ ッ ト を 消し て その 上 
書く と きだ け は , OUTPUT と し て 開く と と が で きる 。 


順次 アク セス 


REGIONAL(1 ) デー タ ・ セ ッ ト を 処理 する の と 用 いら れる 
SEQUENTTIAL フ ァイル は , INPUT ま た は UPDATE 属 性 
の どちら か を つけ て 開く と と が で きる 。 デ ー タ 転送 スチ テー トメ ント 
(C, KEY オプ ショ ン を 含め る と と は で き な い が , KEYTO ォ ブ 
ショ ン を 使用 する と と は で きる の で , ファ イル は KEYED 属性 を 
も つと と が で きる 。 KEYTO オ プシ ョ ン で 指定 され て いる 文字 ス 
トリ ング 変数 の 文字 が , 8 桁 を 越え て いる と き は , 返さ れる 値 ( 区 
域 番号 ) は , 左側 と ヒ プラ ンク が 補 な を われ る 。 8 桁 よ り 少 を いと きけ は, 
左側 で 切り 捨て られ る 。 


順次 アク モス は , 区 域 番 号 の 昇順 (Cc 行なわ れる 。 見 か け で ある か , 
実際 の レ ュ ー ド で ある か (CC は 関係 を な くす べ て の レコ ー ド が 取り 出さ 
れる の で , 見 か け レ コー ド を 認識 で きる よら, PL プ [I プログ ラム 
を 準備 し て お か を けれ ば な ら な い 。 


REGIONAL( 1 ) デー タ ・ セ ッ ト を アク セス する 
SEQUENT1T AL UPDATE フ ァイル に 対す る READ と 
REWR 1 TE の 両 ス テー トメ ント の 関係 に つい て の 規則 は , 
CONSECUTIVE デ ー タ ・ セ ッ ト (KC 対 する 規則 と 同じ で ある 
( 上 で 述べ た 通り )。 


直接 アク セス 
REGIONAL( 1 ) デー タ ・ セ キット を 処理 する の 用 いら れる 


DIRECT フ ァイル は , INPUT ま た は UPDATE 属性 の ど ち 
ら か を つけ て 開く と と が で きる 。 す べ て の デー タ 転 送 ス テー トメ ン 


ト は , 原始 キ 一 を 含ん で い を けれ ば な を なら な い ( DIRECT 司 性 は 
KEYED 属性 を 暗 太 し て いる た め )。 


REGIONAL( 1 ) デー タ ・ セ モッ ト の 中 の レコ ー ド の 取出 し , 
追加 . また は 思 換 を を する た め (C, 次 の 規則 に し た が っ て , 
DIRECT UPDATE フ ァイル を 使用 す る と と が で きる 。 


1. 取出 し : 見 みかけ で ある か ., 実際 の レ ュ ー ド で ある か KC& 関 係 
を く , すべ て の レコ ュー ド が 取り 出さ れる 。 見 か け レ コー ド を 
認識 で きる よら (CC プロ グラ ム を 準備 し を けれ ば な ならない 。 


2. 追加 : 原始 キーC よ っ て 指定 され た 区 域内 の 既存 の レコ ュー 
ド ( 実際 また は 見 か け の ) が , WRITE ステー トメ ント 
よっ て 新しい レコ ー ド と 思 き 換え られ る 。 


3 信 換 え : REWRITE ステ ー ト メン ト の 中 の 原始 キー 
ょ っ て 指定 され た レコ ュー ド が , 見 か け で ある か 実際 の レ ュ ー 
ド で ある か C は は 関係 を く , 置き 換え られ る 。 


REGIONAL( 3) 編成 


REGIONAL( 3 ) デー タ ・ セ ッ ト の 場合 は , 各 レ コー ド は , レ 
コー ド の 直前 に ある 記録 され た キー に よっ て 識別 され る 。 他 の レコ 
ー ド か ら 相 対 的 に 人 た, デー タ ・ セ ッ ト 内 の レコ ュー ド の 実際 の 位置 
は , その 記録 され た キー て よっ て 決ま る の で は な を なく, レコ ー ド を デ 
ー タ ・ セ ッ ト 《 追 加 す る た め の WRITE ス テー トメ ント の 原始 キ 
ー の 中 で 与え られ た 区 域 番 号 に よっ て 決ま る 。 


各区 城 番号 は , その デー タ ・ セ モッ ト が 入っ て いる 上 直接 アク セス 装 
罰 上 の 1 トラ ッ ク を 議 別 する も の で あり , 16777215 を 越え て 
- い て は な ら な い 。 


1 つの 区 域 に は , 1 個 ま た は 数 個 の レコ ー ド を 和信 れる と と が で き 
る o 


デー タ ・ セ ッ ト は , F 形式, また は U り 形式 レコ ュー ド を 入れ 
る と と が で きる 。 デ ー タ ・ セ ッ ト が 前 も っ て 形式 設定 され て いる 場 
合 は ., デー タ ・ セ ッ ト 内 の すべ て の トラ ッ ク は クリ アー され て ち お り , 
オペ レー ティ ング ・ シ ステ ム に て よって, 各 ト ラッ ク の 先頭 容量 レヒ 
コー ド ( その トラ ッ ク 上 で 使用 可能 を & ス ペー ス の 量 が 記録 され て い 
る ) が つけ られ て いる 。 


レコ ー ド が デー タ ・ セ ッ ト K 追 加 さ れる と き , レコ ュー ド は , 指定 
され た 区 域 が 含ま れ て いる トラ ッ ク の 最初 の 使用 可能 を スペ ー ス と, 
記録 され た キー と いっ し ょ 書き 出さ れる 。 レコ ー ド が 読ま れる と 
き , 該当 する 記録 され た キー を も ゃ も つ レ コー ド の 探索 は , 指定 され た 
区 域 を 含む サト ラッ ク の 先頭 か ら 開 始 さ れ , その トラ ッ ク の 終り まで 
続け られ る 。 


原始 キー 


原始 キー の 文字 スト リン グ 値 は , 2 つの 論理 的 を 部 分 (区 域 番 号 と 
比較 キー ) を も つと 考え る と と が で きる 。 出力 の と き , 比較 キー は 
記録 され た キー と し て 書か れる 。 入力 の と き , と の キー が , 記録 さ 
れ た キー と 比較 され る 。 


- 原始 キー の 右端 の 8 文字 は , 区 域 番号 を 表わし て お ぉ り , 
16777215 を 越え な たい, 符号 を し の 1 0 進 整 定数 で を けれ ば な を 
ら な い 。 区 域 番 号 が と の 数 より 大 きい と き は , 16777216 の モ 
ジュ ロ と し て 扱わ れる 。 つ まり , 16777226 る は 10 と し て 扱わ 
れる 。 区 域 の 指定 C は , 0 か ら ? まで の 文字 と プラ ンク 文字 し か 使 
ら と と が で き な い 。 先行 の プラ ンク は ゼロ と 解釈 され る 。 また , 
と の 数 の 間 に プ ラン ク を 入れ る と と は で きず , も し 入れ る と , 最初 
の プラ ンク が あっ た と と ろ で 区 域 番号 は 終り (C な る 。 比較 キー は , 
原始 キー の 左側 の 部 分 を 占め る 文字 スト リン グ で あり , 区 域 番号 と 
重複 し て いて も , 別に な っ て いて も て よく, 他 の 有効 で を い 文 字 (C よ 
っ て , 区 域 番 号 と 区 別 す る と と が で きる 。 比較 キー の 長 さ は , 
ENVIRONMENT 属 性 の KEYLENGTH オ プシ ョ ン に よっ て 
指定 され る 。 指定 され た キー の 長 さ より る 原始 キー の 方 が 短い 場合 
は , 右側 に プラ ンク が 補充 され て 拡張 され る 。 レ コー ド を 取り 出す 
た め C は , 比較 キー と , レコ ー ド の 記録 され た キー と が 完全 KC 一 致 
し て いな けれ ば を ならない 。 比較 キー に , 区 域 番 号 を 含め る と と が で 
きる が , と の よう な 場合 , 原始 キ 一 と 比較 キー は 同じ し で ある 。 か わ 
り て, 原始 キー の 一 部 分 だ け を 使用 する こと は で き な い 。 比較 キー 
は つね (CKEYLENGTH と 同じ で ある 。 原始 キー が KEYLEN 
十 8 より 長い と き は , 比較 キー と 区 域 番号 の 間 に あ る 原始 キー の 文 
字 は 無視 され る 。 


原始 キー 関す る 次 の 例 を 考え て みよ う ( 廊 字 "『6!*! は , プラ ン 
ク を 表わし て いる )。 


KEY ('JOHNbDOEbbbbbb12363!) 


右端 の 8 文字 は , 区 域 の 指定 , すなわち レコ ー ド の 相対 番号 を 表 わ 
し て いる 。 関連 する ENVI RONMENT 属 性 は , KEYLPNGTH 
(1 4 ) と いう オプ ショ ン を も っ て いる と し ょ う 。 レコ ー ド を 取り 
出す と き は , 区 域 番号 12363 が 含ま れる トラ ッ ク の 先頭 か ら 探 
索 が 始ま きり, JOHNbDOEbbbbbb と いう 記録 され た キー を 
も つ レ ュ コード が 発見 され る まで , 探索 が つづ けら れる 。 


オプ ブ プション が , KEYLENGTH( 19 ) で あっ た と し て も $, 探索 

は 同じ 位置 か ら 始 め ら れる 。 し か し , 比較 キー と 原始 キー は 同じ 長 
さ な を なので, と の 場合 の 探索 は , 記録 され ん た キー' JOHNbDOE 
bbbbbb12363! を も つ レ ュー ド K 対 する も の な る 。 
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KEY (!JOHNbDOEbbbbbbDIVISTIONb23bb 
bb34627!) 


と の 例 で は , 右端 の 8 文字 (先行 アラ ンク が 含ま れ て いる が , と れ 
は ゼロ と 解 和 札 さ れる 。 探索 は , 区 域 番号 DU00034627 か ら 始 ま 
る 。 KEYLENGTH( 14 ) が 指定 され て いる 場合 は , 
DIVISIONb4236 と いら 9 う 交 字 は 無視 され る 。 


COUNTER は FIXED BINARY(21 ) と 宣言 され て お 
り , NAME は CHARACTER(15 ) と 宣言 され て いる と し ょ 
う 。 キー は , 次 の よら 指定 する と と が で きる 。 


KEY (NAME | COUNTER ) 


COUNTER の 値 は , 1 1 桁 の 文字 スト リン グ K 変 換 さ れる 。 ( 変 
換 の 規則 で は , と の 長 さ の 2 進数 値 を 文字 (変換 する と , 3 桁 の プ 
ラン ク と 8 桁 の 1 0 進数 値 か ら を る 1 1 桁 の スト リン グ と な る と 指 
定 さ れ て いる 。 ) 変換 され た スト リン グ の 右端 の 8 文字 の 値 は , 区 
域 の 指定 と みな され る 。 し た が っ て , キー の 長 さ の 指定 が 
KEYLENGTH( 15 ) の と き は , NAME の 値 が , 比較 の 指定 と 
みな され る 。 


キー の 変換 の 軽減 : 通常 , 原始 キー を 指定 し て いる 入出 力 ステ ー 
トメ ント の 各々 (C 対 し て , コン パイ ラー は , キー を 固定 2 進数 変 
換 す る た め の 変 換 シ ルー チン を 組み 入れ る 。 次 の よら な 特別 の 場合 《C 
は , 変換 シー チン は 不要 で ある 。 


1 REGIONAL(1) : 原始 キー が , 固定 2 進数 の 要素 変 


数 また は 精度 (p , 0 ) を も つ 定 数 (た だ し , 1 3 く p<23) 


で ある と き 。 


2. REGIONAL( ぅ 3) : 原始 キー が , 次 の よう な 形式 を し 
て いる と き 。 


( 文字 スト リン グ 式 1 Ir ) 


た だ し , r は, 固定 2 進数 の 要素 変数 また は 精度 (p,0) 
を も つつ 定 数 (13<p く 23 )。 


デー タ ・ セ ッ ト の 作成 


REGIONAL( 3 ) デー タ ・ セ ッ ト は , 順次 的 みか また は 直接 アク 
セス の どちら か よっ て 作成 する こと と が で きる 。 


どちら の 場合 も , その デー タ ・ モ ッ ト 結 び つ けら れ を た ファ イル 
が 開か れる と き C, デー タ ・ セ ッ ト は , 各 ト ラッ ク 上 で 使用 可能 を 
スペ ー ス の 量 を 指定 する 容量 レコ ュー ド を つけ て 初期 設定 され る 。 


デー タ ・ モ セット を 作成 する の (CSEQUENTIAL OUTPUT 
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ファ イル を 使用 する と き は , 区 域 番号 の 昇順 に C レ ュー ド を 提示 し を 
けれ ば な を なら な い が , 連続 する いく つか の レ ュ ー ド 対し て 同じ 区 域 
番号 を 指定 し て も よい 。 と の 大 序 に C ェ ラー が ある と , KEY 条件 が 
起 と る 。 同じ 区 域 番 号 が 指定 され た レコ ー ド で トラ ッ ク が いっ ぱい 
(C を る と , 区 域 番 号 は , 自動 的 に 1 増やさ れる 。 同じ 区 域 番号 を も 
つ レ コー ド を さら て ゃ も っ と 追加 し ょ うと する と , KEY 条件 が 起 と 
る (順序 エラ テー )。 


緩衝 域 を も つ フ ァイル を 用 いて デー タ ・ モ セット を 作成 し て いる と 
き (て , ファ イル が 閉じ し られ る 前 に 出さ れ た 最後 の WRITE また は 
LOCATE ステ ー ト メン ト が , デー タ ・ モ セット の 限界 を 越え て レ 
コー ド を 出力 し ょ うと する と 。 CLOSE ス テー トメ ント よっ て 
ェ ラ ー 条 件 が 起 さ れる と と も ある 。 


デー タ ・ セ ッ ト を 作成 する の (CDIRECT OUTPUT ファ イ 
ル が 使用 され て いる と き は , レコ ー ド を ラン ダム な 順序 で 提示 する 
と と が で きる の で , キー が 重複 し て いて も , 何 の 条 件 も 起 ら を い 。 
使用 可能 を スペ ー ス が あれ ば , 指定 され た トラ ッ ク 上 新しい キー 
が 挿入 され る 。 


REGIONAL( 3 ) デー タ ・ セ ッ ト が 作成 され た あと は , それ 
を アク セス する ファ イル は , SEQUENTIAL INPUT また 
は UPDATE, ある い は DIRECT INPUT ま た は UPDATE 
と し て 開く と と が で きる 。 既存 の デー タ ・ セ ッ ト 全 体 を 削除 し て 貨 
き 換え る 場合 だ け は , OUTPUT と し て 開く と と が で きる 。 


順次 アク セス 


REGIONAL(3 ) デ ー タ ・ セ ッ ト を アク セス する の 用 いら れ 
る SEQUENTIAL フ ァイル は , INPUT ま た は UPDATE 
属性 の どちら か を つけ て 開く と と が で きる 。 データ 転送 ステ ー ト メ 
ント は , KEY オブ ショ ン を 含ん で いて は を ら な い が , KEYTO 
オプ ショ ン は 使用 で きる の で , ファ イル は KEYED 属 性 を も っ て 
いて も よい 。 KEYTO オプ ショ ン は , 記録 され た キー だ け を , 指 
定 の 変数 (C 割 り 当 て る と と を 指定 する る の で ある 。 KEYTO ォ プ 
ショ ン で 指定 され て いる 文字 スト リン グ 変 数 の 桁 数 が , 
KEYLENGTH オ ォ オプ ショ ン で 指定 され た も の より 多い と き は , 返 
され る 値 ( 記録 され た キー ) は , 右側 に プラ ンク を つけ て 拡張 され 
る 。 KEYLENGTH で 指定 され た も の より 桁 数 が 少 を いと き は , 
返さ れる 値 は 右側 で 切り 捨て られ る 。 


順次 アク セス は , 相 装 トラ ッ ク の 昇順 C 行 を われ る 。 レ コー ド は , 
この 順 (CK 取り 出さ れる の で , 必ず し も ゃ データ ・ セ ッ ト K 入 れ ら れ た 
順に は を ら な い 。 記録 され た キー は , 順次 アク セス の 順序 に は 関係 
し な い 。 


REGTIONAL (3 ) デー タ ・ セ モッ ト を アク セス する 
SEQUENTTIAL UPDATE フ ァイル 対す る READ と 
REWRTI TE の 両 ス テー トメ ント の 関係 に つい て の 規則 は , 
CONSEQUTTVE デ ー タ ・ セ ッ ト の 場合 と 同じ で ある (前述 の 通り ) 。 


直接 アク セス 


REGIONAL( 3 ) デー タ ・ セ ッ ト を 処理 する の に 用 いら れる 
DIRECT フ ァイル は , INPUT また は UPDATE 属性 の ど ち 
ら か を つけ て 開く と と が で きる 。 す べ て の デー クタ 転 送 ス テー トメ ン 
ト は , 原始 キー を も っ て いな けれ ば な を ならない 。 ( DIRECT 属性 
は , KEYED 属 性 を 暗示 し て いる た め )。 


1. 取出 し : 指定 の , 記録 され ん た キー を も つ レ コー ド が 発見 さ 
れ な を ない 場合 は , KEY 条件 が 起こ る 。 


2. 追加 : WRITE ステ ー ト メン ト は , 指定 され を た トラ ッ ク 
上 (すでに ある レ ュ コー ド の 後 C, スペ ー ス が あれ ば , 新しい 
レコ ー ド を 搬入 する 。 


3 置換 を : REWRITE ステ ー ト メン ト の 中 で 原始 キー 
ェ っ て 指定 され た レコ ー ド が 存在 し た ない 場合 は , KEY 条件 
が 起こ る 。 


注 : 記録 さん た キー が 重複 し て いる いく つか の レコ ー ド が 1 つの 
トラ ッ ク 含 まれ て いる 場合 は , 重複 し た キー が 指定 され た と き C 
得 ら れる レコ ー ド は , わか ら を な い 。 


装置 に 結び つけ られ る ファ イル ( 1BM 3525 カー ド 容 孔 装 置 ) 


IBM 3525 ヵ ー ド 冠 孔 装置 は , カー ド の 読取 や 印刷 も で きる 80 
桁 カ ー ド 容 孔 装置 で , I BM シス テム 3 7 0 の 場合 (使用 可能 で 
ある 。 と の 装置 用 の CTLASA ぉ よび CTL360 制 候 文 字 が , 図 
1 2.5 ぉ 上 び 図 1 2.6C ヒ それ ぞ れ リス ト し て ある 。 


と の 装置 は , 複数 操作 の 機能 を も っ て いる の で , 装置 に 2 つま た 
は 3 つの ファ イル を 結び つけ る と と に よって, 装置 を 1 回 通す だ け 
の 間 ( 2 つ 以 上 の 操作 (読取 , 密 お よび 印刷 ) を 同じ カー ド K 対 
し て 行 な り と と が で きる , と いう 利点 が ある 。 と の 装置 , お よび 
IBM 3505 ヵ ー ト 読取 装置 の 使用 法 に つい て の 詳細 が , と の コ 
ン バ イ ラー の プロ グラ マー の 手引 書 (C 述 べら れ て いる 。 し か し , ブ 
ログ ラム を 書く と き , 特定 の 制約 に つい て 考慮 する 必要 が ある 。 
こと の よう ら な 制約 と は , 以下 の よう を も の で ある 。 


1. 装置 K 結 び つ けら れ た ファ イル は , RECORD 属性 を も っ 
て いな けれ ば を ら な を な いし, また , すべ て が BUFFERED 
か , すべて が UNBUFFERED の どちら か で を な けれ ば を なら 
な い 。 


2. レコ ー ド は , F- 形 式 で 8 0 桁 の 長 さ (印刷 また は 容 孔 (C 結 
び つ けら れ た ファ イル の 場合 は , 制 仙 ベ イト と し て さら 1 
バイ ト ) の も の で を な けれ ば な を なら を な い 。 


3 ファ イル 放 結 び つ けら れ た 読取 装置 また は 塵 也 装 賀 が 開か れ 
る と き , BUREERS オプ ショ ン の 値 が 1 モッ ト さ れ 
る 。 


4. 装置 に 結び つけ られ る いく つか の ファ イル は , どの よう な 頂 
番 で 開い て も よい が , その いずれ か へ の (また は そ と か ら の ) 
転送 が 行 を た われ る 前 に すべ て の ファ イル を 開い て お か な けれ 
ば な たら な い 。 

5. 結び つけ られ る ファ イル 応じ て , 各 カ ー ド 対し て 行なわ 
れる 該当 の 操作 は , 必ず , 読取 一 府 也 一 印刷 の 大 に を っ て い 
を けれ ば な ら な い 。 と の 用 序 の 規則 が 守ら ち れ て いな を な いと, 
ERROR 条件 が 起 と る 。 印刷 操作 だ け は 省略 する と と が で 
きる 。 

6. 行 の 位置 を 決め る た め の 制 彼 文 字 を 使用 する 印刷 関連 の ファ 
イル は , カー ド の 送 込み を し な いよ うに て し な を けれ ば を ら を な い 。 
その カ ヵ カード KK 対す る 最大 の 行 数 ( 2 また は 25 ) を 越え て 印 
刷 す る 命令 が 出さ れ た と き , ある い は 新しい レコ ー ド を 意味 
する 制御 文字 が 使用 され て いる と きじ, と の よら な と と が 起 
と る 。 た と えば , ' 1 ! と いう 制 件 文字 は , 次 の カー ド の 最 
初 の 行 C 印 刷 す る と と を 指定 する も の で ある 。 


7 装置 に 結び つけ られ る いく つか の ファ イル は , 通常 , どの + 
ら な 順序 で 閉じ て も よい が , それ ら の ファ イル が 1 つ で も ゃ 閉 
し られ た あと は , 転送 を する と と は で き な い 。 し た が っ て , 
BUERERED OUTPUT フ ァイル 対し て LOCATE 
ステ ー ト メン ト を 使用 する と きけ は, 注意 し な けれ ば な ら な い 。 
LOCATE ステ ー ト メン ト か ら の 出力 は ,. その ファ イル 
対す る 次 の LOCATE, WRITE, また は CLOSE ス テー 
トメ ント が 与え られ る まで , 実際 に は 行 を われ を い 。 印刷 関 
連 の ファ イル と 冠 孔 関連 の ファ イル の 両方 に 上 LOCATE ス 
テー トメ ント を 使用 し て いる と き は , 印刷 ファ イル より 前 人 
窟 ファ イル を 指定 する ょ らし て , 複数 閉止 の CLOSE 
ステ ー ト メン ト を 使用 し を けれ ば を ら な い 。 た と え ぱ ぴ , 


LOCATE A FILE(PUNCHOUT ) : 
LOCATE B FILE(PRINTOUT ) : 
CLOSE FILE(PUNCHOUT), FILE(PRINTOUT): 


レコ ー ド 方 式 転 送 の 要約 
次 の 事項 は , レコ ュー ド 方 式 転送 の 主 を 特徴 を 上 げた も の で ある ゐ 。 


1 SEQUENTIAL フ ァイル は , レコ ュー ド を 物理 的 を 順 C 処 
理 し て ゆく と と (INDEXED ま た は キー 順 の VSAM デー 
タ ・ セ ッ ト , ある い は BACKWARDS フ ァイル の 場合 を の 
ぞ く ) を 指定 し て いる 。 INDEXED また は キー 順 の 
VSAM デー タ ・ モ セッ ト は , キー の 昇順 (処理 され る 。 
BACKWARDS フ ァイル は , 逆 の 物理 的 を 順序 で 処理 され 
る 。 
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2. DIRECT ファ イル は , レコ ー ド を ラン ダム みな 順序 で 処理 
で きる と て と を 指定 し て いる 。 所 要 の レコ ュー ド は , キー よっ 
て 識別 する 。 

3 SEQUENTIAL フ ァイル (CC よ っ て アク セス , 作成 また は 
修正 され る デー タ ・ セ ッ ト 内 の レコ ー ド は , 記録 され た キー 
を も っ て いて も , い を なく て も よい 。 も っ て いる と き は , 記録 
され た キー は , KEYTO な ぉ よび KEYFROM オプ ショ ン 
(て よっ て それ ぞ れ , デー タ ・ セ ッ ト か ら 取 り 出 し た り , 入れ 
た りす る と と が で きる 。 


4. INDEXXED ま た は キー 順 の VSAM デ ー タ ・ セ ッ ト は , 
KEYED 属性 を も つ SEQUENTTIAL INPUT ま た は 
SEQUENTIAL UPDATE フ ァイル を 用 いて , 次 の + 
2(C し て アク セス する と と が で きる 。 フ ァイル は , 所 要 の レ 
コー ド の キー を 指定 する READ KEY 操作 に よっ て , デー 
タ ・ セ キッ ト 内 の 所 定 の レコ ュー ド KC 位 置 づ けさ れる 。 


5. SEQUENTI AL UPDATE フ ァイル の デー タ ・ セ ッ ト 
の 既存 レコ ュー ド は , 書き 直し た り , 修正 し た りす る と と も で 
きる し , 無視 する と と も で きる 。 WRITE ステ ー ト メン ト 
を 使っ て , DIRECT UPDATE フ ァイル (C レ コー ド を 
追加 する と と が で きる 。 UPDATE ファ イル 内 の 既存 の レ 
コー ド は , REWRITE ステ ー ト メン ト を 使っ て 置き 換え 
る と と が で きる 。 DPELETE ステ ー ト メン ト を 使っ て レ ュ 
ー ド を 削除 し た あと , その レコ ュー ド が 入っ て いた スペ ー ス を 
再び 要求 する と と が で きる 。 

6 REWRITE ステ ー ト メン ト が レコ ー ド を 偽 き 換え る の 
対し て , WRITE ステ ー ト メン ト は , レコ ー ド を デー タ ・ 
モッ ト 《 追 加 す る 。 し た が っ て , WRITE ステ ー ト メン ト 
は , OUTPUT ファ イル で $ も , DIRECT UPDATE 
ファ イル で も 使用 する こと が で きる が , REWRITE ステ 
ー ト メン ト は , UPDATEE ファ イル で し か 使用 する と と が 
で き な い 。 さら , DIRECT ファ イル の 場合 , REWRTITE 
ステ ー ト メン ト は , 置き 換え られ る 既存 の レコ ュー ド を 議 別 す 
る た め (C KEY オプ ショ ン を 使用 する の 対し て , WR I TE 
ステ ー ト メン ト は , KEYFROM オプ ショ ン を 使用 する 。 
と の オプ ショ ン は , デー タ ・ セ ッ ト の 中 に C レ ュー ド を 書き 出 
す 位 置 を 指定 する ば か り で な く , REGIONAL( 1 ) デー 
タ ・ キ セット の 場合 以外 は , デー タ ・ セ ッ ト の 中 (記録 され る 
識別 キー も 指定 する 。 


ん SEQUENTTIAL INPUT ま た は SEQUENTI AL 

UPDATE ファ イル の レコ ュー ド は , READ ステ ー ト メン 
ト の TIGNORE オプ ショ ン を 使用 する と と に よっ て , 飛ば 
し た り , 無視 し た りす る と と が で きる 。 IGNORE オォ プシ 
ョ ン の 式 は , 飛ば され る レ ュ コー ド の 数 を 指定 する も の で ある 。 
FILE オォ オプ ショ ン だ けが 指定 され て いる READ ステ ー ト 
メン ト は , 1 レコード を スキ ッ プ する と と を 指示 する も の で 
ある 。 


レコ ー ド ファ イル の 宣言 の 例 


多 に あげ る の は , ファ イメ 定数 の 宣言 の 例 で ある 。 
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ENV IRONMENT 属性 は ,。 つね 指定 し を けれ ば な ら を いし , ま 
た , MEDIUM オ プシ ョ ン で つね K, 論理 装置 の 名 前 と その デー タ 
・ モ セッ ト K 対 し て 使用 され る 物理 装置 の タメ イプ を 指定 し を けれ ば な 
ら な い 。 


例 1 : 


DECLARE FILPE#3 INPUT DIRECT 
ENVIRONMENT(U RECSIZE(328 ) 
REGIONAL(3) 
KEYLENGTH(8) 
MEDIUM(CSYS001, 2314 ) ) : 


と の 宣言 は , うつ の ファ ィ ル 属性 ( INPUT, DIRECT, ぉ 
よび ENVTRONMENT ) だ け を 指定 し て いる 。 と の 他 KK 暗 示さ 
れ て いる 属性 は , FILE (上 記 の 属性 の いずれ か ら も 暗示 され る )。 
RECORD, KEYED ( DIRECT によって 暗示 され る ), ぉ 
ょ び UNBUFFERED( こ と れ も DIRECT か ら 暗 示さ れる ) で 
ある 。 有効 範囲 は , 省略 時 解 羽 ヒ に エ り EXTERNAL で ある 。 
ENVIRONMENT 属 性 は 。 デー タ ・ セ モット が REGTIONAL(3 ) 
編成 の も ゃ の で あり , 最高 3 2 8 ベイト の 長 さ の 不定 長 レ ュー ド を も 
っ て いる と と を 指定 し て いる 。 KEY オプ ショ ン は , と の ファ イル 
を 参照 する 各々 の READ ステ ー ト メン ト の 中 で 指定 し な けれ ば な 
ら な い 。 


欧 2 : 


DECLARE INVNTRY UPDATE BUFFERED 
ENVIRONMENT (F RECSIZE(100) 
INDEXED 
KEYLENGTH(B8 ) 
MEDIUM(CSYS001, 2314 )): 


と の 宣言 も , うつ の ファ イル 属性 だ け ( UPDATE, 
BUFFERED , お よび ENV 1 RONMENT ) を 指定 し て いる 。 暗示 さ 
れる 属性 は , FILE, RECORD, ぉ よび SEQUENTI AL 
( 後 の 2 つの 属性 は , BUFFEREDC よ っ て 暗示 され る ) で ある 。 
有効 範囲 は , 省略 時 解釈 < より EXTERNAL で ある 。 こ と の デー タ 
・ モ セット は , INDEXED 編成 で あり , 各々 1 0 0 バイ ト の 固定 
長 レ コー ド を 含ん で いる 。 と の デー タ ・ セ ッ ト は , 実際 (C は 記録 
され た キー が 含ま れ て いる が , KEYED 属性 が 指定 さん て いな を い 
の で , READ ステ ー ト メン ト の 中 で KEYTO ォ プシ ョ ン を 指定 
する と と は で き な い 。 


DECLARE INVNTRY FILE SEQUENTIAL 
UNBUFFERED 
ENVIRONMENT(F RECSIZE(100) 
CONSECUTIVE 
MEDIUM(SYS001, 2314 ) ) : 


と の よう な 宣言 で は , INVNTRY は , 別 の 目的 の た め K 開 く と と 
が で きる 。 た と えば , と れ は 次 の よう に し て 開い て も よい 。 


OPEN FILE (INVNTRY) OUTPUT: 


と の ファ イル は , 上 の よう に し て 開き , 次 CC 閉じ て , さら に の も MK 
開き 直す こと も で きる 。 た と えば げ , 


OPEN FILE (INVNTRY) INPUT: 


ペー この 機能 は , CONSECUTIVE 編 成 の UNBUFFERED 
SEQUENTTAL フ ァイル の 場合 に だ け 許 され る も の で , OPEN 
ステ ー ト メン ト で は , INPUT また は OUTPUT 属性 し か 指定 
する と と が で き ない 。 


有効 を ステ ー ト メン ト * , 写 よ び 記入 すべ き オ プシ ョ ン 使用 し て も よい 他 の オプ ショ ン 


SEQUENTTIAL OUTPUT| WRITE FILE( フ ァイル 式 ) FROM( 変 数 ) : 
BUFFERED 


LOCATE 変数 FILE( フ ァイル 式 ) : SET( ポ イン ター 変数 ) 


SEQUENTIAL OUTPUT| WRITE FILE( フ ァイル 式 ) FROM( 変 数 ) : EVENT( 事 旬 変 数 ) 
UNBUFFERED 


SEQUENTTIAL INPUT FILE( フ ァイル メ 式 ) INTO( 変 数 ) : 
BUFFERED 
FILE( フ ァ イ x 式 ) SET( ポ イン ター 変数 ) : 
FILE( フ ァイル ん 式 ) IGNORE( 式 ) : 


6 SREQUENTIAL INPUT FILE( フ ァイル 式 ) INTO( 変 数 ) : EVENT( 事 象 変数 ) 
ヘン UNBUFFERED 
FILE( フ ァイル メ 式 ) IGNORE( 式 ) : EVENT (事象 変数 ) 
SEQUENTIAL UPDATE| READ FILE( フ ァイル 式 ) INTO( 変 数 ) : 
BUFFERED 
READ FILE( フ ァイル メ 式 ) SET( ポ イン ター 変数 ) : 
READ FILE( フ ァ ィ イメ 式 ) IGNORE( 式 ): 
REWRITE FILE( フ ァ イ メ 式 ) : FROM( 変 数 ) 
SEQUENTIAL UPDATE| READ FILE( フ ァイル 式 ) INTO( 変 数 ) : EVENT (事象 変数 ) 
UNBUFFERED 
READ FILE( フ ァ イ メ 式 ) IGNORE( 式 ): EVENT (事象 変数 ) 
REWRITE FILE( フ ァイル メ 式 ) FROM( 変 数 ) : EVENT( 事 象 変数 ) 
に 
! 完全 な ファ イル の 宣言 は , FILE, RECORD, ぉ よび ENV1RONMENT の 諸 属 性 が 含め られ る 。 
2 ステー トメ ント : 。 READ FILE( フ ァイル 式 ) : は 正しい ステ ー ト メン ト で あり , 
READ FILE( フ ァイル メ 式 ) IGNORE( 1 ) : と 同じ で ある 。 
図 12.10 CONSECUTIVE お よび エン トリ 一 順 の VSAM デ ー タ ・ セ キッ ト の 作成 と 
アク セス 使用 で きる ステ ー ト メン ト と オプ ショ ン 
に 
No 
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有効 を な ステ ー ト メン ト * , ぉ よび 記入 すべ き オ プシ ョ ン 使用 し て も よい 他 の オプ ショ ン 


SEQUENTTIAL OUTPUT|WRITE FILE( フ ァ イ ァ 式 ) FROM( 変 数 ) 
KEYFROM( 式 ): 


LOCATE 変数 FILE( フ ァ ィ メル メ 式 ) SET( ポ イン ター 変数 ) 
KEYFROM( 式 ) : 
SEQUENTTAL INPUT READ FILE( フ ァイル 式 ) INTO( 変 数 ) : KEY( 式 ) また は KEYTO 
( 娘 字 スト リン グ 変 数 ) 
READ FILE( フ ァイル 式 ) SET( ポ イン ター 変数 ) : KEY( 式 ) また は KEYTO 
(文字 スト リン グ 変 数 ) 


READ FILE( フ ァ ィ イメ 式 ) IGNORE( 式 ) : 
SEQUENTIAL UPDATE | READ FILE( フ ァ イ ん 式 ) INTO( 変 数 ) : KEY( 式 ) また は KEYTO 
( 廊 字 スト リン グ 変 数 ) 
READ FILE( フ ァイル メ 式 ) SET( ボ インター 変数 ) KEY( 式 ) また は KEYTO 
(文字 スト リン グ 変 数 ) 
READ FILE( フ ァ ィ メル 式 ) IGNORE( 式 ) : 
REWRITE FILEB( フ ァ イ メ 式 ) : FROM( 変 数 ) 
DIRECT INPUT READ FILE( フ ァ イ メ 式 ) INTO( 変 数 ) EVENT (事象 変数 ) 
KEY( 式 ): 
DIRECT UPDATE READ FILE( フ ァ ィ メ 式 ) INTO( 変 数 ) EVENT (事象 変数 ) 
KEY( 式 ) : 
REWRITE FILE( フ ァイル メ 式 ) FROM( 変 数 ) EVENT (事象 変数 ) 
KEY( 式 ) : 
WRITE FILE( フ ァイル メ 式 ) FROM( 変 数 ) EVENT (事象 変 数 ) 
KEYFROM( 式 ) : 


! 完全 な ファ イル の 宣言 人 に は, FILE, RECORD, ぉ よび ENVI RONMENT の 諸 属性 が 含ま れる 。 KEY, KEYFROM, な よび 
KEYTO の いずれ か が 使用 され て いる と き は , KEYED 属 性 も 含ま れ て いな けれ ば を なら な い 。 
2 ステー トメント: READ FILE( フ ァイル メ 式 ) : は , ステ ー ト メン ト : 

READ FILE( フ ァ イ メ 式 ) IGNORE(1): と 同じ で ある 。 


注 : SEQUENTTAL フ ァイル の 場合 は , UNBUFFERPED 属 性 は 無視 され , BUFFERED と みな され る 。 


図 12.1 1 INDEXED デ ー タ ・ セ ッ ト の 作成 と アク セス 使用 で きる 
ステ ー ト メン ト と オプ ショ ン 
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有効 を ステ ー ト メン ト * 。 おぉ よび 記入 すべ き オ プシ ョ ン 使用 し て も よい 他 の オプ ショ ン 


ここ SEQUENTIAL OUTPUT| WRITE FILE( フ ァイル ァ 式 ) FROM( 変 数 ) 
BUFFERED KEYFROM( 式 ): 
LOCATE 変数 FILE( フ ァ イ メ 式 ) SET( ポ イン ター 変数 ) 
KEYFROM( 式 ) : 


SEQUENTIAL OUTPUT| WRITE FILE( フ ァイル 式 ) FROM( 変 数 ) 
UNBUFFERED KEYFROM( 式 ) : EVENT (事象 変数 ) 


SEQUENTIAL INPUT | READ FILE( フ ァ イ メ 式 ) INTO( 変 数 ) : KEYTO( 廊 字 ス トリ ング 変数 ) 
BUFFERED READ FILE( フ ァ イ メ 式 ) SET( ポ イン ター 変数 ): KEYTO( 文 字 ス トリ ング 変数 ) 
READ FILE( フ ァイル 式 ) IGNORE( 式 ) : 
SEQUENTIAL INPUT | READ FILEB( フ ァイル 式 ) INTO( 変 数 ) : EVENT( 事 象 変数 ) 
UNBUFFRERED ぉ よび ンプ また は KEYTO 
( 文字 スト リン グ 変 数 ) 
FILE( フ ァイル メ 式 ) IGNORE( 式 ) : EVENT (事象 変数 ) 
SEQUENTIAL UPDATE| REPAD FILE( フ ァイル メ 式 ) INTO( 変 数 ) : KEYTO( 文 字 ス トリ ング 変数 ) 
BUFFERED READ FILE( フ ァイル 式 ) SET( ポ イン ター 変数 ) : KEYTO( 文 字 ス トリ ング 変数 ) 
READ FILE( フ ァ ィ イメ 式 ) IGNORE( 式 ) : 
REWRITE FILE( フ ァイル z 式 ) : FROM( 変 数 ) 
SEQUENTIAL UPDATE| READ FILE( フ ァイル 式 ) INTO( 変 数 ) : EVENT (事象 変数 ) 
UNBUFFERED ぉ お よび プ ま た は KEYTO 
( 文字 スト リン グ 変 数 ) 
READ FILE( フ ァイル メ 式 ) IGNORE( 式 ): EVENT (事象 変数 ) 
REWRITE FILE( フ ァイル メ 式 ) FROM( 変 数 ) : EVENT (事象 変 数 ) 


DIKECT OUTPUTF WRITE FILE( フ ァイル ん 式 ) FROM( 変 数 ) EVENT (事象 変数 ) 
KEYFEROM( 式 ) : 

DIRECT INPUT READ FILE( フ ァイル 式 ) INTO( 変 数 ) EVENT (事象 変数 ) 
KEY( 式 ): 


DIRECT UPDATE READ FILE( フ ァ ィ イメ 式 ) INTO( 変 数 ) EVENT (事象 変数 ) 
Ne ン KEY( 式 ) : 
REWRITE FILE( フ ァ イ メ 式 ) FROM( 変 数 ) EVENT (事象 変数 ) 
KEY( 式 ) : 
WRITE FILE( フ ァ ィ ん 式 ) FROM( 変 数 ) EVENT (事象 変 数 ) 
KEYEROM( 式 ): 


+ 完全 を ファ イル の 宣言 (は, FILE, RECORD, お よび ENVTIRONMENT の 諸 属 性 が 含ま れる 。 KEY, KEYFROM お よび 
KEYTO の いら ず れ か が 用 いら れ て いる と き は , KEYED 属 性 も 含ま れ て いな けれ ば な ら な い 。 
“スネ ステートメント: READ FILE( フ ァイル メ 式 ) : は, ステ ー ト メン ト : 

READ FILE( フ ァイル ん 式 ) IGNORE( 1 ) : と 同じ で ある 。 


図 1 2.12 REGIONAL デ ー タ ・ モ セット の 作成 と アク セス K 使 用 で きる 
ステ ー ト メン ト と オプ ショ ン 
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有効 を ステ ー ト メン ト ? , お よび 記入 すべ き オ プシ ョ ン 使用 し て も よい その 他 の オプ ショ ン 


SEQUENTIAL OUTPUT| WRITE FILE( フ ァ ィ ル 式 ) FROM( 変 数 ) 
BU KEYEFROM( 式 ): 
LOCATE 変数 FILE( フ ァ イ メ 式 ) SETT( ポ イン ター 変数 ) 
KEYFEROM( 式 ) : 


SEQUENTIAL OUTPUT| WRITE FILE( フ ァイル ん 式 ) FROM( 変 数 ) EVENT( 事 象 変数) 
UNBUFFERED KEYFROM( 式 ) : 


SEQUENTIAL INPUT READ FILE( フ ァイル 式 ) INTO( 変 数 ) : KEY( 式 ) また は KEYTO 
BUFFERED ( 文字 スト リン グ 変 数 ) 
READ FILE( フ ァイル 式 ) SET( ポ イン ター 変数 ) : KEY( 式 ) また は KEYTO 
( 娘 字 スト リン グ 変 数 ) 


READ FILE( フ ァイル 式 ) IGNORE( 式 ) : 
SEQUENTTIAL TINPUT FILE( フ ァイル 式 ) INTO( 変 数 ) : EVENT (事象 変数 ) 
UNBUFFERED お よび プ ま た は KEY ( 式 ) また 
は KEYTO (文字 スト リン グ 変 
数 ) の へい ずれ か 
READ FILE( フ ァイル ん 式 ) IGNORE( 式 ) : EVENT (事象 変数 ) 


SEQUENTIAL UPDATE | READ FTILE( フ ァイル 式 ) INTO( 変 数 ) : KEY( 式 ) また は KEYTO 
BUFFERED ( 女 字 スト リン グ 変 数 ) 
READ FILE( フ ァイル 式 ) SETF( ポ イン ター 変数 ) : KEY( 式 ) また は KEYTO 
( 文字 スト リン グ 変 数 ) 


READ FILE( フ ァイル 式 ) IGNORE( 式 ) : 
REWRITE FILEB( フ ァ イ メ 式 ) : FROM( 変 数 ) 
DELETE FILEB( フ ァイル メ 式 ) : KEY( 式 ) 
SEQUENTIAL UPDATE | READ FILE( フ ァイル 式 ) INTO( 変 数 ) : EVENT( 事 象 変数 ) 
UNBUFFERED お よび ノ ま た は KEY ( 式 ) また 
は KEYTO ( 廊 字 スト リン グ 変 
数 ) の いずれ か 
READ FILE( フ ァイル 式 ) IGNORE( 式 ): EVENT( 事 泉 変数 ) 
REWRITE FILE( フ ァイル 式 ) FROM( 変 数 ) : EVENT( 事 象 変 数 ) 
DELETE FILE( フ ァイル メ 式 ) : KEY( 式 ) お よび また は 
EVENT (事象 変数 ) 


図 12.13(2 の 1 ) キー 順 の VSAM デ ー タ ・ セ ッ ト の 作成 な よび アク セス 
使用 で きる ステ ー ト メン ト と オブ プション 
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有効 を ステー トメ ント * , お よび 記入 すべ き オ プシ ョ ン 使用 し て も よい その 他 の オプ ショ ン 


DIRECT INPUT READ FILE( フ ァイル ァ 式 ) INTO( 変 数 ) 
BUFFERED KEY( 式 ): 


READ FILE( フ ァイル 式 ) SE 和 T( ポ イン ター 変数 ) 
KEY( 式 ): 


DIRECT INPUT READ FILE( フ ァイル ァ 式 ) INTO( 変 数 ) EVENT (事象 変数 ) 
UNBUFFERED KEY( 式 ): 


DIRECT UPDATE READ FILE( フ ァイル 式 ) INTO( 変 数 ) 
BUFFERED KEY( 式 ): 


READ FILE( フ ァイル 式 ) SET( ポ イン ター 変数 ) 
KEY( 式 ): 

REWRITE FILE( フ ァイル ん 式 ) FROM( 変 数 ) 
KEY( 式 ): 

DELPETE FILE( フ ァイル 式 ) KEY( 式 ) : 


WRITE FILE (ファ イル ん 式 ) FROM( 変 数 ) 
KEYFROM( 式 ) : 


DIRECT UPDATE READ FTILE( フ ァイル 式 ) INTO( 変 数 ) EVENT (事象 変数 ) 
UNBUFFERED KEY( 式 ) : 


REWRITE FILE( フ ァイル 式 ) FROM( 変 数 ) EVENT (事象 変 数 ) 
KEY( 式 ): 


DELETE FILE( フ ァイル 式 ) KEY( 式 ) : EVENT (事象 変数 ) 


WRITE FTILE( フ ァイル 式 ) FROM( 変 数 ) EVENT (事象 変数 ) 
KEYEFROM( 式 ): 


「 完全 な ファ イル の 宣言 人 は , FILE ぉ よび RECORD 属 性 が 含ま れる 。 KEY, KEYFROM, ぉ よび KEYTO の いずれ か が 使用 さ 
れ て いる と き は , KEYED 必 性 も 宣言 含め な けれ ば な ら な い 。 
2 ステー トメ ント : 。 READ FILEB( フ ァイル 式 ) !: は , ステ ー ト メン ト :: 

READ FILE( フ ァイル メ 式 ) IGNORE( 1 ) : と 同じ で ある 。 


図 12.13(2 の 2 ) キー 順 の VSAM デ ー タ ・ セ ッ ト の 作成 と アク セス 
使用 で きる ステ ー ト メン ト と オプ ショ ン 
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第 1 3 章 : 編集 お よび スト リン グ の 取扱 い 


- PL 上 1 で は , 算術 演算 子 , 比較 演算 子 。 お よび ビッ ト ・ ス トリ ン 
ク 演 算 子 C ょ っ て 行なわ れる デー クタ 操作 は , ビッ ト 取 扱い な よび 編 
集 ( 関 する 様々 な 機能 に よっ て , 展開 され る 。 と れ ら の 機能 は , デ 
ー タ 属性 , ステ ー ト メン ト の ォ オプ ション, 組込み 関数 な よび 擬似 
変数 に ょ っ て 指定 する 。 


と の あと , と れ ら の 各 機 能 に つい て , 例題 を あげ を が ら 概 説 す る 。 


割当 て に よる 編集 


割当 て ステ ー ト メン ト と よっ て 実行 され る 編集 の 最も 基本 的 な 形式 
(は, 割当 て 記号 の 右辺 の 値 の デー タ ・ タ イプ ブ を , 受け 入れ 側 の 変 
数 の 属性 (と 合う よう 変換 す る と と が 含ま れ て いる 。 割り 当て られ 
る 値 は , 受け 入れ 側 の フィ ー ル ド の 属性 (に 合わ せら れる の で , 割り 
当て られ る 値 の 精度 まほ た は 長 さ は , 変更 され る と と も ある 。 と の よ 
うな 変更 は , 変換 され る 項目 !C 数 字 ま た は 文字 を 追加 する と と , 
ぉ よび 変換 され る 項目 か ら 数 字 ま た は 文字 を 削除 する と と も 含め る 
と と が で きる 。 デー タ 変 換 の 規則 につい て は , 第 4 章 「 式 と デー タ 
変換 ] および F 節 「 デ ー タ 変換 と 式 の 値 の 計算 」 の と ころ 述べ ら 
れ て いる 。 


スト リン グ ・ デ ー タ の 長 さ の 変更 


スト リン グ 変 数 に 値 が 割り 当て られ る と き は , 必要 人 K 応 し て, 受け 
入れ 側 ス トリ ング と 同じ スト リン グ ・ タ イプ (文字 ま を は ビッ ト ) 
C 値 が 変換 され る 。 必要 が あれ ば , 受け 入れ 側 の スト リン グ C つ い 
て 宣言 され た 長 さ に 合わ せ て , 切り 捨て られ た り , また 受け 入れ 側 
の スト リン グ が 固定 長 の と き は , 右側 < 拡張 され た りす る 。 た と え 
・ ば ,。 SUBJECT が , 10 桁 の 固定 長文 字 ス トリ ング で ある と と 
を 示す CHARACTER( 10 ) と いら 属性 を も っ て いる と し て , 
次 の ステ ー ト メン ト つい て 考え て みよ ょ 9o 


SUBJECT = ニ 'TRANSEORMATIONS' : 
右辺 の スト リン グ の 長 さ は , 1 5 桁 で ある 。 し た が っ て , それ が 
SUBJECT KC 割り 当て られ る と き は , スト リン グ の 右端 か ら 5 


桁 が 切り 捨て られ る 。 と れ は , 次 の も の を 実行 する の と 同じ で ある 。 


SUBJECT 三 'TRANSFEORMA': 


割り 当て られ る スト リン グ が 。 受け 入れ 側 の スト リン グ 変 数 K 対 
し て 宣言 され た 長 さ より ゃ 短い と き は , 割り 当て られ る スト リン グ 
は , 右側 C ヒ プラ ンク (文字 スト リン グ 変 数 の と き ) , また は ゼロ 
(ビッ ト ・ ス トリ ング 変数 の と き ) が 拡充 され る 。 SUBJECT が 
や は り CHARACTER( 10 ) と いう 属性 を も っ て いる と すれ ば , 
次 の 2 つの ステ ー ト メン ト は , SUBJECT 対し て 同じ 値 を 割 
り 当て る と と を る o 


SUBJECT 'PHYSTICS'> 
SUBJECT 三 !PHYSICSbbb' : 


b と いら 文字 は , プラ ンク 文字 を 表わし て いる 。 


CODE は , BIT(10 ) と いう 属性 を も る つ ビ ッ ト ・ ス トリ ング 
変数 で ちあ る と すれ ば , 次 の 2 つの ステ ー ト メン ト は , CODEK 対 
し て 同じ 値 を 割り 当て る と と な る 。 


CODE デ !110011!Bj 
CODE テ !1100110000'B: 


し か し , SUBJECT が CHARACTER( 1 0 ) と いう 値 を も 
っ て いる と すれ ば げ ば , 次 の 2 つの ステ ー ト メン ト は , SUBJECT 
対し て 同じ 値 を 割り 当て る と と (C は な を ならない 。 


SUBJECT = テ "110011!B: 
SUBJECT = '1100110000'B: 


最初 の ステ ー ト メン ト が 実行 され る と , 右辺 の ビ ピット ・ ス トリ ング 
定数 が 最初 に 文字 スト リン グ K 変 換 さ れ , 次 (て, 右側 C, プラ ンク 
文字 (ゼロ ・ ビ ピッ ト で は な く ) が 拡充 され る 。 と の ステ ー ト メン ト 
は , 次 の も の と 同じ で ある 。 


SUBJECT テー 110011bbbb": 


上 の 2 つの うち 2 番目 の ステ ー ト メン ト は , ビッ ト ・ ス トリ ング 
か ら 文 字 ス トリ ング ・ タ イプ へ の 変換 を 必要 と する だ け で , 次 の も 
の 等 し い 。 


SUBJECT 三 1100110000": 


し か し , VARYING 属性 を る つ ス トリ ング 変数 割り 当て ら 
れる と き は , スト リン グ 値 は 。 ブラ ンク 文字 また は ゼロ ・ ピ ビ ピット 
よっ て 拡張 され な い , か わり (て, 受け 入れ 側 の スト リン グ 変 数 の 長 
さ 指 定 が , 割り 当て られ る 各々 の スト リン グ の 長 さ を 記述 する よう 
(て う まく 調整 され る 。 し か し , 割り 当て られ る スト リン グ の 長 さ が , 
長 さ の 変わ る スト リン グ 変 数 対し て 宣言 され た 最大 の 長 さ を 越え 
て いる と きけ, 功 捨 て が 行 を われ る o 
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割当 て の 別 の 形式 


割当 て ステ ー ト メン ト の 全 か (CC, PL/1 は, 変数 C 値 を 割り 当 
て る た め の 別 の 方 法 が いく つか ある 。 と の う も , 入出 力 ス テー トメ 
ント 関係 する 方 法 は 2 つ あ る 。 1 つ は , 実際 入出 力 操作 が 行 を 
われ る も の で , も りら 1 つ は , 全く 内 部 的 を デー タ 移 動 の 方 法 で ある 。 


入出 力 操作 


割当 て ステ ー ト メント は ,。 コン ピュ ー タ ー 内 部 で の 記憶 位置 間 で の 
デー タ 転 送 C 関 する る の で ある が , 入出 力 操作 は , コン ビ ピュー ター 
の 内 部 記憶 装置 と 外部 記憶 装置 の 間 で 転送 が 行なわ れる よう な 割当 
て の , 関連 形式 と みた を な す と と も で きる o 


し か し , レコ ー ト 方 式 の 操作 で は , 転送 され る と き (C 和 論理 レコ ュー 
ド の 中 に ある 項目 の デー タ 変 換 は 行なわ れ な を ない 。 レコ ー ド の 編集 が 
必要 を ら ば , レコ ー ド を 書き 出す 前 また は 読み 込ん だ あと で , 内 部 
記憶 域 の 中 で 行なわ を けれ ば を ら な いっ 


それ KK 対し て , スト リー ム 方 式 の 操作 で は ,。 デー タ 項目 を 読ん だ 
り , 書い た りす る と き KC 使 用 で きる 編集 機能 が いく つも ゃ 用意 さ れ て 
いる 。 と れ ら の 編集 機能 は , 割当 て ステ ー ト メン ト で 行なわ れる 機 
能 と 人 ほ 條 同じ で ある が , どの よう な デー タ 変 換 に も つね 文字 タイ 
プ が 関係 する 点 ( 入力 の と き は 文字 タイ ブ か ら の 変換 , 出力 の と き 
は 文字 タイ ブ へ の 変換 ) は , 例外 で ある o 


GE T お よび PUT ステ ー ト メン ト の STRING オプ ショ 
ン 


GET お を お よび PUT ス テー トメ ント の 中 で STRING オプ ショ ン 
を 使 ら 9 と と (と よっ て , 内 部 記憶 装置 と 外部 記憶 装置 の 間 で は な く , 
内 部 記憶 位置 同志 の 間 で デー タ を 転送 する た め (C, こと これら の ステ ー 
トメ ント を 使用 する と と が で きる 。 で GET と PUT の どちら の ス 
テー トメ ント の 場合 も ,。 FILE (ファ イル 式 ) (て よっ て 指定 さ 
れる FILE オ ォ オプ ブ プション は ,。 欧 の 形式 で 示す よう CC, STRKING ォ 
プション K 加 き 換え られ る o 


GET STRING( 文 字 ス トリ ング 名 ) デー タ 指 定 : 


PUT STRING( 文 字 ス トリ ング 名 ) デー タ 指 定 : 
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GET ス テー ト メン ト は , デー タ ・ リ スト の 中 の 変数 (C 割 り 当 てら 
れる デー タ 項 目 が , 指定 され た 文字 スト リン グ か ら 得 られ る と と を 
指定 し て いる 。 PUT ス テー トメ ント は , デー タ ・ リ スト の デー タ 
項目 を , 指定 され た 文字 スト リン グ 変 数 と 割り 当て る と と を 指定 し 
て いる 。 “" デー タ 指定 " は , 入力 と 出力 の と と ろ で 述べ た も の と 同 
し で ある 。 一 般 C,。 と れ は 次 の よら な 形式 を し て いる 。 


DATA 〔[( デ ー タ ・ リ スト ) 〕 
[LIST〕 (デー タ ・ リ スト ) 
EDIT {| (デー タ ・ リ スト ) (形式 リス ト ) ] ・・・ 


STRING オプ ショ ン は , スト リー ム ュ 方 式 転送 の ろ 2 つの モー ド 
の 各々 で 使用 す る こと と が で き る が , 編集 指示 転送 ( この モー ド で は , 
入力 の 流れ は 連続 する 文字 の スト リン グ と みな され る ) の 場合 C, 
最も 効果 が ある 。 リス ト 指 示 ち お よび デー タ 指示 の GET ス テー トメ 
ント の 場合 。 文字 スト リン グ の 中 の 個々 の 項目 は ,。 カン マ ま た は プ 
ラン ク に よっ て 区 切ら な けれ ば な を ならない 。 デー タ 指 示 の GE T ス テ 
ー ト メン ト では, 転送 を 止め る セミ コロ ン を スト リン グ た も 含め な 
けれ ば た な ら な いし , また 各 デ ー タ 項目 を , 割当 て ステ ー ト メント の 
形式 の 中 て 記入 し な けれ ば な ら な い 。 編集 指示 転送 は , 形式 リス ト 
を 用 いて 編集 機能 を 行なう 。 CO LUMN 制御 形式 項目 は , 
STRING オプ ショ ン と いっ し ょ 使用 で き な いと と 注意 し て 
いた だ きた いっ 


STRING ォ オォ オプション を も つ GET DATA ス テー トメ ント で 
は , NAME 条件 は 起 ら を た い o か わり (。 FILE オプ ショ ン を も 
つ GET DATA ステ ー ト メン ト K 対 し て NAME 条件 を 引き 起す 
ょ ら な 状況 の と き (C, ERROR 条件 が 起こ と る o 


STRING オブ ショ ン を 用 い る と 。 1 つの ステ ー ト メント で デー 
タ の 集合 と 分 散 の 操作 を 行なう と と が で きる よう (て な り ,。 レコ ー ド 
方 赤 の ステ ー ト メン ト (て よっ て 転送 され る 文字 スト リン グ を スト リ 
ー ム 方 式 に よっ て 処理 する と と が 可能 に たる o 次 の ステ ー ト メン ト 
て つい て 考え て みよ う o 


PUT STRING (RECORD) EDIT 
(NAME, PAY#,HOURS*RATE) 
(A(12),A(7),P'$999V.99!)} 


と の ステ ー ト メン ト は, NAME の 文字 スト リン グ 値 を , RECORD 
と いう 名 前 の スト リン グ の 最初 の ( 左端 の ) 1 2 桁 割 り 当て る と 
と , お よび PAY# の 文字 スト リン グ 値 を , RECORD の 次 の 7 
桁 C 割 り 当 て る と と , を 指定 し て いる 。 次 IC,。 HOURS の 値 と 
RA TE の 値 が 乗算 され , その 積 が ,。 ビク チャ ー 指 定 に し た が っ て 
編集 され て 次 の 7 桁 に 入れ られ る o 


いく つか の 異 み る 形式 の レコード ( それ ぞ れ , 自分 自身 の 中 て あ 


へ る デー タ 項 目 の 値 よっ て 形式 の 表示 を し て いる ) を 読ま な けれ ば 
を ら を いと と が よく ある oSTRING オ プシ ョ ン を 使う と , と の よ 
う を レコ ー ド を 処理 す る の が 容易 (て C を る 。 た と えば , 


READ FILE (INPUTR ) INTO (TEMP) : 
GET STRING (TEMP) ED1TT (CODE) (KRK0⑪) : 
IF CODEーー 1 THEN GO TO OTHER_TYPE: 
GET STRING (TEMP) EDIT ( 丈 ,Y ヤ の ) 

( 駐 (1 ) , 3EF(10,4)) : 


READ ス テー トメ ント は 入力 ファ イル INPUTR か ら レ ュー 
ド を 読む 。 最初 の GET ステー トメント は , レコ ュー ド の 最初 の バイ 
ト か ら コ ー ド を 取り 出し , それ を CODEK 割 り 当て る た め 
STRING オプ ショ ン を 使用 し て いる 。 と の コー ド は , レコ ュー ド 
の 形式 を 判定 する た め (C テス ト され る 。 コー ド が 1 の と き は , 2 番 

陸 で 目 の GET ス テー トメ ント は , STRING オプ ショ ン を 用 いて , 
レ ュ コード 内 の 項目 を XX , Y , お よび 必 MC 制 り 当 て る 。 2 番目 の 
GET ステ ー ト メン ト は , スト リン グ TEMP の 中 の 最初 の 文字 を 
無視 する (形式 リス ト の 中 の 双 (1) 形 式 項目 ) よう 指定 し て いる と と 
注意 し て いた だ きた い 。 STRING オプ ショ ン を $ も つ 各 々 の 
GET ス テー トメ ント は つね に ,。 スト リン グ の 最初 の 文字 か ら 走 査 
を 始め る と と を 指定 し て いる 。 し た が っ て , 2 番目 の GEBT ステ ー 
ト メン ト で 無視 され る 文字 は , 最初 の GET ス テー トメ ント (て よっ 
て CODE 割り 当て られ る も の と 同じ 文字 で ある 。 


同じ よう に し て , STRING オプ ショ ン を も つ PUT ステ ー ト 
メン ト を 用 いて , 内 部 記憶 装置 の 中 に レコ ュー ド を 作成 する と と が で 
きる 。 次 の 例 の 中 で ,。 ファ イル OUTPRT は , 最終 的 に は 印刷 さ 
れる も の と し ょ よう 。 


PUT STRING (RECORD) EDIT 
(NAME,PAY#, HOURS*RATE ) 
( 売 1), A(12) 双 (10) A⑦,X(10) 
PD あの W。 の ) 1 

WRITE FILE (OUTPRT ) FROM (RECORD): 


と の PUT ス テー トメ ント は, 文字 スト リン グ 変 数 (割り 当て られ 
る 最初 の 文字 は 1 個 の プラ ンク , すなわち 印刷 の 前 に 1 スペ ー ス と 
る と と を 指定 する キャ リッ ジ 制 御 文 字 で ある と と を , ヌ (1) ス ペー ス 
形式 項目 を 使っ て 指定 し て いる 。 さら に その 和俊 で , 変数 NAME お 
よび PAY# の 値 と HOURS* RATEE と いら 式 の 値 を 割り 当て る 
と と を 指定 し て いる 。 形式 リス ト で は , NAME と PAY# の 間 , 
お よび PAY# と 式 の 値 の 間 (C と プラ ンク を 挿入 する と と が 指定 され 
て いる oc。 WRITE ステ ー ト メン ト は, レコー ド を ファ イル 
OUTPRT 書き 出す た め に レコ ー ド 転送 を 用 いる と と を 指定 し 
て いる 。 
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ビク チャ ー 指 定 は , P エ 1 で 使用 で きる 編集 機能 を 発展 させ た も 


の で , と れ を 使う こと (と よっ て , ブロ グラ マー は , デー タ 形 式 を 大 
巾 と 制御 する と と が で きる 。 ビク チャ ー 指 定 は , 一 連 の 文字 コー ド 
を 引用 符 で 囲ん だ も の か ら 構 成 さ れる が , と の 引用 符 も PICTURE 
属性 の 一 部 分 。 ま た は P ( ビク チャ ー ) 形式 項目 の 一 部 分 で ある 。 


DECLARE PRICE PICTURE'$2Z9V99・: 


PUT FILE(SYSPRINT ) EDIT('PART NUMBER ', 
PART# )(A(12),P'AAA99 文 ・) : 


ビク チャ ー 指 定 に は , 次 の 2 つの タイ プ が ある っ 
・ 数 字 指定 
* 文字 スト リン グ ・ ビ ピク チャ ー 指 定 


PICTURE 属性 の 数 字 指定 は , デー タ 項 目 は 数 量 を 表わし 
て いる が , 文字 スト リン グ と し て 貯え られ る と と , ぉ よび その 数 値 
が スト リン グ の 中 で どの よう 表現 され る か と いう と と を 表示 する 
も の で ある 。 P 形 式 項 目 の 数 字 指定 は , 数 値 が か, 外部 媒体 上 で 六 
字 ス トリ ング と し て どの よう KK 表現 され て いる か (あるいは と れ か 
ら 表現 さ れる か ) を 表示 する も の で ある o 


文字 スト リン グ ・ ビ クチ ャ ー 指 定 は , 固定 長 の 文字 スト リン グ を 
記述 する た め の も 2 う 1 つの 方 法 で あり , スト リン グ 内 の 任意 の 位置 
(CC。 オペ レー ティ ング ・ シ ステ ュ ム で 使用 で きる 完全 を 文字 セッ ト の 
うち あぁ る 特定 の りす サブ プ セッ ト か ら の 文字 だ け を 入れ る と と が で きる と 
と を 表示 する 追加 機能 を も っ て いる 。 


2 つの タイ プ の ピク チャ ー 指 定 の 概念 に つい て は , 以下 別々 
説明 する が , 個々 の ビク チャ ー 文 字 の 詳細 と その 用 法 の 例 は , D 節 
「 ビ ピクチャー 指定 文字 の と と ろ で と りあ げ て ある 。 と と で は , A 
また は 双 と いう ビク チャ ー 文 字 が あれ ば , その ビク チャ ー 指 定 は , 
文字 スト リン グ ・ ビ ピクチャー 指定 と し て 定義 る され て いる の で あり , 
それ 以外 は 数 字 指 定 で ある , と いら と と 注意 する だ け で よい o 


数 字 指定 


数 字 指定 は , 関連 する デー タ 項 目 は 数 値 で ある が , 文字 スト リン 
グ と し て 貯え られ る ( ある い は , 外部 媒体 上 で 表現 され て いる ) と 
と を 指定 する も の で ある 。 また , これ は , 文字 スト リン グ が と る 形 
式 や , スト リン グ の 中 で どの よう MC 数 値 が 表現 され る か と いら と と 
$ 指定 する 。 た と えば げ , 


DCL PRICE PICTURE'$Z9V99・: 
と れ は , PRI CE が , 長 さ 5 の 文字 スト リン グ に よっ て 表わさ れ 


る と と を 指定 し て いる 。 最初 の 文字 は つね (C$, 2 番目 の 文字 は ブ 
ラン ク ま 友 は 非 ぞ ロ の 数 字 , 3 , 4 ,5 番 目 の 文字 は 数 字 で ある 。 
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と の 数 値 は 。 数 値 を 表わす と と の で きる 4 文字 (と よっ て 表示 され , 
VIC ょ っ て 示さ れる 位 軒 と 小数 点 お が ある と み を され る o。 し た が っ て , 
PRICE は , FIXED DECIMAL( 4 , 2 ) と みな され , つ 
れれ で 正 で ある 。 13 。25 は 。'*1325' と 表わさ れ ,。 .?5 は 
'*$b095' と 表わさ れる o 


数 字 指定 に は , 次 の ょ うな 2 つの 主 を 用 法 が ある 。 


。 入出 力 操作 関連 する デー タ 項 目 に 対し て (と れ ら の 項目 は , 
数 値 デ ー タ を 入れ る と と の で きる と と ろ で あれ ば , ブロ グラ 
ム 内 の ど と で で も 使用 する と と が で きる が ) 。 し か し , ビク 
チャ ー の 与え を られ た デー タ 対す る 数 値 操作 の 多く は , コー 
ド 化 され た 数 値 デ ー タ MC 対し て 同じ 操作 を 行なっ た 場合 に く 
ら べ て , 著しく 効率 が 悪く を る o 


。 2 番目 の 用 法 は , ビク チャ ー の 与え られ た 1 つの デー タ 項 目 
が 実際 上 2 つの 値 を も つと と を 止め る 働き を する 。 その 項目 
が 数 値 の 文脈 の 中 で 用 いら れ て いる と きけ は, 数 値 は 。 ビク チ 
ャ ー 指 定 に ょ っ て 定義 され た 変換 処理 に よっ て , 文字 スト リ 
ング か ら 取 り 出 され た り , 文字 スト リン グ 入 れ ら れ た りす 
る o その 項目 が , 文字 スト リン グ 式 が 必要 な 文脈 の 中 で 原 デ 
ー タ と し て 使用 され て いる と き は , その 値 を 表わす 実際 の 文 
字 ス トリ ング が 用 い られ る o。 た と えば , 


DCL COUNT PICTURE'?99' INITIAL(0 ), 
STRING CHAR (⑬) : 

COUNT = デ COUNT +1: 

STRING = COUNT: 


COUNT の 最初 の 表現 は 。 '000' で ある 。 最初 の 割当 て ステ 
ー ト メント で は 。 と れ は , FIXED DECTMAL CC る 
変換 され , 加算 が 行なわ れ て , その 結果 が , ビ ピクチャー 形式 001 
て 変 換 し 直さ れる 。 2 番目 の 割当 て ステ ー ト メン ト で は , スト リン 
グ の 値 が '「001' に セッ ト さ れる o 


定義 の 中 で 文字 スト リング 値 を 使用 にし て も よい と と MC と く K 注 意 
し て いただき た い 。 数 字 デ ー タ 項目 は , 文字 スト リン グ に 重ね て 
定義 し て も よく 〈 く , また その 逆 も 可能 で ある 


数 字 指定 の 中 の ピク チャ ー 文 字 「 9 


ビク チャ ー 廊 字 9 は , 数 字 ビ クチ ャ ー 指 定 の 最も 人 科 単 た 形式 で あ 
る o n 個 の ピクチャー 文字 り 9 の スト リン グ は , その 項目 が , n 桁 の 
固定 長文 字 ス トリ ング て よ っ て 表わさ れる と と , また その 各 桁 は 数 
字 (0 か ら 9 ) で ある と と を 指定 し て いる o。 と の 数 値 は , 無 符号 の 
1 0 進数 ( つまり, FIXED DECIMAL(n,0O ) ) と し て の 
数 字 の 値 で ある 。 た と えば げ , 


DCL DIGIT PICTURE'9・ 
COUNT PICTURE'299 い 
XYZ PICTURE 「(10)9": 
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メ Y ク の 宣言 は 。 ビク チャ ー 文 字 り を 10 回 書く と と に か わる 別 の 
カ 法 を 示す も の で ある っ o 


例 : 


DCL 1 CARD_IMAGE 
2 DATA CHAR(72), 
2 IDENTIFICATION CHAR(3), 
2 _ SEQUENCE PIC'22292!5: 


SEQUENCE = SEQUENCE + 1 
WRITE FILE(OUTPUT) FROM(CARD_ IMAGE ) : 


文字 スト リン グ ・ ビ クチ ャ ー の 中 の 9 の 定義 は , 対応 する 文字 が プ 
ラン ク ま 友 は 数 字 で よい と いり 点 で 異な っ て いる o 


ピク チャ ー 文字 Z お よび * 


数 の 中 の 先行 せ で ロ を プラ ンク で 思 き 換 えた い 場 合 が ある o ビク チャ 
ー の 中 で は 。 乙 ビク チャ ー 指 定 文字 を 使う 9 と と に よっ て , と の よう 
た と と が 可能 (て な る o。 乙 と 2? だ け が 含ま れる ビク チャ ー 指 定 は . 1 
つま た は 数 個 の 乙 の 後 (て, 任意 選択 で 1 つま た は 数 個 の 9 を つづ け 
た 形 (C な る 。 数 値 デ ー タ の 表現 は , その 中 に 入れ られ る 数 字 が 普通 
な ら ば ゼロ (て な る は ず で ある が , その 左側 に ある すべ て の 桁 も ゼロ 
で ある よう な と き は , 文字 スト リン グ の と の 桁 は プラ ンク に な る と 
いら 点 を の ぞ け ば ,' 9 ' ビク チャー 指定 の 場合 と 同じ で ある o た 
2 


DCL PAGE_NUMBER PICTURE' ZZ の 7205 


197 と いう 値 は , '197) を なり , 69 は 「'b69'。 5 は bb5 りら 
ゼロ は bb0'(C な る o 全体 が の ビ ピクチャー 指定 の 場合 は , ゼロ 
の 値 は , 全 杵 が ブ プラ ンク の スト リン グ に な る o 


星 印 の ビク チャ ー 指定 文字 は と らら 文字 と 同様 の 効果 を も っ 
て いる が , プラ ンク の か わり CC* が スト リン グ の 中 に 入れ られ る 点 
が 異な っ て いる 。 た と えば , と れ は , 小切手 を 印刷 する と き (C, フ 
ィ ー ル ド 内 に プラ ンク の スペ ー ス を 残し た く な い 場 合 た ど と 使用 す 
る と と が で きる 。 た と えば , 


DCL CREDIT PICTURE !'$**9.99・: 
( $ を よび () と いう 文字 に つい て は , 次 KC 説明 する 。) 9 5 と い 9 値 


は '$**0.925・ (て な り , 12350 と いう 値 は , '$123.50! 
な る o 


ピク チャ ー 文 字 V 


ビク チャ ー 指 定 文 字 V は , 文字 スト リン グ 内 の 仮想 上 の 小数 点 の 位 
置 を 示す も の で ある o。 た と えば , 


DCL VALUE PICTURE 'Z2V22215 


スト リン グ ' 12345・ は , 数 値 12.24 5 を 表わし て いる 。 ビク チ 
ャ ー 指定 の 中 に ある V と いう 文字 は , 文字 スト リン グ 表 現 の 中 (C あ 
る 文字 の 位置 を 指定 する も の で は を いと と に た 注意 し て いた だ きた い o 
と とく, デー タ 項 目 へ の 割当 て の 際 , 小数 点 は , 文字 スト リン グ 
の 中 CK 含 まれ を な い 。 


ピク チャ ー 文 字 B . ,。 / の 擁 入 


小数 点 ピ ビク チャー 文字 (・) を , 数 値 ビ ピクチャー 指定 の 中 (に 入 れる こと 
が で きる 。 と れ は 単 C, 文字 表現 の 値 の 中 MC, 小数 点 が 含ま れる と 
と を 指示 する も の で ある 。 し た が っ て , 小数 点 は , その 文字 スト リ 
ング 値 の 一 部 分 で ある 。 小数 点 ピ ビク チャー 文字 が あっ て も , と れ は 
変数 の 算術 値 の 一 部 分 で は な いた め , 割付 け の 際 人 小数 点 の 位置 合 
せ は 行なわ れ を い o 文字 V だ けが , 小数 点 の 位置 合せ を 行 を 2。 た 
と えば 。 


DECLARE SUM PICTURE ' 2?222V.292 い 5 


SUM は , 3 番目 を 4 番目 の 数 字 の 間 ( 仮 想 上 の 小数 点 が ある 5 桁 
の 数 字 か ら な る 数 を 表わす 数 字 変 数 で ある 。 小数 点 挿 入 廊 字 に ょ よ 
っ て 指定 され る 実際 の 小数 点 は , 算術 値 の 一 部 分 で は を く 〈, その 文 
字 ス トリ ング 値 の 一 部 で ある o (小数 点 ビ ピクチャー 次 字 は , 廊 字 V 
の 左右 の どちら か と 置く こと が で きる 。 ある 種 の 文脈 で は , 左 C 
する か 右 C す る か で 意味 が 違う 9 と と も ある が , 多く の 場合 は , V. 
iC する 方 が よい 。 D 節 「 ビク チャ ー 指 定 文字 | を 参照 の と と 。 ) 次 
(て あげ る 2 つの ステ ー ト メン ト は , 同じ 文字 スト リン グ を SUMK 
割り 当て る も の で ある 。 


SUM デ 123: 


SUM 三 12300: 


最初 の ステ ー ト メン ト の 場合 は , 1 2 3 と いう 数 字 の 右側 2 桁 の 
ゼ ロ が 付け 加え られ る O 


次 の 宣言 の 影響 CK つ いて 注意 し て いた だ きた い 。 


DECLARE RATE PICTURE '2V992.29 い 5 


RATE は , 次 の よら 使用 する も の と し と ょ うら o 


RATE = 762: 


と の ステ ー ト メン ト が 実行 され る と き , 小数 点 の 位置 合せ は , 文字 
V の と と ろ で 行なわ れる の で あっ て , RATE 対す る ビク チャ ー 
指定 の 中 の 小数 点 ビ クチ ャ ー 文 字 の と と ろ で は な を い 。 RATE が 印 
刷 さ れる と すれ ば , 「762.00' と 印刷 され る が , その 算術 値 は 
76200 で ある o 


文字 V は , ビク チャ ー 指 定 の 中 に 1 つ し か 書く と と が で き な い が , 
小数 点 ビク チャ ー 文 字 は , 2 回 以上 書く と と が で きる 。 し た が っ て, 
デュ ー イ ィ の 数 表記 法 や ョ ー ロ ッ ズ 諸国 の 数 表記 C よく 用 いら れる よ 
うな 形式 で , 数 字 デ ー タ 項目 の 中 の 数 字 グ ルー プ ブ を , 小数 点 で 区 
切る と と も 可能 (と を る o 


小数 点 ビ ピク チャ ー 文 字 は 数 字 デ ー タ 項目 の 文字 スト リン グ 値 
小数点 を 挿入 する ので, 挿入 文字 と 呼ば れる 。 PL ノ 1 で は , と 
の ほか (3 つの 挿入 文字 ( カン マ (,), 斜線 し 2, な よび ブラ ンク O⑪) ) 
が 用 意 さ れ て いる 。 次 の ステ ー ト メン ト と つい て 考え て みょう 。 


DECLARE RESULT PICTURE !92999999,V27・) 
RESULT = 1234567: 


RESULT の 文字 スト リン グ 値 は 。 '1.234.567,00' (C な る o 
小数 点 の 位置 合せ は , 文字 V で 指定 され て いる よう (C, 右 か ら 2 桁 
目 の 前 で 行なわ れ て いる と と 注意 し て いた だ き た い 。 RES ULT 
が コー ド 化 算術 フィ ー ル ド (割り 当て られ る と き は , 算術 形式 と 変換 
され る デー タ の 値 は , 1234567.00C な る o 


B と いう 文字 は , 文字 スト リン グ の 対応 する 桁 プラ ンク が つね 


挿入 され る ( * ゼロ 消去 文字 の スト リン グ の 中 に あっ て る ) と い 
う 点 で , 他 の 3 つの 挿入 文字 と は 違っ て いる o 


ピク チャ ー 文 字 $ 

ビ ピクチャー 文字 $ は , 数 字 デ ー タ 項目 の 指定 の 位置 (通貨 記号 $ 

を 出す と と を 制御 する も る の で ある 。 たとえば, 次 の ステ ー ト メン ト 

で 示す よう に , 数 字 項 目 の 左 側 に ドル 記号 を つけ る と と が で きる 。 
DECLARE PRICE PICTURE '$99V.99・: 


PRICE 三 12.45: 


PRICE の 文字 スト リン グ 値 は , 女 字 スト リン グ 定 数 *$ 12.45 
と 同じ で ある 。 し か し , その 算術 値 は 12.45 で ある o 
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数 字 指定 の 中 の 符号 の 指定 


符号 付 の 情報 を , 数 字 デ ー タ 項目 に 入れ る た め の 方 法 が いく つか 
ある 。 と の 方 法 の う も 最も 簡単 た も の は , S 文 字 指定 で ある 。 と れ 
は は, 値 が 正 ま を は ゼロ の と き は 「' 十 '。 値 が 負 の と き は 一 を 入 
れる , 廊 字 スト リン グ 表 現 内 の 桁 を 指定 する も の で ある 。 と の 文字 
は , 数 字 桁 全体 の 右側 , また は 左側 の どちら か 置か な けれ ば な ら 
な い 。 た と えば , 


DCL ROOT PICTURE 'S9299・: 

50 は '+T050', ぞ ロ は '+000', 一 243 は "一 2 43・(C な る 。 
同じ よら, ' 二 ! ビ クチ ャ ー 文 字 は , 値 が 正 ま を は ゼロ の と き は 
・ 十 ', 負 の と き は プラ ンク を , 対応 する 文字 格 に 入れ る と と を 指 
定 す る も の で ある 。 "一 "ビク チャ ー 文 字 は , 値 が 正 ま た は ゼロ の 
と き は ブラ ンク , 負 の と き は 一 "を, 対応 する 文字 桁 に 入れ る と 
と を 指定 する も る の で ある 。 


上 重ね 符号 指定 文字 TIR 


符号 付 の 値 を 表わす も る う 1 つの 方 法 が ぶ ある 。 と の 方 法 は , 上 重ね 窒 孔 
符号 指定 CC よる も る の で 。 スト リン グ の 中 (追加 の 桁 を 必要 と し た い 。 
と の 表現 法 は , 数 字 が 含ま れ て いる 桁 の 上 部 (通常 は フィ ー ル ド 
の 最後 の 桁 ) C 1 2 孔 ( 十 を 表わす ) また は 1 1 冠 孔 (一 を 表 わ 
す ) を 重ね る と と MC よっ て , 完了 カー ド (C て 入っ て いる 数 値 デ ー タ の 
中 の 符号 を 表わす 習慣 か らき て いる , その 結果 で きる カー ド ・ コ ー 
ド は , 多く の 場合 , 英字 と 同じ で ある ( た と えば 。 1 から? の 上 
1 2 窪 孔 を 重ね る と A か ら 【, 1 か ら ? の - 上 1 1 冠 孔 を 重ね る と 
J か ら R に なる ), 1 2ー0 ぉ お よび 11 一 0 は 。 PL ン 1 の 文字 セ 
ッ ト と は を な い が , オペ レー ティ ング ・ シ ステ ム よっ て 受け 入れ ら 
れる 文字 の モット の 中 に は ある o 


ビク チャ ー 指 定 文字 T は , 数 字 と 符号 を 上 で 述べ た よう (と し て 入 
れる ( つま り , 正 の 場合 は 1 2 密 を 0 か ら 9 の 上 重ね, 負 の 場 
合 は 1 1 容 孔 を 0 か ら 2? の 上 重ね る ) 文字 スト リン グ 表 現 の 中 の 
文字 を 指定 する も の で ある 。 と の 文字 は ピク チャ ー 指 定 文字 '9* 
を 入れ る と と の で きる と と ろ で あれ ば ,。 と の 桁 あ っ て も よい o 
た と えば , 


DCL _ CREDIT PICTURE (ZZV?2T': 


CREDTIT の 文字 スト リン ク グ 表 現 は 。 4 桁 で ある o 二 21.05 は 
'210E' (て な り , 一 0.07 は 'bb0P' な る o 


_180 DOS PL ン I 最適 化 マ ン パ イラ ー : 言 語 解説 書 第 1 部 


ビク チャ ー 指 定 文字 1 は , 値 が 正 ま た は ゼロ な ら げ 1 2 容 孔 を 数 
字 (重ね る が , 値 が 負 な を ら ば 数 字 だ け の 表現 を 入れ る 文字 格 を 指定 
する も の で ある 。 


ビク チャ ー 指 定 文字 R は , 値 が 負 を ら ば 1 1 窪 孔 を 数 字 の 上 MC 重 
ね る が , 値 が 正 な ら ば 数 字 だ け を 入れ る 文字 桁 を 指定 する も ゃ の で あ 
る o た と えば げ , 


GET EDIT ( 文 ) (PR99「): 


と の ステ ー ト メン ト は 入力 スト リー ム の 次 の 3 桁 多 "132 ' が 
ある と 又 を ( 十 ) 132 に セッ ト し , 一 13 2 が ある と ・J32・ 
CC セ ッ ト す る 。 


その 他 の 数 字 機 能 


上 記 の ビク チャ ー 指定 文字 の 用 法 に つい て の 詳細 は , 洋 動 符号 ぉ ふ よ 
び 河 動 通 貨 記号 , 河 動 小数 点数 値 に 対す る ビク チャ ー 指 定 文字 の 詳 
細 と 合わ せ て , D 節 | ピクチャー 指定 文字 」 の と と ろ K 記 載 さ れ て 
いる 。 


数 字 指 定 文字 を すべ て 列挙 する と , ?, V, 必 。 *。 Y, (), 
(),B,」S, 二 ーー,$,CR,DB,T,1I,R,K,」E,F で 
ある が , と の うち 拭 , V ,F 以 外 は , 文字 スト リン グ 表 現 の 中 1 
文字 が 実際 に ある こと と を 指定 する も ゃ の で ある o 


文字 スト リン グ ・ ピ クチ ャ ー 指 定 


文字 スト リン グ ・ ビ クチ ャ ー 指 定 は , 固定 長文 字 ス トリ ング を 記述 
する た め の も うら 1 つの 方 法 で あり, 使用 可能 な 完全 を 文字 セッ ト の 
特定 の サブ プ セ モット から の 文字 だ けが , その スト リン グ の 任意 の 桁 
人 入り 得る と と を 示す 機能 も も っ て いる 。 


文字 スト リン グ ・ ビ ピクチャー 指定 は ビク チャ ー 指 定 文 字 ま た 
は 又 を 繰返し 使用 する と と (よっ て 認識 され る 。 文字 スト リン グ ・ 
ビ ピクチャー 指定 の 中 で 使用 で きる 文字 は , X , A , お よび り 9 だけ で 
ある 。 と れ ら は 各々 , 文字 スト リン グ の 中 で , 次 の も の を 入れ る と 
と の で きる 1 桁 の 位置 の 存在 を 指定 し て いる o 


双 その 導入 シス テム で 認識 可能 を 文字 (8 ビッ ト の バイト で 表 
わ さ れ る 256 種 の ビッ ト の 組合 せ の すべ て )。 


ム A すべ て の 英字 。 ## ,@ , $ , ま 友 は ブラ ンク グ 。 


9 数 字 ま を は ブラ ンク 。 数 字 指 定 の ピク チャ ー 指 定 文字 2 と 
の 違い と 注意 。 


文字 スト リン グ 値 が , ビク チャ ー の 与え られ た 文字 スト リン グ ・ 
デー タ 項 目 ' と 割 り 当 て られ た り , 転送 さん た りす る と き は , 対応 す 
る ビク チャ ー 指 定 文字 で の 指定 に し た が っ て , 各 桁 の 特定 の 文字 が 
妥当 性 検査 を 受け , 無効 を 文字 が あれ ば , CONVERS ION 条件 が 
起 と され る 。 た と えば げ , 


DPECLARE PART# PICTURE 'AAA99 双 ': 
次 の 値 は PART# 割り 当て て も 有効 で ある o 


' ABC12M'* 
'bbb0 9? 
'XYZb13* 


次 の 値 は , 正しく な い ( 正 し く な いら 文 字 に は , 下 線 が つけ て ある ) o 


'AB123M' 
' ABC1/2・ 
'Mb#A5j・ 


ビッ ト ・ ス トリ ング の 取扱 い 


以下 の 例 は 。 ビッ ト ・ ス トリ ング の 取扱 いで 使用 で きる PL 上 1 の 
機能 の いく つか を 示す も の で ある o 


DECLARE 1 PPRSONNEL_-R ECORD, 

2 NAME 
3 LAST CHARACTER(15), 
3 FIRST CHARACTER(10 ), 
3 MIDDLE CHARACTER(1), 

2 CODE_STRING, 
3 MALE BIT(1), 
3 SECRETARIAL BIT(1), 
3 AGE, 

4 (UNDER_20, 
TWENTY_TO_30, 
OVER-30 ) BIT(1), 

3 HE 1IGHT , 

4 (OVER_ 6, 

FIVE_SIX TO_6 
UNDER_5_6) BIT(1), 
3 WE 1GHT, 

4 (OVER -180, 
ONE_TEN_TO_180, 
UNDER_110) BIT(1 ), 

3 EYES, 
4 (BLUE, 
BROWN, 
HAZ EL 
GREY , 
OTHER) BIT(1), 


3 HAIR, 
4 (BROWN, 
BLACK , 
BLOND , 
RED, 
GREY, 
BALD) BIT(1), 
3 EDUCAT ION, 
4 (COLLEGE, 
HIGH_SCHOOL, 
GRAMMAR SCHOOL ) BIT1): 


と の 構造 て は , 文字 スト リン グ の 人 小 構 造 で ある NA ME と , ビッ ト <* 
スト リン グ の 小 構造 で も や る CODE_STR ING が 含ま れ て いる 。 
省略 時 解釈 に ヒ に よって, PERSONNEL RECORD の 要素 は , 
UNALIGNED 属性 を も っ て いる 。 し た が っ て , CODE_ 
STRINC は , 1 バイ ト (C8 つ の 要素 を も つ 形 で 。 す な を わ 長 さ 
2 5 の ビッ ト ・ ス トリ ング と 同じ よう (と し て マッ プ さ れる 。o 


と の スト リン グ の 最初 の 2 ビッ ト は それ ぞ れ , 2 つの 択 一 項目 
(MALE か ーーMA LE お よび SECRKE TARI AL か , 
ー SECRETARTIAL) を 表わし て いる 。 と の ほか の カテ ゴリ ー 
( レベ ル 3) は 。 それ ぞ れ いく つか の 択 一 項目 の リス ト (C を な っ て いる 。 
( レベ ル 番 号 4 と B IT(1) の 属性 は , 各々 の カ ヵ カテゴリー 対す る 因 
数 CK な っ て いる 。 ) 


PERSONNEL_RECORD 対し て , 次 の よう な ブロ グラ 
^ 部 分 を 用 いる こと と が で きる o 


INREC: READ FILE(PERSON) 

INTO (PERSONNEL_RECORD ) : 

IF (-MALE ge SECRETARIAL 

UNDER_20 
ge UNDER 5 6 
ge UNDER 110 
に 
を 


の 


BLUE 
(HAIR . BROWN ! BLOND) 
g HIGH _SCHOOL ) 
| (MALE g CSECRETARTIAL 
e OVER_30 
eg OVER_6 
e OVER _180 
e EYES.GREY 
e BALD 
ge COLLEGE ) 
THEN PUT LIST (NAMP ) : 
GO TO INREC: 


次 て あげ る の は , 同じ 情報 取出 し 操作 を 行なう た め の 別 の ブロ グ 
ラム の 方 法 で ある 。 


第 1 3 章 : 編集 お よび ストリ ング の 取扱 いら 181 


DECLARE PERS_STRING BIT(25)DEFINED 
CODE_ STRING: 

IF PERS_STRING 
"0110000100110000100000010'B 
THEN GO TO OUTP: 

IF PERS_STRING 
デー *0110000100110000001000010'B 
THEN GO TO OUTP: 

IF PPRS_STRING 
三 *1000110010000010000001100'B 
THEN GO TO OUTP: 

GO TO INREC: 

OUTP: PUT LIST (NAME ) : 
GO TO 1NREC : 


と と で は , ビッ ト ・ ス トリ ング PERS _STRING は , 小 構 造 
CODE_STRTI NG の 上 KC 定義 され て いる 。 探さ れる 情報 の 値 を 
表わす た め (C。 ビッ ト ・ ス トリ ング 定数 が 作ら れる 。 次 (て と の ビ 
ッ ト ・ ス トリ ング は , 各 ビ ピッ ト ・ ス トリ ング 定数 と 順 々 比較 され 
る 。 最初 の 定数 と 2 番目 の 定数 は , 最初 の も ゃ の が 茶色 の 髪 , 2 番目 
の も の が ブロ ント の 髪 の テ スト を する た め の も の で ある 点 以 外 は , 
同じ で ある と と 注意 し て いた だ きた い 。 と れ ら の 2 つの 変形 が , 
最初 の 例 で は , (HAIR. BROWN 1! BLOND ) と いう 形 で 指定 
され て いる 。 


PERSONNEL RECORD を テス ト す る た め の 2 番目 の 方 
法 は , 構造 が AL I GNED で あっ た と き は け , 使用 で き な い と と MC 
注意 し て いた だ きん たい ( オー バー レー の 定義 を する た め の 基 底 識別 
名 は , UNAL IGNED で を けれ ば な ら な ひい )。 最初 の 方 法 を 用 
いる と き は , AL IGNED で あっ た 方 が 効率 が よい o 


と の テス ト は , 一 連 の TIFE ス テー トメ ント (ネスト され て いて も 
よい ) と よっ て 行なう と とも で きる 。 と の 場合 は , 1 個 の IF ステ 
ー ト メン ト CC よって, それ ぞ れ 1 つの ビッ ト が テス ト さ れる 。o 


スト リン グ 組 込み 関数 


PL 1 は , 数 多く の 組込み 関数 が ある 。 その うち の いく つか は , 
擬似 変数 と し て も 使用 する と と が で きる の で , と の 言語 の スト リン 
グ 取 扱い 機能 の さら に 強力 を 道具 と を っ て いる 。 次 に と, と れ ら の 機 
能 に つい て 概説 する ( さら 詳細 に つい て は , G 節 「 組 込み 関数 と 
擬似 変数 」 の と と ろ で 説明 する ) 。 


B IT 組込み 関数 は , デー タ 項 目 を ビッ ト ・ ス トリ ング 変換 す 
る と と を 指定 する も ゃ の で ある 。 組込み 関数 を 使用 する と , ブロ グラ 
マー は , デー タ 変 換 の 標準 的 を 規則 か ら 得 られ る 長 さ を 打ち 消し て , 
変換 され る スト リン グ の 長 さ を 指定 する と と が で きる o 


CHAR 組 込 関 数 は 。 ブロ グラ マー が 指定 する と と の で きる 
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長 さ を もつ 文 字 (と 変換 され る 点 を 除い て , B IT 組込み 関数 と 全く 
同じ で ある 。 


SUBSTR 組込み 関数 は , 受け 入れ フィ ー ル ド の 中 で 擬似 変数 
と し て 使う 2 こと も で きる も の で , こと これ を 用 いる と , 指定 され た スト 
リン グ 値 の 中 か ら 指 定 の サナ プス トリ ング を 抜き 出す ( 擬似 変数 の 場 
合 は 割り 当て る ) と と が で きる o 


INDEX 組込み 関数 を 使用 する と , 指定 され た サ プ ス トリ ン 
グ ( 1 桁 の 文字 また は ビッ ト ) が スト リン グ ( 文 字 ス トリ ング また 
は ビッ ト ・ ス トリ ング の どちら か ) の 中 MC 最初 (C 出 て くる 個所 を 探 
す と と が で きる 。 返さ れる 値 は サ プ ス トリ ング の 最初 の 文字 また 
は ビッ ト の 位置 を 。 スト リン グ の 先頭 か ら 相 対 的 に 示し た も の で あ 
る 。 値 は , 2 進 整数 で 表現 され る 。 指定 の スト リン グ の 中 (て その サ 
プス トリ ング が な いと き は , 返さ れる 値 は ゼロ に な る o 


LENGTH 組込み 関数 は , 文字 スト リン グ ま を た は ビ ピット ・ ス ト 
リン グ の 現在 の 長 さ を 得る た め の も の で ある 。 と れ は , VARY ING 
属性 を る も る つ ス トリ ング の 場合 に と く 婚 有効 で ある o 


HIGH 組込み 関数 は , 婦 合 順序 の 中 で 一 番 高位 の 文字 の 繰返し 
か ら な る , 指定 の 長 さ を も つ ス トリ ング を 得る た め の も の で ある っ 。 
シス テム ュ グ 3 60 で は , と の 文字 は 1 6 進数 の OFF で ある o 


LOW 組 込み 関数 は , 照合 順序 の 中 で 最も 低位 IC ある 文字 の 繰 返 
し か ら な る , 指定 され た 長 さ の スト リン グ を 得る た め の も の で ある 。 
シス テム 360 妃 よ び シス テム 3 7 0 で は , と の 文字 は 16 進 
数 の 0 0 で ある o 


REPEAT 組込み 関数 は , 指定 され を た サブ プス トリ ング を 繰り 返 
レ し て , スト リン グ を 作る も の で ある 。 こと これ は , スト リン グ の バタ ー 
ン を 作る の に 用 いら れる co 


STRING 組込み 関数 は , 擬似 変数 と し て も 使用 で きる も ので, 
集合 体 の 変数 の 中 の す べ て の 要素 を 連結 し て , 1 つの スト リン グ 愛 
素 に する 。 

BOOL 組 込み 関数 を 使用 する と , 指定 され た 2 つの ビッ ト ・ ス 
トリ ング 対し て , 1 6 種 の プー ル 演 算 の いずれ か を 行 な ら と と が 
で きる 。 


UNSPEC 組込み 関数 は , 擬似 変数 と し て ゃ 使用 で きる も ゃ の で , 
内 部 コー ド 化 表現 の 値 は , 変換 せ ず (C ビ ピッ ト ・ ス トリ ング と みな す よ うら , 
指定 する も の で ある 。 た と えば, 


メ ー ARRAY(UNSPEC('A' )): 


上 の ステ ー ト メン ト の 場合 , 文字 'A' の 内 部 表現 は , シュテ ムン 
3 る 60 お よび シス テム ググ 37 0 では, 長 さ が 8 ビッ ト の スト リン グ 
で ある 。 と の ビッ ト ・ ス トリ ング は , 固定 小数 2 進数 の 算術 値 と 変 
換 さ れ , 配列 に 対す る 添字 と し て 用 いら れる 。 ( と の 添字 の 1 0 進 


数 値 は 1 9 3 で あぁ る 。 ) 


TRANSLATE 組込み 関数 は 。 スト リン グ の 中 に ある 指定 の 
文字 要素 を , 指定 され た 儲 換 え 用 の 文字 要素 と 変え ん る も の で ある 。 
置き 換 % られ る 要素 が 入っ て いる , スト リン グ 内 の 「 桁 」 C, 「 軒 
換え ] 用 の 要素 が 挿入 され る 。 


と の 組込み 関数 を 使用 すれ ば , ブロ グラ マー は , 与え られ を た スト 
リン グ の 中 に ある すべ て の 女 字 を , 他 の 2 つの スト リン グ の 中 人 入 
っ て いる 変換 テー プル に し た が っ て , 変換 する と いう 変換 機能 を 使 
用 する と と が で きる よら に な る 。 と れ ら の スト リン グ の 1 つ は , も ゃ 
ぅ 一 方 の スト リン グ の 中 に ある 置換 え 用 の 文字 (C 対 する キー と し て 
働く 。 を た と えば げ , 


DECLARE (W,X,Y,Z) CHAR (③: 
ー・ABC': 


Y テ "TAR':: 
ZZ クー テー" CAB「: 


グ *W 三 「ART) * ォ ング 


VERIFY 組込み 関数 は 。 2 つの スト リン グ を 比較 し て , 一 方 
の スト リン グ の 中 て ある ビッ ト また は 文字 が , も 9 う 一 方 の スト リン 
グ 内 の ど と か に ある か どう 5 か チェ ッ ク す る も の で ある 。 1 つの スト 
リン グ 内 の すべ て の 文字 また は ビット が 2 番目 の スト リン グ の 中 
見 つけ られ た と き は , ' 0' と いう 9 値 が 返さ れる 。 2 番目 の スト リ 
ング 文字 ま を た は ビッ ト が な い 場 合 は , 最初 の スト リン グ の 中 と と 
の 文字 また は ビッ ト が あっ た 位置 を 表わす 値 が 返さ れる 。 


最初 の スト リン グ は , 左 か ら 右 IC 検 査 さ れる 。 合致 し を か っ た ビ 
ッ ト また は 文字 の う も 最初 の ゃ の の 位置 の 値 だ けが 返さ れる 。 
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第 1 4 章 : 


PL ノエ ブロ グラ ム が 実行 され る と き は , 数 多く の 例外 条件 が シス 
テム に よっ て 監視 され て お ぉ お り , それ ら が 起 る と つね と, 自動 的 発 
見 され る よう (に を な っ て いる 。 と れ ら の 例外 条件 は , オー バー フロ ー 
や 入出 力 転送 エラ ー な どの よう て, エラ ー で ある 場合 も ある し , フ 
ァイル の 終り や , 出力 が 印刷 され る と き の ペ ー ジ の 終り を どの よう 
iC。 上 顔 油 で は た い が 起 る と と が 予想 され て いじ る 条件 で ある 場合 も あ 
る 。 また , ブロ グラ ム を チェ ッ ク す る 場合 , 識別 名 の リス ト て ある 
も の の 1 つが 出 て きた と きけ は, 例外 条件 と し て 取り 扱 2 よ う 指定 す 
る と と に て よっ て 。 選択 的 な 流れ の 追跡 を 行なう と と も で きる 。 


テス ト され る 条件 は それ ぞ れ , 名 前 が 与え られ て お り , と の 名 
前 を 使っ て , プロ グラ ュー は , 例外 条件 の 取扱 い を 制御 す る 。 条 件 
名 の リス ト は , PL/1 言語 の 一 部 分 で ある 。 各 条 件 に 対す る キー 
ワー ド 名 と その 説明 に つい て は , H 節 |「 ォ ン 一 条件 」 を 参照 し て い 
た だ きた い ゆい 。 


割込み 解禁 の 条件 と 処置 の 設定 


監視 され て いて , それ が 起 る と 割込み を 引き 起す よう な 条件 は , 解 
禁 さ れ て いる と い 2。 条件 が 発生 し て 割込み が 起 っ を た と き (C と る 
ょ 5 ら 指定 され て いる 処 思 は , 設定 され た 処置 と い 2。 


大 部 分 の 条件 は , 自動 的 に チェ ッ ク さ れ て いて , それ ら が 起 と る 
と , シュ テム ュ K 制 御 が 渡り , シス テム は , その 条件 (対し て 指定 さ 
れ て いる 標準 的 を 処置 を 実行 す る 。 と の よう な 条件 は , 省略 時 解釈 
(て よっ て 解禁 され て お り , 標準 的 を シス テム 処 思 が 設定 され る 。 


最も 一 般 的 を シス テム 処 崇 は , ERROR 条件 を 引き 起す と と で 
ある 。 と れ は , エラ ー の タイ ブ を 個々 (CC チェ ッ ク す る の で は な く , 
各種 の タイ プ の エラ ー を まとめ て チェ ッ ク す る の 用 いら れる 共通 
の 条件 C 対 する も の で ある 。 ERROR 条件 対す る 標準 的 を シス 
テム 処置 は 。 FINISH 条件 を 起 し て , ブロ グラ ム を 停止 する と 
と で ある 。 


ブロ グラ マー は , ある 条件 を 解禁 する か どう か , つま り , それ が 
起 っ た と き 割 込み を 起す た め の チ ェ ッ ク を する か ど うか , 指定 す 
る と と が で きる 。 条件 が 禁止 され て いる と , その 条件 が 起 っ て も 割 
込み は 引き 起 さ れ を い 。 


すべ て の 入出 力 条件 むふ よび ERROR,FINISH, お よび 
AREA 条件 は つね 解禁 され て お り , 禁止 する こと と は で き な い 。 


演算 関係 の 条件 と プログ ラム ・ チ ェ ッ クア ナッ ウト 条件 は , 解禁 し て $, 


禁止 し て も よい 。 ブロ グラ ム ・ チ ェ ッ クア テッ ウッ ト 条 件 と SIZE 条件 


例外 条件 の 取扱 いと プロ グラ ム ・ チ ェ ッ クア ウト 


は , 割込み を 起 し た いと き は , 明示 的 解禁 し な けれ ば を ら な い 。 
それ 以外 の 条件 は す べ て , 省略 時 解釈 C よっ て 解禁 され る の で そ 
れ が 発生 し て も 割込み を 起 し た く を な いと き は , 明示 的 と 禁 中 し な け 
れ ば な を な ら な を い 。 


条件 接頭 語 


ある 条件 を 解禁 する か , 禁止 する か は , 条件 接頭 語 C よ っ て 指定 す 
る と と が で きる 。 条件 接頭 語 は , 1 つま た は 2 つ 以 上 の 条件 名 の リ 
スト ( 各 条 件 名 を カン マ で 区 切り , 全体 を 括弧 で 囲む ) で あり , 

ュ コロン を 用 いて ステ ー ト メント (また ん は ステ ー ト メン ト ・ ラ ベル ) 
IC 接 続 す る 。 接 頭 語 は つね に , ステ ー ト メン ト お よび ステ ー ト メン 
ト ・ ラ ベル の 前 置く 。 た と えば げ , 


(SIZE):L1:Xー(I**N)/(M+L ) : 


接頭 語 リ スト の 中 に ある 条件 名 は , その 接頭 語 の 有効 範囲 内 で は , 
対応 す る 条件 を 解禁 する と と を 表示 し て いる 。 接頭 語 と し て 用 いら 
れる 条件 名 の 前 に し , プラ ンク や 連結 記号 で 区 切ら ず CN 0 と いう 語 
を つけ る と と MC よっ て , 対応 する 条件 が 禁止 され る と と を 表示 する 
と た も で きる 。 た と ん ば 


(NOCONVERSION):Y= テ AlIB: 


条件 接頭 語 の 有効 範囲 


接頭 語 の 有効 範囲 , つ まり , その 接頭 語 が 適用 され る プログ ラム の 
部 分 は , 通常 , その 接頭 語 が つけ られ て いる ステ ー ト メン ト で ある 。 
その ステ ー ト メント の 実行 中 に 呼び 出さ れる 関数 ま た は サ プ ブルー チ 
ン ( て は , 適用 され な い 。 


IF ステ ー ト メン ト し につけ られ た 条件 接頭 語 は , IF の 人 後 (て ある 
式 の 評価 IC 対 し て だ け 適用 され る も ので, THEN また は ELSE 
クロ ー ズ の 中 の ステ ー ト メン ト と は 適 用 され を な いひ (THEN や 
ELSE 自体 が 接頭 語 を も つと と は 差 支 を な い が ) , 回 様 K, ON 
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ステ ー ト メン ト つ け られ た 接頭 語 は , オン ・ ユ ニッ ト の 中 MC ある 
ステ ー ト メン ト 区 対し て は 効果 を も た を い 。 DO ステ ー ト メント K 
対す る 条件 接頭 語 は 。 DO ステ ー ト メン ト 自体 の 式 の 評価 に 対 し て 
だ け 適 用 され , DO グル ー ブ 内 の 他 の ステ ー ト メン ト と は 適用 され 
な い 。 


PROCEDURE ステ ー ト メン ト お よび BEGIN ス テー ト メン 
ト に つけ られ る 条件 接頭 語 は , 特別 た ケー ス ( 一 般 に よく 使用 され 
る が ) で ある 。 PROCEDURE また は BEGIN ステ ー ト メン 
ト と つけ られ た 条件 接頭 語 は , 対応 する END ス テー トメ ント の と 
と ろ ま で に ある すべ て の ステ ー ト メン ト ( END も ゃ 含め て ) ic 適 用 さ 
れる 。 と の 中 に に は, その ブロ ッ ク の 中 (ネスト され た 他 の 
PROCEDURE ま を た は BEGIN ス テー トメ ント $ 含 まれ る 。 と れ け は , 
その プ ブロック の 外側 に ヒ あ る プロ シー ジャ ーC と は 適用 され を な い 。 


ブロ ッ ク の 中 (て と ある ステ ー ト メン ト ( PROCPBDURB お よび 
BEGIN ステ ー ト メン ト ゃ 含め て ) 接頭 語 を つけ る と と よっ 
て , その ブロ ッ ク 内 の 条件 の 解禁 ま た は 禁止 の 状態 を 定義 し 直す と 
と も で きる ( し た が っ て 当然 。 ネス ト され た ブロ ッ ク の 中 の 条件 の 
解禁 また は 禁止 も 定義 し 直さ れる ) 。 と の よう な 再 定義 は , 接頭 諸 
が つけ られ る ステ ー ト メン ト の 実行 た だ け 適用 さ れる 。 ネ スト され 
た PROCEDURE ま を は BEGIN ステ ー ト メン ト の 場合 は , 
その ステ ー ト メン ト が 定義 し て いる ブロ ッ ク と , その ブロ ッ ク 公 含 
まれ て いる ブロ ッ ク 人 対し て だ け 適用 され る 。 再 定義 を し て いる 接 
頭 語 の 有効 範囲 の 外 (C 制 御 が 渡る と , その 再 定 義 は 適用 され を く な 
る 。 条件 接頭 語 は , DECLARE,DEFAULT , また は PENTRY 
ステ ー ト メン ト 以外 で あれ ば どの よう な ステ ー ト メント に で も つ 
ける と と が で きる 。 


ON ステ ー ト メン ト 


どの よう な 条件 に 対し て も シュ テム 処置 が 用 意 さ れん て お り , その 条 
件 対す る ON ステ ー ト メン ト の 中 で か わり の 処置 を プロ グラ マー 
が 指定 し て い を い 限 り ,。 シス テム 和 置 が 実行 され る 。 ON ステ ー ト 
メン ト の 目的 は , 解禁 され て いる 例外 条件 (省略 時 解釈 また は 条件 
接頭 語 の ど ち ら か (C よ っ て ) が 発生 し た た め C 割 込み が 起 っ た と き 
(て と る べき 処 思 を 設定 する と と で ある 。 


注 : 条件 が 禁止 され て いる プロ グラ ヘム 部 分 の 実行 中 は 。 ON ステ 
ー ト メン ト で 指定 され て いる 処置 は と られ な めい 。 


ON ステ ー ト メン ト の 形式 は , 次 の 通り で ある 。 


ON 条件 名 [SNAP ] 
1 オン ユニット | SYSTEM: ) 
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( 詳細 に つい て は , J 節 「 ス テー トメ ント 」 を みて いた だ き た い 。 ) 


セミ コロ ン を 後に C つ けた SYSTEM と いら キー ワー ド は , 割 込 
み が 起 っ た と き に は つね 標準 の シス テム 処置 を と る よら 指定 する 
も の で ある 。 と れ は , 何 か 他 の 処置 か す で KK 設定 され て いる 条件 
対し て , シス テム ュ 処 置 を 設定 し 南 す も の で ある 。 と れ は , オン ・=> 


ミニット を 使用 し て , 割込み が 起 っ た と き に つね に と る べき 代 苦 の 処 
賀 を 指定 する の 用 い られ る 。 


SNAP ォ プション は 割込み が 起 っ た と き MC, 現在 の ブロ ッ ク 
を 導き 出す 呼出 し の チェ イン の 中 (ある すべ て の ブロッ ク の リス ト 
を 標準 シス テム ・ フ ァイル SYSPRINT 書き 出す と と を 指定 
する も の で ある 。 SN AP が 指定 され て いる と き は , SNAP ォ プ ブ 
ショ ン の 処置 が オン ・ ュ ユニ ッ ト の 処置 より も 前 に と られ る 。 
SNAP SYSTEM と 指定 され て いる と き は , シス テム ュ 処 置 メ ッ 
セー ジ の すぐ 人 後 と , 活動 中 の プロ ッ ク の リス ト が つづ けら れる 。 


オン ・ ユ ニッ ト は, ラベ ル の を な い , 単 一 の 単純 ステ ー ト メン ト か .。 
ラ ベル の な い 開 始 ブ ロッ ク の どちら か で を けれ ば な ら な い 。 と の 場 
合 の 単 一 の ステ ー ト メン ト は , RETURN, FORMAT, 
DECLARE , また は DPFAULT ステ ー ト メン ト で あっ て は な ら な い 。 
また ,。 これ は , 2 つの 複合 ステ ー ト メン ト IF と ON , ある い は 
DO グル シー プ で ある と と も 許さ れ を い 。 ( PROCEDU RE , 
BEGIN, END , お よび DO ステ ー ト メン ト は , 単 一 の ステ ー ト 
メン ト と し て 出 て くる と と は 許さ れ て いな い 。 ) 開 始 ブ ロッ ク ( が 
ある と き は ) (て と は 。 どの よう な ステ ー ト メン ト で も 含め る と と が で 
きる 。 を ただし, RETURN ステ ー ト メン ト は , どの BEGIN プ 
ロッ ク の 場合 も そう で ある よう MC 開始 ブロ ッ ク の 中 に ネス ト さ れ 
て いる ブロ シー ジャ ー の 中 に し か 置く と と が で き な い 。 


単 一 ステ ー ト メン ト の オン ・ ユ ニッ ト , また は 開始 プア ロッ ク の オォ 
ン ・ ユ ニッ ト は ブロ グラ ム 内 の , 割込み が 起 っ た 地点 で 呼び 出さ 
れ た ブロ ジー ジャ ー( ペ パラ メー ター を も た な い ) と 同じ ょ うし て 
実行 され る 。 オ ン ・ ユ ニッ ト が 単 一 ステ ー ト メン ト の と き は , それ 
は 単 一 ステ ー ト メン ト の ブ プロシージャー で ある か の よう 取り 扱わ 
れる 。 その ユニ ッ ト の 実行 が 終る と , 通常, そ と か ら オ ン ・ ユ ニッ 
ト と 人 人 っ た ブロ ッ ク K 制 御 が 戻さ れる 。 ブロ シー ジャ ー の 場合 と 全 
く 同 様 に と 。 GO TO ステ ー ト メン ト を 用 いて , オン ・ ユ ニッ ト の 
外 (と 制御 を 渡す と と も る で き る 。 と の 場合 , 制御 は , GO TO で 指 
定 さ れ た 地点 移り , 正常 た 戻り は 行なわ れ な い 。 


注 : オン ・ ユ ニッ ト か ら 制 御 が 戻さ れる 特定 の 地点 は , 様々 な 条 
件 よっ て それ ぞ れ 違っ て いる 。 ある 場合 は , その 条件 が 起 っ た 処 
置 の 直後 の 地点 に 戻る 。 ま た , 実際 の 割込み の 地点 制御 が 戻っ て , 
その 処 思 を やり直す 場合 も ある 。ON CONVERSION ス テー トメ ン 
ト か ら 戻 る 場合 た ど は , 後者 の 例 で ある 。 変換 エラ ー の 結果 , 割 込 
み が 起 っ た とき は , エラ ー を 起 し た 文字 の 変換 を も 9 一 度 行なう た 
め 低 。 オン ・ ユ ニッ ト か ら 制 御 が 戻る ( オン ・ ユ ニッ ト の 実行 中 K, 
誤っ た 交 字 が 変え られ た も の と し て ) 。 誤り の 文字 が 変え られ な い 
と き は, ERROR 条件 が 起 る 。 


ナル ・ オ ン ・ ユ ニッ ト 


オン ・ ユ ニッ ト の 特殊 を 例 と し て , ナル ・ ス テー トメ ント が ある 。 
と れ は , CONVERSION お よび AREA 条件 の 場合 は , 再 試 
行 を し な い 点 を の ぞ け ば げ , 開始 ブロック の オォ オン ・ ユ ニッ ト か ら の 正 
常 な 戻り と 同じ 効果 を も っ て いる 。 


ナル ・ オ ン ・ ユ ニッ ト を 使 2 と いう と と は 。 次 の よう な 2 つの 理 
由 か ら , 禁止 する と と と は 違っ て いる 。 第 1(C,。 ナル ・ オ ン ・ ユ ニ 
ッ ト は , どの よう な 条件 (C 対 し て ゃ 指定 する と と が で きる が 。 条件 
は , すべ て 禁止 で きる も の ば か り と は 限ら な い 。 第 2 C, 条件 を 禁 
止 し た と き は ( 禁 示 で きる も の の 場合 ), と の 条件 の チェ ッ ク を な 
くす と と に よって, 時 間 を 節約 する と と が で きる 。 ナ ル ・ オ ン ・ 
ュ ユニット が 指定 され て いる と き は 。 シス テム は , その 条件 が 発生 し 
て いな いか どう か や は り チ ェ ッ ク し な を けれ ば な を なら な い 。 そ の 結果 と 
られ る 処置 は オン ・ ユ ニッ ト か ら 正 常に 戻る と き (C と られ る 女 購 
と 同じ で ある 。 


注 : と の コン バイ ラー で は , 誤っ た 文字 オン ・ ユ ニッ ト の 中 で 
変え られ を い 限 り , 変換 の や り 直 し は 行 を われ を い の で 変換 エラ ー 
が 起 っ た とき, CONVERSTON 条 件 C 対 する ナル ・ ォ ン ・ テ ユ 
ニッ ト て よっ て 永久 的 を ループ が ひき 起 さ れる と と は な い 。 誤っ た 
文字 が 変更 され を か っ た 場合 は , PRROR 条件 が 起 と る 。 


ON ステ ー ト メン ト の 有効 範囲 


ON ステ ー ト メント が 実行 され る と , 指名 され た 条件 と 処 詩 の 指定 
と が 結び つけ られ る 。 と の 結び つけ が 一 旦 行なわ れ た あと は , それ 
が 思 き 換え られ る か , ま を は その ON ステ ー ト メン ト が 実行 され た 
ブロ ッ ク が 終了 する まで , その まま の 状態 が 保 た れる 。 


設定 され た 割込み の 処 置 は 。 ブロ ッ ク か ら そ れ を 活用 化 し た ブロ 
ッ ク 底 渡 り ,。 さら (と その 処置 は , 同じ 条件 に 対す る 別 の ON ステ ー 
トメ ント を 実行 する こと と と よっ て 賃 き 換え られ な い 限 り , 後続 の 活 
用 化 さ れ を た ブロ ッ ク の すべ て 区 対し て その まま 効力 を も も 続け る 。 
置き 換え られ る 場合 , 新しい 処置 は その ブロ ッ ク が 終了 する まで, 
また は その 条件 (C 対 し て REVERT ステ ー ト メン ト が 実行 され る 
まで の 間 だ け , 効力 を も つ 。 そ れ で 活用 化し た ブロ ッ ク K 制 御 が 戻 
る と , その 地点 で 存在 し て いた , 割込み 処置 の 設定 は すべ て , 設定 
し 直さ れる 。 し た が っ て , サブ ルー チ ン は , それ を 呼び 出し た ブロ 
ッ ク に 対し て 設定 され た 割込み 処 塁 を 変 た 0 る と と が で き な を いわ も け で 
ある 。 


同じ 条件 に 対し て 2 つ 以 上 の ON ステ ー ト メン ト が , 同一 ブロ ッ 
ク 内 (C ある 場合 は , 俊 で 実行 され た 各々 の ON ステ ー ト メン ト が , 
前 に 設定 され た 条件 を 永久 的 に 思 き 換 える 。 同じ 処置 を 指定 し て い 
る 別 の ON ステ ー ト メン ト を 実行 する ( か また は , 何ら か の 方法 で 
制御 を 移す と と よって, 人 軒 き 換 を られ た ON ステ ー ト メント を 再 


び 実 行 する ) 以外 (C, 再 設定 を する と と は で き な い 。 


動 的 に 受け つが れる オン ・ ユ ニッ ト 


ある オン ・ ユ ニッ ト の 実行 中 に 条件 を 引き 起 し て ,。 さら MC その 先 の 
オン ・ ユ ニッ ト て 入る と と も で きる 。 別 の オン ・ ユ ニッ ト の 中 で 起 
っ た か , また は 信号 が 送 られ た 条件 よっ て 入っ た オン ・ ユ ニッ ト 
は , 動 的 に 受け つよ れる オン ・ ユ ニッ ト で ある 。 動 的 逐 す つが れ 
る オン ・ ユ ニッ ト か ら 正 常 と 戻る と 。 その 条件 が 起 っ た と き の ォ ンジ 
ユニ ッ ト の 実行 が 設定 し 直さ れる 。 


ファ イル ・ パ ラメ ー タ ー お よび ファ イル 変数 に 対す る 
オン ・ ユ ニッ ト 


引数 な よび バラ メー ター と し て 使用 され る ファ イル 定数 また は ファ 」 
と と が で きる 。 次 の 例 は ,。 と の 機能 の 規則 と 用 法 を 示 し た も ゃ の で ある 。 


人 | 人 : 


1 別 の ブロ ッ ク 内 で の 特定 の 条件 KC 対す る いく つか の オン ・ ニ ユニ 
ッ ト は , 同じ ファ イル 対し て 別 の ファ イル 識別 名 を 指定 する と と 
が で きる 。 た と え げ , 


E:PROCEDURE: 
DECLARE F1 FILE: 


ON ENDFILE (F1) GOTO L1: 
CALL BE1 (F1): 


E1:PROCEPDURE (F2): 
DPECLARE F2 FILE: 
ON ENDFILE (F2) GO TO L2: 
READ FILE (F1): 
READ FILE (F2): 
END Ei: 


E1 の 中 で F 2 対す る ファ イル の 終り 人 出 あ う と , 1 の 中 と あ 
る FE 2 対す る オン ・ ユ ニッ ト 入る 。 BE1 の 中 で オン ・ ユ ニッ ト 
が 指定 され て いな を い 場 合 は 。 F 1 また は F 2 対す る ファ イル の 終 
り 条 件 (て 出 あ うと , 包 の 中 の F 1 多 対 する オン ・ ユ ニット 入る 。 


例 2・ 


同じ ブロ ッ ク の 中 に ある 特定 の 入力 ま た は 出力 CK 対す る いく つか 
の オン ・ ユ ニッ ト は, 同じ ファ イル 対し て 別 の ファ イル 識別 名 を 
指定 する と と が で きる 。 2 番目 の オン ・ ユ ニッ ト が ある と, 最初 の 
も の は と れ ( て よっ て 儲 き 換え られ る 。 た と えば , 
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E:PROCEDURE : 
DECLARE F1 FILE: 
CALL BEB1 (FE1): 
E1: PROCEDURE (F2): 
DECLARE F2 FILE: 
ON ENDEILE (F1) GOTO L1: 
READ FILEB (F1): 


ON ENDFILE (FEF2) GOTO L2: 
READ FILE (F2): 


READ FILE (F1): 


END EE: 


2 番目 の READ FILE (F1) : ステ ー ト メン ト を 実行 し た 結果 , 
ファ イル の 終り 条件 が 起 る と , F2 (に 対す る オン ・ テ ニッ ト 入る 。 


例 3: 


ファ イル ・ ベ バラ メー ター を 指定 し て いる , 特定 の 条件 と 対す る 
REV ERT ス テー トメ ント が 実行 され る と , そ の ファ イル ・ バ パラ メー ター 
対応 する | 数 C 対 し て 前 設定 され た オン ・ ユ ニッ ト 入る 。 た と えば 


E:PROCEDURE : 
DCL F1 FILEj: 
ON ENDFILE (F1): 
CALL E1 (F1): 
PE1: PROCEDURE (F2): 
DECLARE FE2 FILE: 
ON ENDFILE (F2) GOTO し L: 


REVPERT ENDFILE (F2): 
グ * NULL ON-UNIT 1N 選 ASSOCIATED 
WITH ENDFILE INTERRUPTS FOR F2* ン 
READ FILE (F2): 


END E} 


F 2 に 対す る READ ステ ー ト メン ト の 実行 中 に ファ イル の 終り 条 
件 (C 出 あっ て も , ER 1 の 中 の F 2 と 対す る オン ・ ユ ニッ ト (C は 入ら 
な い 。 REVERT ステ ー ト メン ト が ある ため, 外側 の ブロ シー 
ジャ ー の 中 C あ る F 1 対す る オン ・ ユ ニッ ト KC 入る 。 
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ファ イル 変数 を 使用 し て いる と き は つね , その 効果 は , 変数 の 
現在 の ファ イル 定数 値 を 用 いた と き と 同 じ と な る 。 し た が っ て , フ 
テ ァイル 変数 を 指定 する ON ステ ー ト メント を も つ ォ オン ・ ユ ニッ ト は , 
オン ・ ユ ニッ ト が 設定 され た と き の 変 数 の 値 で ある ファ イル 定数 を 
指す と と に を る 。 た と えば ゆば , 


DECLARE FV FILE VARIABLE。 
FC1 FILE, 
FC2 FILE: 

FV = WC1: 

ON ENDFILE (FV) GO TO FIN: 


FV = FC2: 
READ FILE (FC1): 
REPAD FILE (FV): 


最初 の READ ステ ー ト メン ト の 間 WC 起 っ た ファ イル の 終り 条件 は , 
オン ・ ユ ニッ ト が ファ イル FC 1 を 指し て いる の で 。 オ ン ・ ユ ニッ 
ト に 入る 。 し か し, 2 番目 の READ ステ ー ト メン ト で と の 条件 が 
起 っ た と き は , と の READ は ファ イル FC 2 を 指し て いる の で , 

オン ・ ユ ニッ ト は 入ら を い 。 


ファ イル 変数 を 指定 する ON ステ ー ト メン ト が 2 回 以上 実行 され , 
し か も その た びに 変数 の 値 が 違っ て いる と き は , 実行 の た びに 別 の 
オン ・ ユ ニッ ト が 設定 され る 。 次 の 例 (C つ いて 考 ん て みよ う 。 


DECLARE FV FILE VARIABLE, 
FC1 FILE, 
FC2 FILE: 


DO FV = FC1 FC25 
ON ENDEILE (FV) GO TO FIN: 
END: 


REVERT ス テー トメ ント 


REVERT ステ ー ト メン ト は REVERT ステ ー ト メン ト が 実 
行 さ れ た の と 同じ ブロ ッ ク の 中 で 実行 され た 指名 の 条件 に 対す る 最 
新 の ON ステ ー ト メン ト の 処 財 指定 を 打ち 消す た め C, 用 いら れる 。 
その 結果 , その ブロ ッ ク を 活用 化 し た 時 点 で 効力 を も っ て いた 処置 
が 再 設定 され る 。 と の ステ ー ト メン ト は , 次 の ょ 2 な を 形式 を し て いる 。 


REVERT 条件 名 : 
指名 の 条件 に 対し て オン ・ ユ ニッ ト が 設定 され て いな い ブ ロッ ク 


の 中 で 実行 され た REVERT ステ ー ト メン ト は , ナル ・ ス テー ト 
メン ト と し て 扱わ れる 。 


SIGNAL ステ ー ト メン ト 


プロ グラ マー は , SIGNAL ステ ー ト メン ト を 用 いて 。 ON 条件 
の 発生 を シミ ュ レ ー ト する と と が で きる 。 指名 の 条件 が 禁止 され て 
いな い 限 り , 割込み が 起 と る 。 と の ステー ト メン ト は, 次 の よう な 
形式 を し て いる 。 


STIGNAL 条件 名 : 


SIGNAL ステ ー ト メン ト が 与え られ る と , 指定 され た 条件 C 対 
し て 現在 設定 され て いる 割込み 処 財 が 実行 され る 。 と の ステ ー ト メ 
ント は, ブロ グラ ム ・ チ ェ ッ ク 中 IC。 オン ・ ユ ニッ ト の 処置 を テス 
ト す る た め , お よび 正 し い 処 置 が 条件 と 結び つけ られ て いる か どう 
か 判断 する ため と . 主として 用 いら れる 。 


SIGNAL で 指定 され た 条件 が 解禁 され て いな い 場 合 は , 
SIGNAL ステ ー ト メン ト は 。 ナル ・ ス テー ト メン ト と し て 扱わ 
れる 。 


CONDITION 条件 
次 の 形式 の ON 条件 を 用 いて , ブロ グラ マー は , 
CONDITION( 識別 名 ) 


COND IT ION お よび その 識別 名 を 指定 する SIGN AL ステ ー 
トメ ント が 実行 され た と き C, つね 実行 すべ き オ ン ・ ユ ニッ ト を 
設定 する と と が で きる 。 


デバッギング の 補助 手段 と し て と の 条件 を 使用 すれ ば , それ が 実 
行 さ れ た と き (C て は , ブロ グラ ム の 現在 の 状況 を 示す 情報 を 印刷 する 
よう を オン ・ ユ ニッ ト を 設定 する と と が で きる 。 と の 手法 を 用 いる 
利点 は 。 オン ・ ユ ニッ ト の ステ ー ト メン ト を 1 度 だ け 書 け ば よい と 
いう と と で ある 。 と れ ら は , ブロ グラ ム の 任意 の 地点 (C SIGNAL 
ステ ー ト メン ト を 置く と と に よっ て , 実行 する と と が で きる 。 次 の 
例 は ブロ グラ ム の 中 に C ど の よう (CC し て COND1IT ION 条件 を 入れ 
る か を 示し た も の で ある 。 


ON CONDITION (TEST) BEGIN: 


世 ND: 


次 の ステ ー ト メン ト が 出 て くる と ,。 それ が ど と と あっ て る , 開始 ブ 
ロッ ク が 実行 され る 。 


SIGNAL _ CONDITION (TEST) : 


と の 識別 名 は , 文 脈 的 ヒ 宣 言 さ ん た も の で あっ て も (上 の 例 の よ 
2C ), 明示 的 (て 宣言 され た も の で あっ て も よい 。 条件 名 の 明示 宣 
言 は , 次 の よう に し て 行 な 92。 


DCL CNAME CONDI TIEON: 
ON CONDITION(CNAME) BEGIN: 


END: 


CONDITION 条件 は つね 解禁 さん れん て いる が , STIGNAL 
ステ ー ト メン ト (て よっ て の み 引 き 起 す と と が で きる 。 


CHECK 条件 


CHECK 条件 は 。 プロ グラ ム ・ テ スト 用 CCP エン 1 で 用 意 さ れ て 
いる 重要 を 手段 で ある 。 ブロ グラ ム の 実行 中 , 指定 の 変数 の 値 が 
修正 され た と き , ある い は 指定 の ラベ ル ま た は 入口 定数 が 前 に つけ 
られ た ステ ー ト メン ト 制御 が 移っ た と き は つね KC, と の 条件 が 引 
き 起 され る 。 CHECK 条件 を 解禁 する た め の CHECK 接頭 語 

いっ し ょ MC 与え られ た , 任意 選択 の 名 前 リス ト の 中 で , CHECK 条 
件 を 引き 起す べき 変数 , ラベ ル 定 数 , な ぉ ょ び 入 口 定数 を 明示 的 K 指 
定 する 。 名 前 リス ト を つけ ず CCHECK 接頭 請 が 与え られ て いる 
と き は , その CHECK 接 頭 語 の 有効 範囲 内 に ある すべ て の 変数 , ラ 
べ ベル 定数 。 お よび 入口 定数 は ,。 CHECK 条件 を 引き 起す と と が で 
きる 。 


CHECK 条件 を 引き 起す と と の で きる 変数 に は , 配列 変数 , 構 
造 変数 。 ラベ ル 変 数 , 入口 変数 , 事象 変数 , エリ ア 変 数 。 ファ イル 
変数 , 基底 付 変数 , 定義 され た 変数 。 ぉ よび ロケ ー タ ー 変 数 が 含ま 
れる 。 添字 付 の 変数 な よび ロケ ー タ ー 修 飾 さ れ た 変数 は 許さ れ な い 
が , 修飾 され た 名 前 ( つま り , 構造 の メン バー ) は 使用 する と と が 
で きる 。 iSUB 定義 の 変数 は , 使用 で き な い 。 


チェ ッ ク さ れる 変数 C 対 する 割当 て の 直後, 割込み が 起 と る 。 
た と えば , チェ ッ ク さ れる 配列 の 各 有 要素 が 割り当て られ る と , 割 込 
み が 起 こる 。 ただし, 次 の 場合 は 例外 で ある 。 


1. CALL ステー トメ ント の 中 で 指定 され て いる 引数 が 直接 渡さ れ 
る 場合 (見 か け 引数 を 使っ て 渡さ れる 場合 の 逆 ) は . サブ ルー 
チン か ら 戻 っ た と き (C,。 と れ ら の 名 前 に 対す る CHECK が 起こ と る 。 


2. ラベ ル お よび 入口 定数 の 場合 は その ステ ー ト メン ト の 実行 
の 直前 , また は 入口 名 の 呼出 し の 直前 (C 割 込み が 起 と る 。 


CHECK 条件 CK 対す る シュ テム 処 思 は , その 割込み を 起 し た 識 
別名 を 印刷 する と と , ぉ よび それ が 変数 ( プロ グラ ュ 制 御 変 数 は 
の ぞ く ぐ で ある と き は , デー タ 指 示 出 力 の 形式 で ,。 その 新しい 値 を 印 
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刷 す る と と で ある 。 ラ ベル 変 数 な よび 他 の ブロ グラ > 制御 変数 の 場 
合 は , 識別 名 だ け が , セミ コロ ン で 区 切ら れ て 印刷 され る ( 値 は 含 
まれ な い )。 


SIGNAL CHECK に C よ っ て CHECK 条件 が 起 っ た と き の , 
標準 の シス テム 処置 は 。 CHECK 接頭 語 の 名 前 リス ト の 中 で 与え 
られ た 識別 名 ( 使用 で きる と と ろ で あれ ば , その 値 も ) を 印刷 する 
と と で ある 。 CHECK 接頭 語 が 名 前 リス ト を も っ て いる と き の , 
標準 の シス テム 処置 は CHECK 接頭 語 の 有効 範囲 内 C あ る すべ 
て の 議 別 名 ( 使用 で きる と と ろ で あれ ば , その 値 も ) を 印刷 する と 
と で ある 。 


し た が っ て , CHECK 接頭 語 を も つ ブ ロッ ク を 前 置く と と KC 
よっ て ( 図 1 4.1 の 中 の 例 で 示さ れ て いる よう (CC ), ブロ グラ マー 
は , 変数 を 指定 する と と (C よ り , 読み や すい 形式 の 選択 ダン プ を と 
る と と が で きる 。 また, ラベ ル と 入口 名 を 指定 する と と と よっ て , 
流れ の 追跡 も と る と と が で きる 。 


シス テム ュ 和 置 以外 の も の が 必要 を 場合 に C,。 ON ステ ー ト メン ト の 
中 で CHECK 条件 を 指定 する と と も で きる 。 と れ て よっ て , テー 
ザー は , デバ ッ ギ ング 情報 の 制御 と 出力 用 の デー タ 指示 出力 を 簡単 
(C す る と と も 含め て , PL/1 の すべ て の 機能 を 使う 9 と と が で きる 。 


SUBSCRIPTRANGE 条件 


主として プロ グラム の チェ ッ ク ア ウト K 用 い られ る が , 生産 的 を ラ 
ン (て も 使用 で きる もら 1 つの ON 条件 は SUBSCRI PTRANGE 
条件 で ある 。 と の 条件 は , 条件 接頭 語 の 中 で 解禁 し を な けれ ば な ら を な 
い 。 解禁 され て いる と き は , 配列 参照 の 中 の 各々 の 添字 は , 評価 さ 
れる た び (C, それ が 指定 の 限界 内 に ある か どう か チェ ッ ク さ れる 。 
添字 が 高 す ず る か , 低 す ぎる と きけ は , 条件 が 引き 起 さ れる 。 


と の チェ ッ ク K は , 記憶 域 と 実行 時 間 の 両面 C な いて か な り 多 く 
の オー バー ヘッ ド が 含ま れる の で , 通常 上 ブロ グラ ム の テス メト 
だ け 用 いら れる - - 生産 的 を ブロ グラ ム で は , 
SUBSCRIPTRANGE を 普通 の 禁止 条件 に し て , 取り 外さ れる 。 


STRINGRANGE 条 件 


STRINGRANGE 条件 は , 条件 接頭 語 の 中 に 書か れ て いる の で 
な い 限 り , 解禁 され を い 。 と の 条件 は ,。 SUBSTR 組込み 関数 お 
よび 擬似 変数 (対し て 誤っ た 参照 が な 行 な われ た と き (C 引 き 起 され る 
- - と の 関数 お よび 擬似 変数 に 対す る 級 は , 特定 の 限界 内 に を け 
れ ば な ら な い (G 節 「 組 込み 関数 と 擬似 変数 ] の 中 の ISUBSTR 
ネト リン グ 組 込み 関数 」 の 項 を 参照 の と と ) 。 この 条件 を 指定 する 
と , 自動 的 か (つま り , 標準 の シス テム 処置 に よっ て ), また を は ブ 
ログ ラマ ー が オン ・ ユ ニッ ト を 使用 する と と に と よって, SUBSTR 


190 DOS PL/ ノ 1 最適 化 セ ン バ イ ラー : 言 語 解説 書 第 1 部 


の 参照 を つづ け て ゆく と と が で きる 。 


STRINGRANGE 条件 (は. か を な り 多 く の オ ォ オー バー ヘッ ド 
が 含ま れる の で , デバ ッ ギ ング 中 て だ け 解 禁 す る 方 が よい 。 


STRINGSIZE 条件 


STRTING SI ZE 条 件 は , 条件 接頭 語 の 中 (と 書か れ て いる の で な 
い 限 り , 解禁 され な を い 。 原 ス トリ ング を 目標 スト リン グ MC 割 り 当て 
た 結果 , 目 林 ス トリ ング の 中 で 調節 する と と の で き な い 原 ス トリ ン 
グ の 部 分 が 切り 捨て られ て た と き C。 STRINGSIZE が 起 と る 。 
原 ス トリ ング と 目標 スト リン グ は , 固定 長 ま を た は 長 さ の 変わ る スト 
リン グ の どちら で あっ て も ょ よい 。 と の 条件 は 。 オン ・ ユ ニッ ト と い 
っ しょ 使用 し て も , 使用 し た なく て も よい 。 標準 の シス テム 処置 は , 
注釈 を 印刷 し , 切り 捨て られ た スト リン グ の 割当 て を 完了 し , 処理 
を つづ ける と と で ある 。 


STRINGS1IZE 条 件 に は , か な り 多 く の オ ー バ ベー ヘッド が 含 
まれ る の で , デバ ッ ギ ング の と きだ け 解 禁 する 方 が よい 。 


条件 組込み 関数 と 条件 コー ド 


オン ・ ユ ニッ ト が 呼び 出さ れる と , 引数 を も た な い ブ プロシージャー 
の よう CC し て 処理 され る 。 し た が っ て , 割込み 関す る 情報 ( 条件 
の 名 前 以外 の ) を オン ・ ユ ニッ ト KK 湊 すこ と と は で き な い 。 オン ・ ユ 
ニッ ト を 使用 する 上 で の ブロ グラ マー の 一 助 と し て , 割込み の 原因 
を 調べ て , で きれ ば エラ ー を 訂正 する と と が で きる よう MC, いく つ 
か の 特別 を 関数 が 用 意 さ れ て いる 。 


と れ ら の 条件 組込み 関数 は 。 オン ・ ユ ニッ ト の 中 また は オン ・ ユ 
ニッ ト て よ っ て 呼び 出さ れる ブロッ ク の 中 で だ け 使用 する と と が で 
きる 。 と れ ら の 関数 は , G 節 「 組 込み 関数 と 擬似 変数 ]」 の 中 に リス 
ト さ れ て いる 。 


条件 組込み 関数 は , 割込み の 起 っ た プロ シー ジャ ー の 名 前 , 変換 
割込み の 原因 と を っ た 文字 また は 文字 スト リン グ , 最後 (< 転送 され 
た レコ ー ド の 中 で 使用 され て いる キー の 値 を どの 情報 を 準備 する 
働き を も つ 。 エラ ー 丁 正 の た め の 擬 似 変数 と し て 使用 で きる も の も 
ある 。 


ONCODE 組込み 関数 は , 最後 の 割込み の 原因 に よっ て 決ま る 
値 を も つ 2 進 整 救 を 与え る る の で ある 。 と の 関数 を ERROR 条件 
と あわ せ て 用 いる と と て よっ て , ブロ グラ マー は , P エ 1 言語 の 


(CHECK(HEADER,NRWBATCH, INPUT, BADBATCH, SAMPLE ) ) : ノブ * DE BUG* ブ 


No DIST: PROCEDURE : 
DECLARP 1 SAMPLE EXTERNAL, 
2 BATCH CHARACTER(6) , 
2 SNO PICTURE '?9299・」 
2 READINGS CHARACTER(70 ) , 
TABLE(15,15) EXTERNAL: 
ノ * ESTABLISH INTERRUPT ACTIONS FOR ENDFILE = CONVERSION * ノ 
ON ENDFILE (PDATA ) CALL SUMMARY : 
ON CONVERSION BECIN: CALL SKIPBCH: 
GO TO NEWBATCH: 
END : 
ON ERROR DISPLAY(BATCHI ISNOIIREADINGS ) : 
ノ * MAIN LOOP TO PROCESS HEADER g TABLE + ノ 
HEADER: READ INTO (SAMPLE) FILE (PDATA) : 
ノ * CHECK ACTION LISTS INPUT DATA FOR DPBUG * ノ 
IF SNO - 0 THEN S1GNAL CONVERS ION: 
NEWBATCH: GET LIST (OMIN,OINT, AMIN,AINT) STRINC (READINGS ) : 
TABLE = 0: 
CALL INPUT: 
CALL PROCESS : 
GO TO HEADER: 
ペー ノ * ERROR RETURN FROM INPUT * ン 
BADBATCH: SIGNAL CONVERSION: 
(CHECK(IN1, IN2, ERR2,ERR1, TABLE) ) : ン * DEBUG* ノ 
INPUT: PROCEDURE: 
ノ * ESTABLISH INTERRUPT ACTIONS FOR CONVERSION SUBRG * ン 
ON CONVERSION BEGIN: 
IF ONCODE = 624 g ONCHAR = ・・ 
THEN DO: ONCHAR = '0ri: 
GO TO ERR1: 


END : 
ELSE GO TO BADBATCH : 
END : 
2 ON SUBSCRI PTRANGE CO TO ERR2: 
ノ * LOOP TO READ SAMPLE DATA AND ENTER IN TABLE * ン 
IN1: READ INTO (SAMPLE) FILE (PDATA) : 
IF SNO = ?999 THEN RETURN: ン * TRAILER CARD*/ 
IN2: GET EDIT (R, OMEGA,ALPHA ) (5 P'999・) 
STRING (READINGS ) : 
(SUBSCRIPTRANGE) : TABLE((OMEGA- OMIN) ノ OINT, (ALPHA-AMIN) ン AINT) ニー R: 
GO TO IN1: 
ノ * FIRST CONVERSION c SUBSCRIPTRANGE ERROR IN THIS BATCH ジ 
ERR2: ON SUBSCRIPTRANGE GO TO BADBATCH: ノン *FOR NEXT ERROR* ン 
CALL ERRMESS (SAMPLE, 0 2) : 
GO TO IN1: 
ERR1: REVERT CONVERS ION: ノン * SW ITCH FOR NEXT ERROR* ン 
ペー CALL ERRMPSS(SAMPLE,01): 
GO TO IN2: 
END INPUT: 
END DI ST: 


図 14.1 プロ グラ ム ・ チ ェ ッ クア ウト ・ メ ルー チン 


条件 名 で は 表わす と と が でき な い が , シス テム で は 酸 知 され る よう ON 条件 の 使用 例 

な エラ ー の 処理 を する と と が 可能 (と を る 。 また , 同じ 条件 名 を も つ 

種々 の 条件 の 区 別 を する - - た と えば , 各種 の KEY 条件 の 区 別 , 図 1 4.1 と 示さ れ て いる 例 は , ON ステ ー ト メント , SIGNAL な よ 
な ど - - た め K 使 用 する と と も で きる 。 び REVERT ステ ー ト メン ト , お よび 条件 接頭 語 の 用 法 を 示し た 


も の で ある 。 と の ルー チン は , テス ュ ト 用 の 読込 み を 含 ち カー ド の バ 
ッ チ を 読む た め の も の で ある 。 各 バ ベッ チ は , S NO と いら 名 前 の サ 
に ン ブ ル 番 号 が ゼロ の 見 出し カー ド と , 同じ く SNO が 9999 の 後 
書き カー ド を も ゃ っ て いる 。 変換 エラ ー が みつ か る と , エラ ー の 文字 
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セッ ト を ゼロ し て , 再 試行 が 1 回 行なわ れる 。 添字 を 計算 する た 
め に 2 つの デー タ ・ フ ィ ー ル ド が 使用 され て いる が , 疾 字 が 範囲 外 
の も の で あれ ば , サン ブル は 無視 され る 。 2 つ 以 上 の 添字 エラ ー が 
あっ た 場合 , また は 1 つの バッ チ の 中 で 変換 エラ ー が 2 回 以上 あっ 
た 場合 は その バッ チ は 無視 され る 。 


各行 の 右側 の 番号 は 。 カー ド 順 序 番号 で あっ て , ブロ グラム 自体 
の 一 部 分 で は を いじ 。 


カー ド 1 お よび 25 の CHECK 接頭 語 は , デバ ッ ギ ング の 一 助 
と する た め組 み 入れ られ た も の で あり , 生産 的 を プログ ラム ・ ラ 
ン で は , 取り 除 か れる 。 カ ヵ カー ド 1 の 接頭 二 は , ステ ー ト メン ト 
HEADER,NEWBATCH, ぉ お ょ よび BADBATCH が 実行 され 
る 直前 。 プロ シー ジャ ー INPUT が 呼び 出さ れる 直前 ,。 ぉ よび 変 
数 SAMPLE の 要素 の 値 が 変わ っ た と き は つね , 割込み を 起こ と す 
よう 指定 し て いら る 。 CHPECK 条件 (C 対 し て ON ステー ト メン ト が 
実行 され て い を い の で , シュ テム 処置 が と られ る 。 と の 結果 , 該当 
する 名 前 が SYSPRINTK 書 き 出 され る と と に な る (SAMPLE の 
場合 に は , 新しい 名 前 と いっ し ょ KK )。 


内 部 プロ シー ジャ ー INPUT の 中 で 使用 され て いる ラベル は , 
DI ST の 中 で は 知ら れ て いな い の で , DIST KK す る CHECK 
リス ト の 中 で 指定 する と と は で き な い 。 し た が っ て , INPUT 
いら 見 出し の り の PROCEDURE ステ ー ト メン ト の 直前 (と, 別 の 
CHECK 接頭 語 が 挿入 され て いる 。 と の チェ ッ ク ・ リ スト 
INPUT の 中 の いく つか の ラベ ル と 配列 TA BLE を 指定 し て い 
る o 


最初 (と 実行 され る ステ ー ト メン ト は カード? の 中 の ON 
ENDEF ILE ステ ー ト メン ト で ある 。 と れ は , ENDF IL E 割 込 
み が 起 っ を た とき, 外部 ブロ シー ジャ ー SUMMARY を 呼び 出す 
と と を 指定 する も る の で ある 。 と の 処置 は 。 DIST の 中 , INPUT 
の 中 お よび D I S T (と よっ て 呼び 出さ れ た すべ て の 他 の ブ プロシージャー 
の 中 で 適用 され る (た だ し , と れ ら が ENDFILE (KK 対 し て 自分 
自身 の 処置 を 設定 し て いる 場合 を の ぞ く ) 。 


プロ シー ジャ ー 全体 を 通じ し て, SIZE, SUBSCR1IPTRANGE, 
STRINGRANGE, STRINGSI ZE, ぉ お ょ よび CHEC 人 KK 以外 
の 条件 は , 省略 時 解 和 選 に よっ て 解禁 され る 。 ま た, ON ステ ー ト メ 
ント の 中 で 明示 的 に 記述 され て いる 条件 以外 の すべ て の 条件 C 対 し 
て , シス テ ュ 処 置 が 適用 され る 。 多く の 場合 , と の シス テム 処置 は , 
メッ セー ジ を 生成 し て , ERROR 条件 を 引き 起す と と で ある 。 カ 
ー ド 1 3 の 中 で ERROR 条件 (対し て 指定 され て いる 処置 は , 処 
理 さ れる カー ド の 内 容 を 表示 する と と で ある 。 ERROR 処置 が 完 
了 す る と , FINISH 条件 が 起 と こり, その あと で ブロ グラ ム の 実 
行 が 終了 する 。 


カー ド 10 の 中 の ステ ー ト メン ト は, COVPER SI ON 割込み が 
起 っ た と きつ ね と る べき 処置 を 指定 し て いる 。 と の 処置 計 2 
つ 以 上 の ステ ー ト メン ト か ら 構 成 さ れ て いる の で , BEGTN と 
END の 両 ス テー トメ ント (と よ っ て 囲 ほ まれ て いる 。 
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プロ グラ ム の 主 ル ー プ は , HEADER と いう ステ ー ト メン ト か 
ら 始ま る 。 HPEADER KC 対し て CHECK 条件 か 解禁 され て いる 
の で , HBADER が 実行 され る 前 割込み が 起こ と る 。 1I NTO ォ 
プ ション を も つ READ ステ ー ト メン ト が 実行 され る と , 変数 
SAMPLE の 各 要 素 に 対し て CHECK 条件 が 引き 起 さ れる 。 レ 
た が っ て , デー タ 指示 出力 の 形式 で 和信 力 が リス ト され る 。 


読み 取ら れ た カー ド は , 見 出し カー ド と みな され る 。 そ う で な い 
場合 は , SIGNAL CONVERSION ステ ー ト メン ト C よ っ 
て BEG IN ブロ ッ ク が 実行 され , そ と で , 見 出し カー ド 達する 
まで カー ド を 無視 し て 読み 進め る プロシージャー (と と は 示さ れ 
て いな い ) が 順に 呼び 出さ れる 。 と の 開始 ブロ ッ ク は , オン ・= ユ 
ニッ ト を 終了 させ る GO TO ステ ー ト メン ト ( て よっ て 終る 。 


NEWBATCH と いう ラベ ル の GET ス テー トメ ント は 文字 
スト リン グ READINGS(SAMPLE の 一 要素 ) に 読み 込 を れ 
た 別 の テス ュ ト 番号 を 得る た め (C, STRING オプ ショ ン を 使用 し 
て いる 。 デー タ ・ リ スト の 中 で 指名 され て いる 変数 は , 明示 的 K 宣 
言 さ れ て い を い の で , と れ ら が 出 て くる と , FLOAT DEBCIMAL 
(6 ) と いう 属性 を つけ て , 示 的 を 宣言 が 行なわ れる 。 


ブロ シー ジャ ー INPUT が 呼び 出さ れる 前 C, 配列 TAB LE 
は ぞ n 初期 値 化 され る 。 と の ブロ ジー ジャ ー は , DI ST の 中 で 
す で 設 定 さ れ た オン ・ ユ ニッ ト を 受け つぐ が か それ ら を 打ち 消す 
と と も で きる 。 


INPUT の 最初 の ステ ー ト メン ト は , CONVERSION 割 
込み 対す る 新 し い 処 置 を 設定 する も の で ある 。 割込み が 起 っ た と 
き は つね , ONCODE が テス ュ ト され て , その 割込み が , 誤っ た 
P 形 式 入力 文字 C よ る も の で ある か , また , 誤っ た 文字 は プラ ンク 
で ある か , チェ ッ ク さ れる 。 誤り の 文字 が プラ ンク の と き は , ゼロ 
で 置き 換え られ , 制御 が ERR 1 移さ れる 。 


ERR1 は , ブロ シー ジャ ー1INPUT の 内 部 に ある 。REVERT 
CONVERSION と いら うら ステー トメ ント は INPUT の 中 で 実 
行 さ れる ON CONVERSION ステ ー ト メン ト を 無効 し 
DIST の 中 で 変換 割込み C 対 し て 指定 され て いる 処置 ( その バッ 
チ を 無視 する ) を 復元 する も の で ある 。 


エラ ー・ メ ッ セ キー ジ を 書き 出す た め ( と ルー チン が 呼び 出さ れ た あ 
と , 制御 は TI N2C 行 き , そこ と で 変換 が 再 試行 され る 。 別 の 変換 エ 
ラー が 起 っ た と き の 割 込み 処置 は カー ド 1 0 と 1 1 で 指定 され て 
いる 娘 置 で ある 。 


INPUT の 中 の 2 番目 の ON ステ ー ト メン ト は , 
SUBSCRIPTRANGE 割込み (対す る 処置 を 設定 する る の で 
ある 。 て と の 条件 は , 割込み を 起す た め の SUBSCRIPTRANGE 
接頭 語 C よ っ て 明示 的 解禁 し を けれ ば を ら を ない 。 割込み が 起 と る 
と , オン ・ ユ ニッ ト は 制御 を ERR2KC 移 され る が , と と で は , 
SUBSCRIPTRANGE 割込み 対す る 新しい オン ・ ュ ユニット 
が 設定 され て , カー ド 35 の ON ステ ー ト メン ト で 指定 され た 処置 


が 打ち 消さ れる 。 し た が っ て , と の バッ チ の 中 で の も K 添 字 ェ ラー 
が 起こ と る と , 制御 は BADBATCH(C 移 され る が , と と で は , プロ 
シー ジャ ーD I ST の 中 に CCONVERSI ON 条件 が 存在 し て いる 
と き , と の 条件 が シグ ナル され る 。 INPUT を は な れる と き , オ 
ン 処置 は , D I ST の 中 で 設定 され て いる 処 皆 ( と の 場合 は , 次 の 
見 出し カー ド を 得る た め (C SKIPBC 本 を 呼び 出す ) KC 戻る と と 
注意 し て いた だ きた い 。 


新しい オン ・= ユ ニッ ト が 設定 され た あと, メッ セー ジ が 印刷 され 
新しい サン プル ・ カ ー ド が 読ま れる 。 


I IN1 と いう ラ ベル の ステ ー ト メン ト は , 80 桁 の カー ド ・ イメ 
ー ジ を , 構造 SAMPLEK 読 み 込 な み 。READ ス テー トメ ント は, 


入力 デー タ の 妥当 性 検査 を しない の で , CONVERS1I ON 条件 が 起 
と る と と は な い 。 


ステ ー ト メン ト IN2 は , ビ ピクチャー 形式 項目 C し た が っ て , カ 
ー ド 桁 11 か ら 19 ま で の デー タ を チェ ッ ク し , 編集 する 。 と れ ら 
の 桁 C 非 数 字 ( プラ ンク も 含め て ) が あぁ る と , 変換 割込み が 起 と 
り , 上 で 述べ た よう な 結果 (と な る 。 


次 の ステ ー ト メン ト ( ヵ カー ド 4 1 ) は , SUBSCRI PTR ANGE 
接頭 語 を も っ て いる 。 い ま 読 み と られ た デー タ を 用 いて , 二 重 の 添 
字 が 計算 され る 。 どちら か の 添字 が , TABLE(C 対 し て 宣言 され 
た 限界 の 外 に ある 場合 は , 割込み が 起こ と る 。 両方 と も 限界 外 C あ る 
と き は , 2 つの 割込み が 起 と る 。 
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第 15 章 : コン パイ ル 時 の 諸 機 能 


コン バイル 時 と いう の は , 一 般 C, ユー ザー の 原始 プログラム が, 実 
行 可能 目的 プロ グラ ム (C て コン ベイル され る ( つまり, 変換 され る ) 
時 間 で ある と 定義 され て いる 。 通常 , と の と き M, 原始 ブロ グラ ム 
の 変更 を する と と は で き な い 。 


し か し 。 PL プ I で は コン バイ ル 時 に ブロ グラ マー が 原始 ブロ 
グラ ム あ る 程度 の 制御 を 加え る と と が で きる 。 原始 プロ グラ ム の 
中 (て 先頭 の バー モント 記号 (% ) と よ っ て 識別 され る 特別 を ステ 
ー ト メン ト を 入れ る と と が で きる が とれ よっ て , 原始 プロ グラ 
ム の 一 部 を , 次 の ょ うな 寺 通 りか の 方 法 で 修正 する と と が で きる 。 


1. 原始 ブロ グラ ム の 中 と あ る 任意 の 識別 名 を 変更 する と と が で 
きる 。 


2. 条件 付 の コン バイ レー ショ ン を し た いり 場合 は ,。 その プロ グラ 
ム の どの セク ショ ン を コン バイ ル す る か を 表示 する と と が で 
きる 。 

3. ユー ザー・ ラ イブ ラリ ー ま た は シス テム ・ ラ イブ ラリ ー の 中 
IC あ る デキ スト の スト リン グ を , 原始 ブログ ラム KK 組み 込む 
と と が で きる 。 


PL/1I は , 次 の ょ よう な 2 段階 の ステ ー ジ を 設け て , コン バイ ル 
時 (に お ける 原始 ブロ グラ ム の 修正 を 可能 に し て いる 。 


1. プリ プロ セッ サー・ ス テー ジ - - と の ステ ー ジ の 間 (C,。 テー 
ザー の 原始 プロ グラ ム の 中 (人民 プ リプ ロ セ ッ サ ー・ ス テー トメ 
ント , (すなわち も, 走査 され ん て いる テキ スト を ブロ プロ セッ 
サー に 修正 させ る た め の 特 別 を ステ ー ト メン ト ), が ある か 
走査 され る 。 と れ ら の ステ ー ト メン ト は 原始 ブロ グラ ム の 
一 部 と みな され る の で , と の ステ ー ト メン ト と , 原始 ブロ グ 
ラム の 他 の テキ スト と を 自由 MC 入り 混ぜ て も よい 。 ブ リプ ブロ 
セッ サー・ ス テー トメ ント を 処置 し た 結果 , 修正 され た 原始 
ブロ グラ ム が , 2 番目 の ステ ー ジ へ の 入力 と を る 。 プリ ブロ 
セッ サー・ ス テー ジ は , 任意 選択 で ある と と ん 注意 し て いた 
だ き た い 。 


2. プロ セッ サー・ ス テー ジー- - と の ステ ー ジ の 間 C, 最初 の ス 
テー ジ み か ら の 出力 が 実行 可能 な 目的 プロ グラ ム ( に コン バイル 
され る 。 


本 章 は , 最初 の ステ ー ジ と 関す る も の で あっ て , ブロ グラ ム の 実 
際 の コン バイ レー ショ ン は ふれ な い 。 


プリ プロ セッ サー・ ス テー ト メン ト の ほか (て ブロ グラ マー は , 
随意 IC,. リス ティ ング 制作 ステ ー ト メント を 使 2 こ と と が で きる 。 と 
れ を 用 いて , ブロ グラ マー は ,。 ブロ グラ ム の 印刷 リ スト の レイ アウ 
ト を 制御 する と と が で きる 。 と れ ら の ステ ー ト メン ト は ,。 プリ プロ 


セッ サー・ ス テー ジ を 経由 し を い 。 


プリ プロ セッ サー の 入力 と 出力 


プリ プロ セッ サー 代 プ ブ プリプロセッサ ー・ ス テー トメ ント を 人 解読 
し , それ KC し た が っ て , 原始 プロ グラ ム K 対 し て 処置 を 加え る 。 ブ 
リプ ロモ セッ サー へ の 入力 は , ユー ザー の 原始 プログ ラム で ある 一 連 
の 文字 で ある 。 と と (て C は 。 プリ プロ セッ サー・ ス テー トメ ント が , 
ュー ザー の 原始 プロ グラ ム の 他 の 部 分 と 入り 混 っ て 入っ て いる 。 プ 
リプ ブ プロセッサ ー・ ス テー トメ ント は , 先頭 に つけ た バー セン ト 記 号 
( % ) Ir っ て 識別 され , プリ プロ セッ サー が それ を みつ けた とき 
実行 され る ( プリ プロ セッ サー・ ブ プロシージャ ー は 例外 で, と れ 
は , 実行 する た め (て は 呼び 出さ を な けれ ば を ら を い ) 。 ペー セント 記 
号 と ステ ー ト メン ト の 間 を , 1 つま た は 2 つ 以 上 の プラ ンク で 区 切 
っ て も よい 。 


プリ プロ セッ サー は ,。 プリ プロ セッ サー・ ス テー トメ ント を 解読 

する ほか MC, 注釈 や 文字 スト リン グ 定 数 の 区 切り 符号 で 相手 の ない 
も の が ある か どら か , 原始 ブロ グラ ム を チェ ッ ク す る 。 また , プリ 
プロ セッ サー 以外 の ステ ー ト メン ト 人 と つい て も , 正しく な い ゆい 文字 が 
ある か チェ ッ ク す る 。 正しく な いも の が ある と , それ を プラ ンク で 
置き 換え る 。 プリ ブロ セッ サー 以外 の ステ ー ト メン ト 対し て , と 
の ス テー ジ で 行なわ れる チェ ッ ク は は これだけ で ある 。 


プリ ブロ セッ サー か ら の 出力 は , 予備 処理 の 振 ん だ テキ スト と 呼 
ば れる 文字 の スト リン グ で ある 。 と れ は , 修正 され た 原始 プロ グラ 
ム か ら を っ て お り ,。 プロ セッ サー・ ス テー ジ へ の 入力 と な る 。 


プロ グラ マー は ,。 ブリ プロ セッ サー へ の 入力 , お よび プリ ブロ セ 
ッ サ ー か ら の 出力 を 印刷 する た め の コ ン バ パイ ラー・ オ プシ ョ ン を 指 
定 す る と と が で きる 。 ブ リプ ブロ セッ サー へ の 入力 の リス ティ ング 
(ブロ グラ マー が コー ディ ング し た ブロ グラ ム を 表わす ) は , 旧 原 
始 リ ステ ィング と 呼ば れ 。 コン バイ ラー へ の 入力 の リス ティ ング 
(プリ プロ セッ サー を 使用 し て いる と き は , プリ プロ セッ サー・ テ 
キス ト ) は , 原始 リス ティ ング と 呼ば れる 。 


プリ プロ セッ サー の 走査 


ブリ プロ セッ サー は , スト リン グ の 先頭 か ら , 入力 テキ スト の 走査 
を 開始 し , 各 文 字 を 順 々 IC 走 査 し て ゆく 。 プ リプ ロモ セッ サー・ ス テ 
ー ト メン ト が 出 て くる まで は , 各 文 字 は , 走査 され を た とき の 形式 と 
順序 の 通り iC, 予備 如 理 の すん だ テキ スト CC 入 れ ら れる 。 し か し , 

プリ プロ セッ サー・ ス テー トメ ント が 出 て くる と , 処理 が 行なわ れ , 
その 結果 原始 プロ グラ ム の 走査 と , 予備 処理 の 済ん だ テキ スト の 
それ 以降 の 作り 方 を , 次 の よう に し て 変え る と と が で きる 。 
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。】 


1. 実行 され る ステー トメント が , ブロ グラ ム 内 の 別 の 地点 か ら 
走 表 を つづ ける よう , プリ ブロ セッ サー 命じ て も よい 。 と 
の 新 し 地点 は , す で C 走 査 の すん だ 地点 で あっ て も よい 。 


2. 実行 され る ステー トメント (て よっ て , 置換 え 作業 を 開始 する 
と と が で きる 。 や まり グリ プロ セッ サザ サー* スマ ター メン ナル 
の 中 CC 出 て き て いな い 識 別名 が , その 後 の 走査 中 に 出 て き 
た と き MC, その 識別 名 を 置き 換え る と と が で きる 。 と の よう 
て し て 置き 換え られ た 値 は , 予備 処理 の すん だ テキ スト の 中 
の , 古い 識別 名 の あっ た 位置 に 書き 入れ られ る ( 詳細 に つい 
て は , 以下 の 「 再 走査 と 置換 え 」 の 項 を みて いた だ きた い 。 ) 


原始 プロ グラ ム の 最後 の 文字 より 先 を 走査 し と うと し た と と ろ で, 
走 表 は 終了 する 。 予備 処理 の すん だ テキスト が 完成 され , 第 2 ステ 
ー ジ の コン バ ィ レー ショ ン を 開始 する と と が で きる 。 


再 走査 と 置換 え 


識別 名 を 新 し い 値 で 置き 換え る 場合 買 換 え が で きる よう, まず , 
識別 名 を 活用 化 し を け れ ば な ら な い 。 最初 (C, 識別 名 は , プリ プロ 
セッ サー の DECLARE ステ ー ト メン ト ( つまり , %% DECLARPE 
スネ ステート メン ト ) の 中 出 て きた とき K 活 用 化 さ れる 。 (%% 
DEACTIVATE ス テー トメ ント の 中 KC 出 て きた とき 非 活用 化 
し , % ACTIVATE ス テー トメ ント の 中 に 出 て きた と き K 再 活用 
化す る こと と が で きる )。 最初 (C 活 用 化 さ れ た あと , と の 識別 名 C 軒 
換え 値 を 与 を な けれ ば な ら を ない 。 とれ は 通常 , プリ ブロ セッ サー 割 
当て ステ ー ト メン ト を 実行 する と と に よっ て 行 を われ る 。 


識別 名 が 活用 化 さ れ て , 値 が 与え られ た あと は , プリ ブ プロセッサ 

ー・ ス テー トメ ント 以外 の テキ スト の 中 MC 識別 名 か ある と (走査 中 
(C と の 識別 名 (と C 出 あっ を た とき, それ が 活用 状態 に な っ て いる と と 
が 条件 ) , その 値 と よっ て 置き 換え られ る 。 


プリ プロ セッ サー 変数 は RESCAN また は NORESCAN オ 
プシ ョ ン の いずれ か (と よっ て 活用 化す る と と が で きる 。 
NORESCAN ォ プシ ョ ン が 適用 され る と き は , 値 は 。 プロ グラ ム ・ テ キ 
スト 直接 挿入 され る 。 RESCAN オプ ショ ン が 適用 され る と き 
は , その 値 ま を た は その 値 の 一 部 の どちら を 別 の 値 に と よっ て 置き 換え 
る か を 判定 する た め と 値 が テス ト され て いる 間 (C 再 走査 が 行なわ 
れる 。 そ の 値 を 置き 換え る と と が で き を い 場 合 は , その 値 は 予備 処 
理 の すん だ テキ スト 挿入 され る 。 その 値 を 置き 換え る と と が で き 
る 場合 は 。 それ 以上 買 換 を が で き な く な る まで , 置換 え 作 業 が つづ 
けら れる 。 し た が っ て , すべ て の 置換 え が 終 っ た あと で だ け , 予備 
処理 の すん だ テキ スト KC その 値 が 挿入 され る 。 


識別 名 が 非 活用 化 さ れる と , その 置換 え 能 力 は 失 を われ る が , そ 
の 値 は 失 を な われ な いと と 注意 し て いた だ きた い 。 し た が っ て , と 
の よう な 識別 名 を の ち K 再 活用 化す る と き は , 置換 え の 値 を 割当 て 
る 必要 が を い - 
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た と えば , 原始 ブログ ラム に と 次 の よう な 一 連 の ステ ー ト メン ト が 
含ま れ て いる 場合 は , 


%DECLARE A CHARACTER, B FIXED: 


旧 A 三 "B+C': 
%B = 2: 
X テ A: 


上 記 の も の の か わり て, 次 の も の が 予備 処理 の すん だ テキ スト 
挿入 され る 。 


文 ー 2 士 Ci 


と の 例 の 最初 の ス テート メン ト は , A お よび B を 活用 化す る ブリ 
プロ セッ サーDECLARE ステ ー ト メン ト で あり , と れ は また 同 
時 に , 省略 時 解 息 の RESCAN (と よっ て , と これら を プリ プロ セッ 
サー 変数 と し て 活用 化 も し て いる 。 2 番目 と 3 番目 の ステ ー ト メン 
ト 寺 プリ プロ セッ サー 割当 て ステ ー ト メン ト で あり , 2 番目 の ス 
テー トメ ント は , 文字 スト リン グ ・ BC' を AX 割り 当て , 3 番 
目 の ス テー トメ ント は , 定数 2 を BC 割り 当て て いる 。 4 番目 の ス 
テー トメ ント は ,。 非 プリ プロ セッ サー・ ス テー トメ ント で ある か ら , 
と の ス テー ジ で は け は, 実行 され を い 。 


( と と で は , 説明 し や すい よう MC, 非 プ リプ ロモ セッ サー・ ス テー 
トメ ント は, 原始 ブロ グラ ム の 中 に ある も の で は ある が , プリ プ ブロ 
セッ サー・ ス テー トメ ント の 中 て も , ブリ ブロ セッ サー・ ブ ロジ シー 
ジャ ー の 中 も, 注釈 の 中 IC も 含ま れ て いな いも の で ある と し ょ ら %) 


し か し , と の ステ ー ト メン ト は A を 含ん で お り , し か も A は , 置 
換え 用 活用 化 され た プリ プロ セッ サー 変数 で ある た め , その 時 点 
(て ぉ ける A の 値 が その ステ ー ト メン ト (て 入る と と (て な る 。 し た が っ 
て , ステ ー ト メント の 中 の A は ,。 スト リン グ ' B 十 C '(C よ っ て 四 
き 換 々 られ る 。 し か し ,。 と の スト リン グ に は , プリ プロ セッ サー 変 
数 B が 含ま れ て いる 。 プ リプ ロモ セッ サー は B を チェ ッ ク し て , そ 
れ が す で K ん 活用 化 さ れ た も の で あり , 2 と いら 値 が 割り当て られ て 
いる と いら と と を 知る 。 し た が っ て , スト リン グ の 中 の B は , 値 2 
IC て よっ て 置き 換え % られ る 。 さら ( と チェ ッ ク を つづ け て ゆく と , 2 は 
置き 換え る と と が で き な い と と が わか り , 寺 C か ら 走 査 が 再開 され 
る が , これ も や は り 置 き 換 える と と が で き な い 。 し た が っ て , 置換 
え の チ ェ イ ン は と と で 終了 し , その 結果 で き 上 っ た ステ ー ト メン ト 
が , 予備 処理 の すん だ テキ スト KK 挿入 され る 。 


上 の 例 の 中 で , プリ プロ セッ サー 変数 A が , 次 の ステ チー トメント 
て よっ て 活用 化 され た も の と すれ ば ぱげ, 


%ACTIVATE A NORESCAN 
テキ スト K 挿 人 信 さ れる ステ ー ト メン ト は は, 以下 の よう て な を る 。 


メ ビー B 二 Ci 


と れ は , プリ ブロ セッ サー 変数 AIC 対 し て NORESCAN が 指定 さ 
れ て いる ので, A と 置き 換え られ た 結果 の 'B 二 C' の 再 走査 が 抑 
止 さ れ る た め で あ る 。 


プリ プロ セッ サー 変数 B は , 省略 時 解 釈 の 精度 ( 5.0 ) を も っ て 
いる た め , 実際 (に は , 2 の 前 C 4 個 の ぞ ロ が つけ られ る と と と 注意 
し て いた だ き た い 。 と の 値 が 。 スト リン グ ・B+C' の 中 の B と 置 
き 換わる と き は , 文字 スト リン グ M 変 換 さ れ , 7 個 の プラ ンク が 前 
IC つ け られ た 2 に な る ( 1 0 進 固定 小数 点数 値 を 文字 スト リン グ C 
変換 する た め の 規則 に し た が 2 )。 詳細 に つい て は , と の 章 の 「 プ 
リプ ロ セ ッ サ ー 式 | の 項 を 参照 の と と 。 


置換 を 用 の 値 《C, バー セン ト 記 号 , 相手 の な い 引 用 符 。 相手 の を 
い 注 釈 区 切り 符号 が 含ま れ て いて は を なら な い 。 


以下 の 例 は , コン バイ ル 時 の 諸 機能 を 用 いて , D O ル ー プ の 実行 
速度 を 上 げ る 方 法 を 示し た も の で ある 。 


プロ グラ マー は , 次 の よう な ルーブ を ブロ グラ ム の 中 て 入れ る と 
と が で きる 。 


DO 『= テ 1 TO 10: 
Z(1)=X(1T)+Y(1): 
END: 


次 の 一 連 の ステ ー ト メン ト は , 上 の 例 と 同じ と と を 行 な 9 ゃ の で 
ある が , コン バイ ル さ れ を た ブログ ラム の 実行 中 (て 増分 と テス ト を 
する 必要 が な い 。 


%DECLARE 1I FIXED: 

%1=1: 

LAB:: 

Z(【)= 双 (1) 十 Y(I): 

% エ モエ + 1: 

%IFE <= テ 10 %THEN %GO TO LAB: 
%DEACTIVATE 1: 


最初 の ステ ー ト メン ト は , {を 活用 化し , プリ プロ モッ サー 変数 
と し て それ を 設定 する る の で ある 。 2 番目 の ステ ー ト メン ト は , 1 
iC 1 と いう 値 を 割り 当て て いる 。 と の と と は , 非 プ リブ プロ セッ サー・ 
ステ ー ト メン ト の 中 で の も 識別 名 I C 出 あっ た と き は , 1 と 置き 
換え られ る (【! が 活用 化 さ れ て いれ ば ) と いう と と を 意味 し て いる 。 
3 番目 の ステ ー ト メン ト は , 後 か ら 出 て くる プリ ブロ セッ サー で GO 
TO ステ ー ト メン ト の 転送 目標 と し て 用 らい られ る ブリ プロ セッ サー 
の ナル ・ ス テー トメ ント で ある 。 


4 番目 の ステ ー ト メン ト は 。 プリ プロ セッ サー・ ス テー トメ ント 
で は な い の で , 置換 え 作 業 を する た め C 走 査 さ れん る だ け で あり , 実 
行 は され を な い 。 と の ステ ー ト メン ト が 最初 走査 され る と き , 1 は 
1 と いう 値 を も っ て お り , 活用 化 さ れ て いる 。 し た が っ て , と の ス 
テー ト メン ト の 中 MC 1 が 出 て くる た び K, 1 と 置き 換え られ , 形成 
され た , 予備 処理 ずみ の テキ スト 次 の も の が 挿入 され る 。 


Z( 1 ) 三 駐 ( 1 陸 才 の 6 1): 


各々 の 1 の 前 (C は , 7 個 の プラ ンク が つけ られ る と と ん 注意 し て 
いた だ きた い 。 


5 番目 の ス る ステートメント は 1 の 値 を 1 ずつ 増やす も の で あり , 
6 番目 の ステ ー ト メン ト ( プリ プロ セッ サー の IF ステ ー ト メン ト ) 
は , 1 の 値 を テス ュ スト する も の で ある 。 1I が 1 0 より 大 きく な けれ ば , 
LAB と いう ラベ ル の つい た ステー トメ ント か ら 走 査 が 再開 され る 。 
大 きい と き は , %GO TO ステ ー ト メン ト の 直後 の テキ スト か ら 
走査 が つづ けら れる 。 し た が っ て ,。 I が 10 ま で ( 10 も 含め て ) 
増やさ れる を たび KC。 割当 て ステ ー ト メン ト が 再 走査 され , TI が ある 
たび に その 時 点 に な ける 値 と 置き 換え られ る 。 と の 結果 , 次 の よら 
な ステ ー ト メン ト 群 が , 予備 処理 の すん だ テキ スト 挿入 され る 。 


( 1 ) 三文 ( 1 ) オ Y( 1 93 
Z( 2 )=X( 2 ) オ Y( と 信 
レ 放 6 10 )= ニ XX( 10 ) +Y( 10): 


前 と 同じ よう (て と,。 1 か ら 9 まで の 各 数 の 前 (は, 7 個 の プラ ンク 
が つけ られ , 1 0 の 前 は 6 個 の プラ ンク が つけ られ る 。 


1 の 値 が 1 1 と な る と , 制御 は % DBACTIVATE ス テー トメ 
ント を 通る と と に な る 。 と の ステ ー ト メン ト は , 次 の よら KC 解釈 さ 
れる 。 と の あと 原始 プロ グラ ム ・ テ キス ト の 中 識別 名 T が あっ て 
も , 形成 され る 予備 処理 ずみ の テキ スト の 中 で は 1 1 と いう 値 と 置 
き 換 々 られ な い 。 と の あと の 残り の 走査 の 間 中 , ある い は 少く と る 
%ACTIVATE ステ ー ト メン ト よっ て 1 が 再 活用 化 さ れる ま 
で の 間 は , 各々 の {は 修正 され な いま まで いる 。 1 が 再び 活用 化 さ 
れ た と き は , I は まだ 1 1 と いう 値 を も っ て いる ( 間 に 入 っ て いた 
プリ ブロ セッ サー 割当 て ステ ー ト メン ト が , TK 対し て 新 し い 値 を 
設定 し た の で な じい 限り ) 。 


プリ プロ セッ サー 変数 


プリ ブロ セッ サー 変数 は FIXED また は CHARAC TER 属 性 
を つけ て , %DECLARE ステ ー ト メン ト の 中 で 指定 され た 識別 
名 で ある 。 プ リブ ロ セッ サー 変数 対し て , と の (ほか の 属性 を 宣言 
する と と は で き ない 。 し か し , と の (ほか の 属性 は 。 コン バイ ラー が 
与え を る 。FIXED 属性 を つけ て 宣言 され た プリ ブロ セッ サー 変数 
て は , 属性 D や PC IMAL お よび 精度 (5.0 ) も 与え られ る 。 

CHARACTER プリ ブロ セッ サー 変数 'C は , 最大 の 長 さ を も た 
な い VARYING 属性 が 与 を られ る 。 ブ プリ プロセ ッ サ ー・ ス テー トメ ント 
の 中 で , 識別 名 を 文脈 宣言 あるいは 明示 宣言 する と と は で き を な い 。 


プリ ブロ セッ サー 変数 の 有効 範囲 は その 変数 を 再 宣言 し た ブリ 


プロ セッ サー・ ブ ロ シー ジャ ー 以 外 の すべ て の テキ スト わた っ て 
いる 。 プリ プロ セッ サー・ ブ ロジ シー ジャ ー の 中 で 宣言 され を た ブリ プ 
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ロ セ ッ サ ー 変 数 の 有効 範囲 は その ブ プロシージャー 全体 で ある ( ブ 
リプ ブ プロセッサ ー・ ブ プロシージャ ー の ネス ト が な い 限 り ) 。 


プリ プロ セッ サー 変数 に 値 が 与え られ る と , その 変数 が 活用 化 さ 
れ て いる 間 は , プリ ブロ セッ サー・ ス テー トメ ント 以外 の テキ スト 
MC 出 て きた 対応 の 識別 名 は すべ て , と の 値 と 置き 換え られ る 。 ブ プリ 
プロ セッ サー 変数 が 活用 化 さ れ て いな い と き は , 対応 する 識別 名 が 
あっ て る 置換 え 作 業 は 行なわ れ な い 。 


プリ プロ セッ サー 変数 は , %DECLARE ステ ー ト メン ト の 中 
で 指定 する と と に よって, 活用 化 し た り , 再 活用 化し た りす る と と 
が で きる 。 また, DEACTIVATE ス テー トメ ント の 中 で と の 
変数 を 指定 し て 非 活用 化し , その あと 欠 ACTIVATE ス テー トメ 
ント の 中 で 指定 し て 再 活用 化す る と と が で きる 。 プ リプ ロ セ ッ サ ー 
変数 を 非 活用 化し て も , その 値 は 失 を われ な い 。 い いか えれ ば , 非 
活用 化 さ れ を た プリ プロ セッ サー 変数 は , それ が 活用 化 さ れ て いた と 
き C も っ て いた 値 を その まま も っ て お ぉ おり , 必要 が あれ ば , プリ プロ 
セッ サー・ ス テー トメ ント また は プロ シー ジャ ー に よっ て 変え る と 
と が で きる 。 


プリ プロ セッ サー 式 


プリ ブロ セッ サー 式 は 原始 プロ グラ ム の 式 と 同じ ょ 9 う KK 書か れ , 
評価 され る が , 次 の 点 だ け は 異な っ て いる 。 


1. プリ ブロ セッ サー 式 の オペ ラン ド と し て 許さ れる の は , ブリ 
プロ セッ サー 変数 ご プ リプ ロ セ ッ サ ー・ ブ ロ シー ジャ ー へ の 
参照 。 1 0 進 整 定数 ビッ ト ・ ス トリ ング 定数 文字 スト リ 
ング 定数 なむ よび 組込み 関数 S UB STR, INDEX, お よび 
LENGTH へ の 参照 だ け で ある 。 スト リン グ 定 数 に つい て 
は , 繰返し 因数 は 許さ れず , 組込み 関数 参照 へ の 引数 は , ブ 
リブ ロ セッ サー 式 で な けれ ば を ら な い 。 


2. 指数 演算 記号 (**) は , 算 術 演算 子 と し て 使用 する と と が で き な い 。 


3. 算術 演算 C つ いて は , 精度 ( 5,.0 ) の 10 進 整数 算術 演算 だ 
けが 行なわ れる 。 つ まり , 各 オ ペラ ンド は , 演算 が 行 な た われ 
る 前 て 精 度 ( 5.0 ) の 10 進 固定 小数 点数 値 C 変 換 さ れ , 
1 0 進 固定 小数 点 の 結果 も 精度 ( 5.0 ) (変換 され る 。 算術 
値 に 変換 され る 文字 スト リン グ は , 符号 付 (任意 ) の 10 進 
整定 数 の 形式 C な っ て いな け れ ば を ら な い 。 除算 記号 の 特性 
(て C よ ょ っ て 影響 され る と と も ある と と 注意 し て いた だ きた い 。 
た と えば , 3 プ 5 と いう 式 は , 0.6 で は を く , 0 と 評価 され る 。 


4. 固定 小数 点 1 0 進数 値 か ら 文 字 ス トリ ング 変換 する と , つ 
ね (C, 長 さ 8 の スト リン グ と な る 。 ( と の 数 の 先行 ぞ ロ は , 
プラ ンク で 置き 換え られ , さら 3 個 の プラ ンク が と の 数 の 
左端 に 付け 加え られ る が , その うち の 1 つ は , その 数 が 負 の 
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と き 負 符 号 で 置き 換え られ る 。 ) 


プリ ブロ セッ サー 変数 (C 割 当て られ る 式 の 中 に ある 文字 スト リ 
ング に は プリ ブロ セッ サー 変数 プリ プロ セッ サー・ ブ プロ シー ジ 
ャ ー へ の 参照 , 定数 。 な よび 導 算 子 が 含ま れ て いて も よい 。 こ と の よ 
うら な スト リン グ (C, プリ プロ セッ サー・ ス テー トメ ント を 含め る と 
と は で き を い 。 


プリ プロ セッ サー・ プ ロ シ ー ジ ャ ー 


プリ プロ セッ サー・ ブ プロシージャ ー は プリ ブロ セッ サー・ ス テー 
ジ で だ け 実行 可能 な 内 部 関数 プロ ンー ジャ ー で ある 。 そ の 統語 規則 
が 他 の 関数 プロ シー ジャ ー と 直っ て いる 点 は , その PROCEDURE 
お よび END ス テー トメ ント は それ ぞ れ , 先行 バー セン ト 記 号 を ゃ 
っ て いな け れ ば を な ら を いと と で ある 。 ブ プリ ブロ セッ サー・ ブ ロッ シー 
ジャ ー の 形式 は , 次 の 通り で ある 。 


9 ラベル: [ラベ ル :)… PROCEBDURE 
[ ( 識別 名 
[ 識別 名 ])… ) 〕 


RETURNS| (CHARACTERIFIXED)}: 


し ラベ ル : ]…RETURN 
(プリ プロ セッ サー 式 ) : 


る 隊 ン f」2( し RERND [ラベル]: 

RETURN ステ ー ト メン ト が 2 つ 以 上 あっ て も よい 。 プリ ブロ 
セッ サー・ プ ブロ シー ジャ ー の 中 KK 書く と と の で きる ステ ー ト メン ト 
関す る 一 般 規則 (に つい て は , J 節 「 ス テー トメ ント 」 の 中 の 
%PROCEDURE ス テー トメ ント の 説明 を みて いた だ きた い 。 た 
だ し , 次 の と と だ け は 注意 し を な けれ ば を ら を い 。 す を な わ ち , ブリ プ 
ロ セ ッ サ ー・ プ ブロ シー ジャ ー の 中 と 出 て くる ステ ー ト メン ト は , 先 
頭 K バ ー セ ント 記号 を も っ て いて は を ら な を い 。 


プリ プロ セッ サー・ プ ロ シ ー ジ ャ ー の 呼出 し 


プリ プロ セッ サー・ ブ ロ シー ジャ ー は , 普通 の 場合 関数 参照 と 呼ば 
れる 方 法 で ,。 つま り , 入口 名 と それ 関連 する 引 | 数 リス ト (あれ ば ) 
を 式 の 中 書く と いら 方 法 で , 呼び 出さ れる 。 関数 参照 せ H。 プリ プ 
ロモ セッ サー ステ ー ト メン ト 。 ま 友 は け は 非 プリ プロ セッ サー・ ス テー 
トメ ント の 中 て 書く と と が で きる 。 


非 ジ ダサ グロ セッ サー スケ テー トメ ンド の 申 下 。 ブリ プロ セッ サー ィ 


プロ シー ジャ ー を 参照 する とき は , その 参照 の 中 で 使用 され る 入口 
名 は , その 参照 が 出 て きた 時 点 で 活用 状態 C を た っ て いな を なけ れ ば なら 
を ない 。 プリ プロ エセ ッ サ ー 関 数 の 入口 名 は , 活用 化 と 非 活用 化 K 関 す 
る 限り 。 プリ ブロ セッ サー 変数 と 同じ で ある 。 つま り , と れ ら は , 
%DEACTIVATE ステ ー ト メン ト ま た は %ACTTIVATE ス 
テー トメント と よっ て , 最初 と 活用 化す る と と が で きる 。 


プリ プロ セッ サー・ ブ プロシージャ ー は , 呼び 出さ れる 前 走査 さ 
れる 必要 は を い 。 し か し , と れ は , 呼出 し の 地点 で 。 主 テ キス ト の 
中 また は 組込ま れ た テキ スト (%%INCLUDE ステ ー ト メン ト ( よ 
っ て ) の 中 の ども ら か に ある も の で な けれ ば を ら な い 。 ブリ ブロ セ 
ッ サ ー・ ブ ロ シー ジャ ー 入 口 名 を, %DECLARE ステ ー ト メン 
ト の 中 で 指定 する 必要 は を い 。 


プリ プロ セッ サー 関数 か ら 返 され る 値 ( すなわち , RETURN ス テ 
ー ト メント の 中 の プリ ブロ セッ サー 式 の 値 ) は つね MC, 関数 参照 お よ 
びそ れ に 関連 する 数 リス ト と 置き 換わる 。 プ リプ ブロ セッ サー・ ス 
テー トメ ント の 中 で 参照 が 行 を た わ れ た 場合 は 。 ステ ー ト メン ト の そ 
の 回 の 実行 に 対 し て だけ, 置換 え が 行 な を われ る の で あっ て , その 後 
その ステ ー ト メン ト を 走査 する と , 再び 関数 が 呼び 出さ れる 結果 
を な る 。 


プリ プロ セッ サー 関数 に 対す る 引数 お よび パフ メー ター 


プロ シー ジャ ィ ー 参 照 の 中 の 引数 の 数 と % PROCEDUERE ス テー ト 
メン ト の 中 の バラ メー ター の 数 は , 同じ で ある 必要 は を い 。 関数 参 
照 が 出 て き を た ステー トメ ント の タイ ブ ( ブ プリ プロ セッ サー か 非 プ ブリ 
プロ セッ サー か ) (C し た が っ て , 引数 が 解釈 され る 。 引数 リス ト の 
中 の 引数 は , バラ メー ター・ リ スト と 突き 合せ られ る 前 評価 され 
る 。 バラ メー ター より ゃ 引数 が 多い 場合 は , 右側 C あ る 余分 の 引数 
が 無 祝 さ れる 。 ( 関数 参照 の 引数 の 場合 は , 後 で 引数 が 無視 され て 
も , 関数 は 呼び 出さ れ て 実行 され る と と し 注意 し て いた だ き た い 。 ) 
バラ メー ター より ゃ 引数 が 少な い 場 合 は , 右側 の 余分 の バラ メー タ 
ーC は , FIXPD バラ メー ター の と き は ぞ ゼロ の 値 ,CHARAC TER 
バラ メー ター の と き は ナル ・ ス トリ ング が 与え られ る 。 関数 参照 が 
プリ プロ セッ サー・ ス テー トメ ント の 中 ある 場合 は , 見 か け 引 | 数 
の 作成 に 関す る 通常 の 規則 が 適用 され る が , 関数 参照 が 非 プ リプ ロ 
セッ サー・ ス テー トメ ント の 中 KC ある 場合 は , つね (MC 見かけ 引数 が 
作ら れる 。 


非 プ リプ ロ セ ッ サ ー・ ス テー トメ ント の 中 関数 参照 が か ある と き 
は , 引数 は 文字 スト リン グ と し て 解釈 され , カン マ , また は 対 C な 
っ た 括弧 の 外側 C 右 括弧 が ある と , そ と で 区 切ら れる 。 た と えば , 
引数 リス ト (A(B,C ) , D ) は 引数 を 2 つも っ て いる 。 す な わ 
ち , スト リン グ A( B ,C ) と スト リン グ D で ある 。 そ の あ と で , 
可能 な 置換 え 作業 が ある か , 各 引 数 が 走査 され る 。 ブロ シー ジャ ー 
名 と その 』 了 散り スト の 両方 が 。 1 つの 置換 え レ ベル で みつ か ら な け 


れ ば を な ら を な い 。 し た が っ て , と の プロ シー ジャ ー 名 に 出 あ っ た と き 
(て 走査 され る テ キス ト の 中 (C あ る カン マ と 括弧 だ けが , と の 文脈 の 
中 で 考慮 され る 。 すべ て の 置換 え が 行 まわれ た あと , その 結果 の 引数 
は 各々 , その 関数 入口 名 < に対する プリ プロ セッ サー・ プ ブロ シー ジャ 
ー・ ス テー トメ ント の 中 の 対応 する バラ メー タ 一 属性 (て よっ て 表示 
され て いる タイ プ に 変換 され る 。 


プリ プロ セッ サー・ ス テー トメ ント の 中 関数 参照 が ある 場合 は , 
どく 普通 の 形式 で , 引数 と パラ メー ター と が 結び つけ られ る 。 一 致 
し て いな いと き は , 対応 する バラ メー ター の 属性 (た 合わ せ て 変換 さ 
れる 。 プリ プロ セッ サー・ ス テー トメ ント CC よっ て 呼び 出さ れる プ 
リプ ロ エ セッ サー 関数 (< 渡す と と が で きる の は , プリ ブロ セッ サー 変 
数 交 字 スト リン グ 定 数 , ぉ よび 固定 小数 点 1 0 進 定数 だ け で あ る 。 


返さ れる 値 


プリ ブロ セッ サー 関数 か ら 呼 出し 地点 C 返 され る 値 は , その 関数 の 
RETURN ステ ー ト メン ト の 中 に ある プリ ブロ セッ サー 式 (C よ っ 
て 表わさ れる 。 返さ れる 前 に , と の 値 は , その 関数 の 
%PROCREDURE ス テー トメ ント の RETURNS オ プシ ョ ン の 中 
で 指定 され た 属性 ( CHARACTER ま た は FIXED ) KK 変換 さ 
れる (必要 たら ) 。 呼出 し 地点 が 非 プ リプ ロ セ ッ サ ー・ ス テー トメ 
ント の 中 に あり , し か も その 入口 名 が NORESCAN オ ォ オプション 
ょ っ て 活用 化 さ れ て い を いと き は , 関数 参照 を 置き 換え た あと で , 
その 値 は , 置換 え 作業 の た め (C 走 査 さ れる 。 


プリ プロ セッ サー・ ブ プロ シー ジャ ー か ら 返 され る 値 《(,。 ブリ ブロ 
セッ サー・ ス テー トメ ント が 含ま れる と と は , プリ プロ セッ サー 葉 
の 規則 で は 許さ れ な いと と 注意 し て いただき たい 。 


プリ プロ セッ サー 関数 の 例 


以下 の ステ ー ト メン ト の 中 の VALUE は , 引数 1( 引 数 2 ) の 形 
で 区 字 ス トリ ング を 返す プリ プロ セッ サー 関数 プロ ンー ジャ ー で あ 
る (ただし, 引数 1 お よび 引数 2 は , と の 関数 K 渡 され た 2 つの 引 
数 を 表わし て いる ) 。 


原始 プロ グラ ム (C は , 次 の よう な 一 連 の ステ ー ト メン ト が 含ま れ 
て いる も の と し よう 。 
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%DECLARE A CHARACTER: 
%DECLARE VALUE ENTRY: 


DECLARE (ZZ(10),Q) FIXBD: 
完 A ニ リグ クィ : 
%VALUE: PROCEDURE ARG1ARG2 ) RETURNS 
(CHARACTER ) : 
DECLARE ARG1 CHARACTER , 
ARG2 FIXED: 
RETURN(ARG111・ (中 IARG211 7) け : 


究 END VALUE: 
Q 三 6 填 VALUE(A,3 ) : 


走査 が 最後 の ステ ー ト メン ト 達する と , A が 活用 化 さ れる の で, 
A は 置換 え 可 能 に な る 。 VALUE ゃ 活用 化 さ れ て いる の で , 最後 
の ステ ー ト メン ト で VALUE を 参照 する と ,。 ブリ プロ セッ サー 中 
その 名 前 の プリ プロ セッ サー 関数 プロシージャー を 呼び 出す 。 し か 
し , 9 層 A と 3 が VALUE (渡さ れる 前 C, A は その 値 (前 の 
割当 て ステ ー ト メン ト で AK 割 り 当 て られ て いる ) C よ っ て 置き 換 
えら れ , 3 は , 対応 する バラ メー ター の 属性 (< 合わ せ て 固定 小数 点 
て 変換 さ れる 。 次 に, VALUE は , と れ ら の 引数 と 括弧 を 連結 し , 
連結 し た 値 , すなわち スト リング ( 3 ) を 呼出 し 地点 IC 返 す 。 返 
さ れ た 値 は 関数 参照 と 買 き 換 わり , その 結果 が 予備 処理 の すん だ テ 
キス ト K 挿 入 さ れる 。 し た が っ て , 上 記 の 一 連 の ステ ー ト メン ト K 
よっ て 生成 され た 予備 処理 ずみ の テキ スト は , 次 の よう MC な る 。 

DECLARE ( み (10),Q) FIXED: 
Q 三 6+ オ 包 ( 99 


欧 の 例 の 中 で 定義 され て いる プリ プロ セッ サー 関数 プロ ンー ジャ 
ーG EN は , 最高 ? 9 個 の 入口 名 対し て ( バラ メー ター 記述 子 リ 
スト の 中 最高 9 9 個 の バラ メー ター 記述 子 を 入れ て )QENERIC 
宣言 を 生成 する と と が で きる 。 し か し , と の 例 で は 4 個 し か 生成 さ 
れ な を ない 。 


原始 ブロ グラ ム の 中 CC, 次 の よう な 一 群 の ステ ー ト メン ト が 入っ 
て いる も の と し よう 。 


婦 DCL GEN ENTRY: 
DCL A GEN (A,2,5,FIXED) ,・・・: 


%GEN: PROC (NAME, LOW, HIGH, ATTR) 
RETURNS (CHAR): 
DCL (NAME, SUFFTIX,ATTR,STRING) 
CHAR, (LOW, HIGH, 1,J) FIXED: 
STRING=*GENERIC(・: 
DO 1=LOW TO HIGH: ノン * ENTRY 
NAME LOOP * ン 
IF 1>9 [ 

THEN SUPF IX=SUBSTR(I,7, 2) : 
プ * 2 DIGI 和 T SUFF TX* ン 
ELSE SUFFIXーSUB STR(1, 8, 1): 
プ *1 DIGIT SUFF IX* ン 
STR ING=S TRINGIINAMEIISUFF IXI 

・ WHEN (': 

DO J=1 TO 1: ノン * DESCRIPTOR 
LIST* ン 
STRING= ニ STRTNGI1ATTR: 

IF J<I ン * ATTRIBUTE 
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SEPARATOR * ン 
THEN STRING=STRIN 1 りり ・: 
ELSE STRING=STRING11・)・: 
ノ * LIST SPPARATOR * ブ 
END : 
IF ]<HIGH プ * RERNTRY NAME 
SEPARATOR* ブ 
THEN STRING=STR ING11",・j: 
ELSE STRING=STRINGI 1 の 9": 
ノ * END OF LIST * ン 
END : 
RETURN (STRING) : 
END: 


上 記 の プリ プロ セッ サー・ 
スト が 作ら れる 。 


ブロ シー ジャ ー で は , 次 の よう な テキ 


DCL A GENERIC(A2 WHEN (FIXED, FIXED ) , 
A3 WHEN (FIXED, FIXPED, 
FIXED) , 
A4 WHEN (FIXED,FIXED, 
FIXED, FIXRED ) , 
AS5 WHEN (FIXED , FI XED , 
FIXED, FIXED,F {XPED) ) 


SUBSTR LENGTH, お よび INDEX 組込み 関数 の 用 法 


非 プ リプ ロモ セッ サー・ ス テー トメ ント の 中 で SUBSTR, 

LE NG TH , また は INDEX が 参照 され て いる と , これ ら の 名 前 
が 活用 化 され て いる と き 友 け , プリ プロ セッ サー は と れ ら の 参照 を 
実行 する 。 これら の 組込み 関数 は , %DECLARE また は , 
%ACTI VA TE ステ ー ト メン ト て よ っ て 活用 化 さ れる 。SUBSTR, 
LENG TH , お よび INDEX と いう 識別 名 の いずれ か が , 
6PROCEDURE ステ ー ト メン ト の 接頭 語 と し て つい て いる 場 
合 は , その 名 前 を も つ ュ ユー ザー 定義 の 6 の プリ プロ セッ サー・ ブ プロ シー 
ジャ ー が 参照 され て いる も の と みな され る 。 と の よら な 場合 は 。 そ 
れ ら の 組込み 関数 が プリ プロ セッ サー・ プ ブロ シー ジャ ー の 中 で 使用 
され る と き (, 識別 名 SUB STR, LENGTH , ぉ ょ よび INDEX 
(CBUILTIN 属性 を つけ て , 宣言 し 直す と と が で きる 。 


組込み 関数 は , 原始 テキ スト また は プリ プロ セッ サー・ ス テー ト 
メン ト の 中 ある と き は , ユー ザー の ブリ ブロ セッ サー 関数 と 同じ 
よう 働く 。 


SUB STR, LENGTH, ぉ よび INDEX の 最初 の 引数 は , 必 
要 K 応 じ て 文 字 c 変換 さ れる 。SUBSTR の 2 番目 と 3 番目 の 引 
数 は , 必要 な ら , 1 0 進数 変換 され る 。 TI NDPX の 2 番目 の 引 
数 は , 必要 を ら 文 字 に 変換 され る 。 返さ れる 値 は 。 SUBSTR の 
と き は CHARACTER で , LENGTH また は INDEBX の と き 
は FI ※ 到 D で ある 。 


プリ プロ セッ サー DO グル ー プ 


プリ プロ セッ サーDO グ ループ は 。 その グル ー プ KK 含ま れる ブリ ズブ 
ュ セ ッ サ ー・ ス テー トメ ント の 反復 実行 を 行 を うと と が で きる 。 
プリ プロ キッ サーD 0O グ ルー ブ の 形式 は , 以下 の 通う 9 で ある 。 


%〔 ラ ベル : 〕J… DO ューm1 TO m2(BY m3]: 
BY m3(TO m2〕 


人 【 ラ ベル < の END〔( ラ ベル 〕) 』 

上 の 形式 の 中 で 。 i は ブリ ブロ セッ サー 変数 で を けれ ば を ら ず , 
m1 , m2 お よび m3 は , プリ プロ セッ サー 式 で な けれ ば なら な 
い 。END と いう キー・ ワ ウー ド の 後 《 つ け る と と の で きる ラ ベル は 。 
ャ キャー ワー ド DO の 前 に ある いく つか の ラベ ル の 1 つ で な けれ ば な ら 
を な い 。 プリ プロ セッ サーDO グ ルー プ は ネス ト さ れ て いて も よい 
し 。 また , 複数 閉止 も 許さ れる 。 


反復 を 指定 し て いる プリ プロ セッ サーDO グ ルー ズ プ K 制 御 を 移 
す と と は で き な い が , その グル ー プ か ら 呼 び 出 され た プリ プロ モッ 
サー・ ブ プロシージャー か ら 戻 る 場合 は 例外 と し て 許さ れる 。 


プリ プロ セッ サー・ ス テー トメ ント ,。 お よび プリ プロ キッ サー・ 
ネス テー トメ ント 以外 の テキ スト は 両方 と も , プリ ブロ セッ サーDO 
グル ー プ の 中 て 入れ る と と が で きる 。 し か し , 実行 され る の は ブリ 
プロ ャ セッ サー・ ス テー トメ ント だ け で あ る 。 非 プ リプ ロ セ ッ サ ー・ 
ステ ー ト メン ト は 。 走査 され る が , 置換 え 作 業 が 可能 で ある か 走査 
され る だ け で あ る 。 


非 反復 の プリ プロ モッ サーD O グ ルー プ は , % IF ステ ー ト メン 
ト の THEN ま た は BEL SE クロ ー ズ と し て 役立つ 。 


プリ プロ セッ サーD 0 グループ の 展開 は , J 節 「 ス テー トメ ント ] 
の 非 プ リプ ロ セ ッ サ ーDO ス テー トメ ント の と と ろ で 示さ れ て いる 
る の と 同じ で ある 。 


以下 の 例 の 結果 は , と の 章 の 前 の 方 の | 再 走査 と 置換 え 」 の モク 
ン ュ ン の と と ろ で と り 上 げた ブリ ブロ セッ サー・ ル ー ズ プ の 展開 の 例 
対し て 生成 され た も の と 同じ 展開 (C を る 。 


%DECLARE 1I FIXED: 
%DO 1=1 TO 10: 

の 江 XX( よ ) よせ) 3 
%END: 
%DBACTIVATE 1: 


[返さ れる 値 」 の と と ろ の 2 番目 の 例 は , プリ プロ セキ ッ サ ー・ ブ 
ロ シー ジャー の 中 で プリ プロ セッ サーDO グ ルー ブ プ を どの よう KC 
使用 する と と が で きる か を 示し た も の で ある (も ちろ ん , ベー モン 


ーー 


記号 は 省 か を け れ ば なら な い ) 。 


外部 テキ スト の 組込み 


外部 テキ スト の スト リン グ は , %INCLUDE ステ ー ト メン ト を 
用 いて 原始 ブロ グラ ム MC 組み 込む と と が で きる 。 と の よう な テキ ス 
ト は 。 一 日 組 み 込 を れ た あ と , 組み 込ま きれ た テキ スト と 呼ば れ , ブ 
リ プロ セッ サー よび 非 プ リプ ロ セ ッ サ ー・ ス テー トメ ント の 両方 
を 入れ て 構成 す る こと と が で き る 。 し た が っ て , 組み 込ま れ た テ キス 
ト は , 予備 処理 され た テキ スト の 形成 役立て る と と が で きる 。 


注 : 必要 と され る プリ プロ ネッ サー 機能 が テキ スト の 組込み だ け 
で ぁ る 場合 , つ まり , 原始 プア ログラム (る, 組み 込ま れ た テキ スト 
も 。 WINCLUDE 以外 の プリ プロ セッ サー・ ス テー トメ ント 
が 含ま れ て い を い 場 合 は , プリ プロ セッ サー・ ス テー ジ を 省略 し て 
も る よい 。 さ ら (C くわ し い 点 と つい て は , と の コン バイ ラー の ブロ グ 
ラマ ー 手 引 書 を みて いた だ きた い 。 


組み 込ま れ た テキ スト に プリ プロ セッ サー の 宣言 が 含ま れ て いる 場 
合 は , プリ プロ ャ ッ サ ー 変 数 と し て 宣言 され た 名 前 の 有効 範囲 は , 
組み 込ま れ た テキ スト 全体 と , 組み 込ま れ た テキ スト の 後 (ある テ 
ォ ス ト で ある ( た だ し , その 名 前 が 再 宣言 され て いる プリ ブロ セッ 
サー・ ブ ロッ ー ジ ャ ー は の で ぞ く )。 


%INCLUDE ステ ー ト メン ト の 用 法 IC 関 する 一 般 形 式 と 規則 
MC つい て は , J 節 「 ス テー トメ ント 」 の と と ろ M と 示し て ある 。 


%INCLUDE ネス テー トメント よっ て 指定 され た テキ スト は , 
原始 プロ グラ ム の 中 の , その ステ ー ト メン ト が 実行 され る 地点 の 直 
後 組 み 込 を れる 。 し た が っ て , 走査 は , 組み 込ま れ を た テキ スト の 
最初 の 文字 か ら 続 ナ す られ る 。 と の テキ スト の 中 (CC ある プリ ブロ セッ 
サー・ ス テー トメ ント は すべ て 実行 され , 必要 を と と ろ で は 置換 え 
が 行 を われ る 。 


外部 テキ スト の 中 で その 宣言 が 行なわ れ て いる プリ プロ キッ サー: 
プロ シー ジャ ー は 。 その 外部 テキ ォ ス ト が 組み 込ま れ た テキ スト (C な 
っ た あ と で だ け 呼び 出す と と が で きる 。 あ る ブリ プロセ ッ サ ー・ プ ブ 
ロ シー ジャ ー が 原始 ブロ グラ ム K 組 み 込 きれ る 前 C そ の ブロ ジ シー ジ 
ャ ー が 参照 され た 場合 , その 結果 は どう な る か わか ら な い 。 


PAYROLL は , 原始 ステ ー ト メン ト ・ ラ イブ ラリ ー の 中 の プ 
ッ ク で , その 中 次 の よう な 構造 の 宣言 が 含ま れ て いる も の と し ょ う 。 


DECLARE 1 PAYROLL , 
2 NAME, 
3 LAST CHARACTEIR (30 ) VARYING, 
3 FIRST CHARACTER (15) VARYING, 
3 ぅ 3 MIDDLE CHARACTER (3) VARYING, 
2 MAN NO FIXED DECIMAL (6,0) 
3 RECLR FIXED DECIMAL (8, 2) 
3 OVERTIM FIXED DECIMAL (8,2), 
2 RATE, 
3 REGLAR FIXED DEC IMAL (8,2), 
3 OVERTIME FIXED DECIMAL (8,2): 
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次 の 一 連 の プリ プロ セッ サー・ ス テー トメ ント は, 


%DECLARE PAYROLL CHARACTER : 
PAYROLL='CUM PAY・: 
INCLUDE PAYRL: 

容 DEBACTIVATED PAYROLL: 
INCLUDB PAYRL: 


2 つの 全く 同じ 構造 宜 言 (名 前 だ けが CUM_PAY と PAYROLL 
と いう ょ よう (違っ て いる ) を 生成 し て , 予備 処理 の すん だ テキ スト 
和信 れる 。 最初 の %TNCLUDE ステ ー ト メン ト が 実行 され る と , 
PAYRL の 中 の テキ スト が 原始 プア ログ ラム 組み 入れ られ る 。 と 
の 組み 込ま れ た テキ スト の 中 を 走査 し て PAYROLL と い 2 議 別 
名 に 出 あ 2 と , 活用 化 さ れ た プリ プロ ャ ッ サ ー 変 数 PAYROLL 
の 現在 の 値 , す を わ ち CUM_PAY (て よ っ て 置き 換え られ る 。 組 
み 込 まれ た テキ スト を さら 走査 し て も , と れ 以 上 置換 え は 行なわ 
れ な い 。 そ の あ と の 走査 では, %DPACTIVA TE ステ ー ト メン 
ト が みつ か る 。 と の ステ ー ト メン ト が 実行 され る と , プリ プロ ネッ 
サー 変数 PAYROLL が 非 活用 化 さ れ , と の 識別 名 は 置換 ぇ が 不 
可能 C を る 。 2 番目 の %INCLUDE ステ ー ト メン ト が 実行 され る 
と , PAYRL の 中 の テキ スト が も 2 1 度 原始 プア ログ ラム KK 組み 入 
れ ら れる 。 し か し , 今度 は , 組み 込ま れ た テキ スト を 走査 し て も , 
組み 込ま れ た テキスト の 中 の 識別 名 は い ず れる 活用 化 さ れ て いな い 
の で , 置換 え は 何 も 行 な われ な い 。 と の よう に し て , 名 前 だ けが 違 
2 2 つの 構造 宣言 が , 予備 処理 の すん だ テ キス ト 挿入 され る 。 


プリ プロ セッ サー・ ス テー トメ ント 


と と で は , プリ プロ セッ サー・ ス テー ジ で 使用 する と と の で きる ぇ 
テー トメ ント を あげ て , 本 章 で まだ 説明 し て いな い プ リプ ロ セ ッ サ 
ー* ス テー トメ ント と つい て 簡単 に 説明 す る 。 す べ て の プリ ブ プロセ 
ッ サ ー・ ス テー トメ ント , その 形式 。 お よび その 用 法 に 関す る 規則 
に つい て は , J 節 |「 ス テー トメ ント 」 の [プリプロセッサ ー・ ス ステ 
ー ト メン ト 」 の 項 で 説明 する 。 


し か し , まず 最初 C, 一 般 C プ リプ ロモ セッ サー・ ス テー トメ ント 
(C つ いて 注意 すべ き と と を いく つか あげ て あか な けれ ば な を なら な い 。 


1 プリ プロ セッ サー・ ス テー トメ ント の 中 KK 出 て くる キー ワー 
ド の うち の あ る も の は , C 節 「 キーワ ー ド と その 省略 形 」 の 
と と ろ で 示さ れ て いる よう (CC, 略語 に する と と が で きる 。 


2. ブラ ンク を 人 れる こと と の で きる 場所 で あれ ば , プリ プロ セッ 
サー・ ス テー トメ ント の 中 K 注 息 を 入れ る と と が で きる 。 し レ 
か し , と の ょ うな 注釈 は , 予備 処理 の すん だ テキ スト (は 挿 
和信 さ れ な を ない 。 


9 アリ プッ ザー ュ ス チー トメ ンド ト 人 は まぐ ラ ベル を つけ 
る と と が で き る 。 と の よう を な ラベル は , バー セン ト 記号 の 直 
後 ( プ ラン ク だ け は , 間にあっ て よい ) ic 置か た な けれ ば な ら 
な い 。 ラ ベル は すべ て , 少 字 の つか を い ス テー トメ ント ・ ラ 
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ベル 定数 で な け れ ば な ら な い 。 ( %DECL ARE ス テー ト 
メン ト に つい て いる ラベ ル は 無視 され る 。 ) 


次 に あげ る プリ プロ セッ サー・ ス テー トメ ント て よっ て 行なわ れ 


る 機能 C つ いて は , と の 章 で す で K 説明 し た 。 


災 ACTIVATE 
%DEACTIVA TE 
究 DECLARE 
%DO 
欠 END 
WINCLUDE 
PROCEDURE 
RETURN 
ブリ プロ セッ サー の RETURN ステ ー ト メン ト 時, プリ プロ エセ 
ッ サ ー・ ブ プロシージャー 内 部 で し か 使 2 と と が で き を いも る の で あぁ り , 
その 中 で は バー セン ト 記号 を 省略 し た なけ れ ば を ら な い の で , 先頭 Cc 
バーモント 記号 を つけ る と と は で き な いと と 注意 じ て い た だ きた い 。 


以上 の ほか C,。 プリ プロ セッ サー・ ユ ステ ー ジ で 実行 で きる ステ ー 
トメ ント が 4 つ ぁ る 。 


昌 割 当て 
GO TO 
究 IF 
%% ナ ル 


プリ プロ セッ サー 割当 て ステ ー ト メン ト は , プリ プロ セッ サー 式 
を 評価 し 。 プリ ブロ セッ サー 変数 'c そ の 結果 を 割り 当て る の KC, 用 
いら れる 。 と の セク ショ ン で 示さ れ て いる 例 は すべ て , と の ステ ー 
トメ ント を 使用 し て いる 。 


2%GO TO ステ ー ト メン ト は , 順次 的 を 走査 を 中 断 し て , 原始 
ブロ グラ ム 内 の 別 の 場所 ( 特 C, %GO TO の 中 で 指定 され た ラ 
ベル の 位置 ) か ら 走査 を つづ ける よう , プリ プロ セッ サー 指示 す 
る も の で あ る 。 し た が っ て , と れ は , テ キス ト を 再 走査 し た り , 飛 
ば し た りす る と き K 有 用 で あ る 。 


6 ITF ス テー トメ ント は , プリ プロ セッ サー 式 の 値 応 じ て , 走 
査 の 順序 を 制御 する の に C 有 用 いる と と が で き る 。 と の ステ ー ト メン ト 
の 中 で THEN ク ロー ズ は 必須 の も る の で あり , ELSE クロ ー ズ は 
あっ て も なく て も よい 。 どちら の クロ ー ズ (て も ,。 また , その クロ ー 
ズ の 中 の プリ ブロ セッ サー・ ス テー トメ ント (CC も それ ぞ れ , 先頭 C 
バー セ ント 記号 を つけ な けれ ば を ならない 。%% IF ステ ー ト メン ト を 
ネス ト す る と と が で き る が , その 場合 C は 。 非 プリ プロ セッ サー 
IF ステ ー ト メン ト の ネス ティ ング を 対し て 適用 され た も の と 同じ 
規則 (C し た が わな け れ ば な ら な い 。 


プリ プロ セッ サー の ナル ・ ス テー トメ ント は ,。 パー セン ト 記号 が 
つく 点 以 外 は , 非 プ リプ ロ セ ッ サ ー の ナル ・ ス テー トメ ント と 同じ 
で あ る 。 と れ は , GO TO ステ ー ト メン ト の 行先 を 設定 し た り , 
ネス ト さ れ た 究 IF ス テー トメ ント の 中 で %E TL SE クロ ー ズ の ベベ 
ラン ス を と っ た りす る た め , 使用 する と と が で きる 。 た と えば , 
%ELSEW% : は , ナル の ETL SE クロ ー ズ で ある 。 


グロ グラ マー の コー ディ シング 


AーB: 
SKIP(2): 
C=D5 


AB 


ロ 
す 


非 原始 リス ティ ング ま た は 原始 リス ティ 
ング (ブリ プロ セッ サー を も た な いら 場合 ) 


メー テ 2: 欠 SKIP(1): 
Y テ 0 }: 


r< RIO 
選 O Q い ID 


B1ーY1r Bs B1 三 '11B: 


%SKIP:B2=*0'B: 


P テ 0 ji…SKIP(1) :SIG 
NAL CONVERS1I ON: 

( 行 の 最後 の 桁 に た J.SIGNAL の 
G が ある ) 

RES=SQRT( 又 ) : 
%PAGE: 

DCL ZZ FLOAT: 
OPEN FILE (F1): 
%%PAGE: PUT (REC_1): 
END LOOP_3B:%PAGE:A 
LLOCATE A_3: 

( 行 の 最後 の 桁 C ALLOCATE 
の A が ある ) 


図 1 5.1 %%PAGE おぉ お よび W%SKIP ステ ー ト メン ト の 効果 


リス ティ ング 制御 ステ ー ト メン ト 


印刷 され る リス ティ ング の レイ アウ ト を ブロ グラ マー が 制御 する た 
め に と, 次 の よう を ステ ー ト メン ト が 2 つ あ る 。 


SKIP(G)〕] : 
%PAGE: 


様々 を 状況 C な ける % SKI P な ぉ よび 只 PAGD ステ ー ト メン ト 
の 効果 が 。 図 1 5.1C 示 され て いる 。 


究 SKIP は , リス ティ ング の 中 で 何 行か を スキ ッ プ する と と を 
指定 する る の で あり , %PAGE は , 次 の ペー ジ か ら リ ステ ィング 
を つづ け る と と を 指定 する も の で ある 。 


どちら の ステ ー ト メン トト 先頭 に バー セン ト 記 号 を も っ て は いる 
が , 必ず し ゃ プリ プロ セッ サー の 使用 を 必要 と する わけ で は を い 。 
し か し , プリ ブロ セッ サー を 使用 し て いる と き は , こと これら の ステ ー 
トメ ント は , 旧 原 始 り リス ティ ング (プリ プロ セッ サー へ の 入力 ) 
も , 原始 リス ティ ング (予備 処理 の すん だ テキ スト ) も 適用 さ れる 。 


旧 原 始 リ ステ ィング か 原始 リス ティ ング の い ず れ か KC, %SKTP 
(n) ス テー トメ ント を 適用 する と , リ ステ ィング の 中 で 次 の 行 を 印 


) %SKIP(1): 


WSKIP:B2=・0・B: 
P=0 :…%SKIP(1) :SIG 
NAL CONVERSION:: 
DCL ZZ FLOAT: 


新 し い ペ ー ジ の 先頭 


新しい ペー ジス キッ プ し な い 。 


予備 処理 後 の 原始 リス ティ ング 


CONVERSION: 
DCL Z FLOAT: 
新 し い ペ ー ジ の 先頭 


PUT (REC_1): 
新しい ペー ジ の 先頭 


新しい ペー ジ C に スキップ し な い 。 


ALLOCATE A_32: 
新しい ペー ジ の 先頭 


刷 す る 前 C, n 行 の ブラ ンク 行 が 挿入 さ れる 。%SK TP : と いら ス 
テー トメ ント は, %SKTI P(1) : と 同じ で あ る 。 


パパ PAGE j: と いう ステ ー ト メン ト は, リス ティ ング の 中 の テキ ス 
ト の 次 の 行 を , 次 の ペー ジ の 最初 の 行 (印刷 させ る も の で あぁ る 。 
%PAGE ステ ー ト メン ト の 中 で 指定 で きる オプ ショ ン は な い 。 


%SK IP また は %PAGE ステ ー ト メン ト が 。 効力 を も っ た あ 
と は , プリ プロ セッ サー は こと れ ら を 印刷 し な いし , また コン バイ ラ 
ー が これ ら を テキ スト か ら 削 除 す る 。 し た が っ て , 形式 化 さ れ た リ 
スト (は 出 て と な い 。 


リス ティ ング の 形式 化 を する た め K, リス ティ ング 制御 ステ ー ト 
メン ト は , 他 の ステ ー ト メン ト と は 別に し て テキ スト の 1 行書 か 
を け れ ば を ら を な い 。 


プリ プロ セッ サー が 使用 され て いる と き は , 同じ 行 (( テ キス ト を 
も つ SKIP ま を は %PAGE ステ ー ト メン ト は , プリ プロ ネッ 
サー( て よって, それ 自身 の 行 C 移 され , コン パイ ラー・ リ ステ ィ ン 
ク が 印刷 され る と き (C そ れ が 効力 を 発する よう IC さ れる 。 し た が っ 
て 。 グリ プロ セッ サー*・ リス ベティ ング は コー ディ ング され た 通り 
印刷 され る が , 原始 リス ティ ング は , 適当 C 行 また は ページ が ス 
キッ プ さ れ た 形 に を る 。 
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プリ プロ セッ サー が 用 いら れ て いる と き は , 鱗 PAGE また は 
%SK IP が 含ま れ て いる 行 の 終り で 分 割 さ れ て いる キー ワー ド や 
他 の 識別 名 は , 2 つの 部 分 が 連結 され て , 原始 リス ティ ング の 中 で 
は 完全 を 識別 名 を 形成 する よう C な る 。% SKIP また は %%PAGP 
を 削除 する と と MC よっ て 充分 な た スベ ー ス が 得 ら れ た 場合 は , 最初 の 
部 分 が 出 て いる 行 完 全 を 語 が 印刷 され る が , 得 ら れ を い 場 合 は , 
新 し い 行 が 開始 され る 。 


SKIP(n): ステ ー ト メン ト の n が , その ペー ジ K 残 っ て い 
る 行 数 より も ゃ 大 きい と き は , 究 PAGP ステ ー ト メン ト と 同じ ゃ の 
が か わり 実行 され る 。 
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と の 章 は , 3 つの セク ショ ン に わか れ て いる 。 最初 の セク ショ ン で 
は , 最適 化 機能 に つい て 説明 する 。 2 番目 の セク ショ ン (《C は , ブロ 
グラ ム の 効率 を 上 げ る た め の 実 際 の コー ディ ング を いく つか 上 げ て 
ある 。 3 番目 の セク ショ ン で は , 初め て PL 上 1 を 使用 する プログ 
ラ マー が 陥 い りや すい 誤り や 落し 穴 を いく つか 紹介 する 。 


最適 化 


最適 化 の 主 を 日 的 は , で きる だ け 速く 実行 され , し か る も 実行 中 占 
め る スペ ー ス が で きる 限り 少な いい 日 的 プロ グラ ム を 生成 する と と で 
ある 。 多く の 場合 。 と れ は , ブロ グラ ュー の 書い た ステ ー ト メン ト 


対し て 効率 の よい コー ド を 生成 する と いう と と を 意味 し て いる が , 


その 他 (C も, 同じ 結果 を 作り 出す 一 方 で 効率 を 上 げ る た め (《C, ステ 
ー ト メン ト や 操作 の 順序 を ,。 コン バイ ラー が 変え ん る と と も で きる 。 


最適 化 コ ン バ イ ラー で は , 次 の よう な タイ ブ の 最適 化 が 行 な た われ 
8 


・ 共通 の 式 を 排除 する 。 


・ 不変 の 式 を ルー プ か ら 移 動 す る 。 


・ 衝 分 を 式 を 排除 する 。 


・ 式 を 単純 化す る 。 


・ 配列 と 構造 を 初期 値 化 する 。 


・ 変換 を イン ライ ン ・ コ ー ド する 。 


・。 レ コー ド 入 出力 転送 スチ テー トメ ント を イン ライ ン ・ コ ー ド 
する 。 


・ REGIONAL デー タ ・ モ セッ ト の 場合 の キー 変換 を 減ら す 。 
・ 形式 リス ト と デー タ ・ リ スト を 突き 合わ せる 。 

・ スト リン グ の 取扱 らい を イン ライ ン ・ コ ー ド と する 。 

・ 大 半 の 組込み 関数 を イン ライ ン ・ コ ー ド KC する 。 

・ DO ステ ー ト メン ト K を 対し て 特別 を 場合 の コー ド を 作る 。 


・ 配列 と 構造 K 対 し て 特別 を 場合 の コー ド で 作る 。 


・ で きる た け 長い 間 値 を レジ スタ ーC と ゞ さめ て お き , 最適 の 流 
れ 経路 に も と づい て 効率 の よい テア ドレ ス 計 算 を 行 2 と と に よ 
っ て , レジ ス ター と ア ドレ ス ュ を 最適 化す る 。 


・ で きる 限り 。 ブロ グラ ム の プラ ンチ を 同じ 基底 アド レス KC 対 
する も の する 。 


・ 共通 の 定数 と ブログ ラム 制御 デー タ を 排除 し て , スペ ー ス の 
使用 を 最小 に 押え る 。 


重要 を 機能 の いく つか に つい て は , 次 の セク ショ ン で さら くわ 
し く 説 明 す る 。 


共通 式 


「 共 通 式 ] と いう 語 は , 次 の 例 の よう CB+C と いう ょ よう な 式 を 記 
述 す る 際 C 用 い られ る も の で , 


A 三 B+C 


D 三 B+C 


と の 場合 , 変数 B と C は , と れ ら の 2 つの 式 の 間 で リセ ッ ト さ れ な 
いも の と する 。 と の よう な 場合 は , 明らか K, 共通 の 式 を 1 度 だ け 
評価 すれ ば よい わけ で ある 。 


同じ 式 を 繰返し て 評価 す る と と を 避け る 手法 は , 共通 式 の 排除 と 
呼ば れる 。 


と の 手法 が 用 へ られ る 重要 な 例 と し て は , 各 変 数 C 対 し て 同じ 添 
字 値 が 使用 さ れる よら う な, 浴 字 つ き の 変 数 が 含ま れる ステ ー ト メン 
ト の 例 が あげ られ る 。 たとえば, 


PAYROLL _TAX(MANNO ) =PAY_CODE(MANNO) * 
WEEKPMNT (MANNO ) : 


准 字 式 MANNO の 値 は , ステ ー ト メン ト が 実行 され る と き K 1 度 


だ け 計算 され る ( MANNO が 1 0 進 変数 と 宣言 され て いる と き 【 
は , 1 0 進数 か ら 2 進 数 へ の 値 の 変換 $ と の 計算 (含ま れる ) 。 


共通 式 の 排除 が 行なわ れ て いる プロ グラ ム に 対す る 割込み の 
取扱 い 


PL 1 の 各 ス テー トメ ント の 中 ある 殆 ん どの 演算 の 順序 は , そ と 
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(C 含 ま れる 演算 の 優先 順位 に し た が っ て , 行なわ れる 。 し か し, 優 
先 順位 の 低い 演算 子 の オォ ペラ ンド と な る よら な 結果 を 生じ る 副 次 式 
( 添字 式 ロ ケー ター 修飾 式 。 関数 参照 な ど ) の 評価 の 順序 は , 別 
の 演算 で その 値 を 使用 する 前 に オ ベラ ンド が 完全 評価 さ れ て いな 
け れ ば ならない と いら 規則 以外 に は , 決め られ て い を い 。 し た が っ 
て と の よう な 副 次 式 の 評価 中 K 起 と る 割込み と 結び つけ られ る オン ・ 
ュ ユニ ッ ト は, 予測 できない 順序 で 入る 可能 性 が あ る 。 し た が っ て , 
オン ・ ユ ニッ ト K 入 る 順序 や それ (て よっ て と られ る 女 置 次 第 で , 1 
つの 式 が いろ いろ な 値 を と る 可能 性 が ある 。 計算 の オン ・ ユ ニッ ト 
に 入る と き は , 


1. 前 の ステ ー ト メン ト の 実行 に よっ て セット され た すべ て の 変 
数 の 値 は , その 変数 に 割り当て られ た 最後 の 値 で もち る と と が 
保証 され て いる の で , オン ・ テ ユニット は と れ を 使用 する と と 
が で き る 。 た と えば , オン ・ ユ ニッ ト ( 入 っ た と きす べ て 
の 変数 の 値 を 記録 する た め (C, PUT DATA ステ ー ト メ 
ント を 使用 する と と が で きる 。 


2. 計算 割込み か ら 生 じ し た オン ・ ユ ニッ ト の 中 で セッ ト され た た 変 
数 の 値 は 。 ブロ グラ ム の どの 部 分 で も , その 変数 < 割 り 当 て 
られ た 最後 の 値 で も る と と が 保証 され て いる 。 


関連 する オン ・ ユ ニッ ト の 中 で ,。 ま を は オン ・ ユ ニッ ト か ら の デブ 
ラン チ を 実行 し を 結果 と し て , 起 っ た 計算 割込み の 結果 , 変数 が 修 
正 さ れる 可能 性 が ある 場合 に は , 共通 式 の 排除 は 禁 L され る 。 た と 
えば , 


ON ZPRODIVIDE B,C テ 1: 


メーA+ B 寺 BC: 
YA* B+D: 


コン バイ ラー は 通常 , 2 番目 の 割当 て ステ ー ト メン ト の 中 の 一 次 式 
A* B の 再 評価 を 排除 し ょ うと する 。 し か し , と の 例 で は , BC 
の 評価 中 に ZERODIVIDE 条 件 が 起 っ た 場合 A*B の 2 つ 
の 値 が 違っ て くる 可能 性 も ある 。 と の 可能 性 を 考慮 し て , と の 最適 
化 は 禁止 され る 。 


上 の 説明 は 。 最適 化 オ プシ ョ ン ORDER が 指定 され て いる か , 
想定 され て いる と き だけ 適用 され る と と 注意 し て いた だ き たい 。 
ブロ グラ マー が , 上 で 述べ た 保証 を 必要 と し を い と き は , 最適 化 オ 
プシ ョ ン REORDER を 指定 する と と が で きる 。 と の 場合 , 共通 
式 の 排除 は 禁止 され を い 。 ORDER お よび REORDER オ ブシ ョ 
ン C に つい て は , と の 章 の 後 の 方 で 説明 す る 。 


不変 の 式 ま た は ステ ー ト メン ト の 移動 


ルー プ の 中 に C 出 て くる 式 ま を た は ステ ー ト メン ト は , その 式 の 値 ま た 
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は ステ ー ト メン ト の 処置 が ルー プ の 反復 の た び MC 同じ で ある と と を 
コン バイ ラー が 発見 で きる と き は , 不変 で ちあ る と いう 。 


不変 の 式 ま を は ステ ー ト メン ト を , ルー の 中 か ら , ルー の 外 
側 C あ る ブロ グラ ム 内 の 地点 へ 移動 し て , ルー プ を 反復 す る た び で 
は を く , 1 度 だ け 実 行 す る と と が で き る 。 た と えば げ ば, 


DO 1 = 1 TO Ni: 


END: 


サー 3 : と いら う ステー トメント は 不変 で ちあ る か ら , ルー プ の 外 へ 移 
動 す る と と が で きる 。 状況 (応じ て , 前 K 移 し て も 後 K 移 し て も よ 
い 。 


と の タイプ の 最適 化 を 利用 し た い 場 合 は , 順序 変更 の 可能 な ステ 
ー ト メン ト また は 演算 を も つ ル ー プ が 含ま れ て いる BEGIN また 
は PROCEDURE ブ ロッ ク ( 対 し て , 最適 化 オ プシ ョ ン REORDER 
を 指定 し を けれ ば な を ならない 。 と の オプ ブ プション が 指定 され て いな いと 
き は 。 省略 時 解 息 の オプ ショ ン ORDER が 想定 され , 最適 化 は 禁 
止 さ れる 。 


ORDER お よび REORDER オ プシ ョ ン 


ORDER お よび REORDER は PROCEDURE ま を は 
BEGIN ステ ー ト メン ト の 中 で , プロシージャー ま た は 開始 ブロ 
ッ ク KK 汐 し て 指定 され る 最適 化 オ プシ ョ ン で あ る 。 


標準 の 省略 時 解 息 は ORDER で あろ る が , 内 MC 含ま れる ブロ ッ ク 
は すべ て , 明示 的 KORDER が 指定 され て いな い 限 り ,RPORDER 
を 受け つぐ 。 


ORDER オプ ショ ン 


ブロ ッ ク の 中 で 修正 され る 変数 対し て 最後 に 割り 当て られ た 値 を , 
ブロ ッ ク の 中 で ステ ー ト メン ト お よび 式 を 実行 し て いる と き K 起 っ 
た 計算 割込み の た め C 入 っ た オン ・ ユ ニッ ト の 中 で 使用 で きる よう 
IC し た いひ 場合 は 。 プロ シー ジャ ー ま た は 開始 ブロ ッ ク K 対 し て 

ORDER オプ ショ ン を 指定 し を な け れ ば を ら を い 。 ORDER オ ォ オブ ショ 


ン が 適用 され て いる ブロ ッ ク の 中 で は , コン バイ ラー が 共通 式 を 排 
除 す る と と が ある 。 そ の よう な 場合 は , ブロ ッ ク の 実行 中 C 起 と る 
計算 割込み の 回 数 は , 共通 式 が 排除 され を か っ た 場合 C く ら べ て , 

少 を いか も し れ を い 。 しかし, OR DER ブロ ッ ク の 実行 中 割 込 
み が 起 っ た 場合 は , 割込み の 前 (C あ る ステ ー ト メン ト の 中 で 変数 
割り 当て られ た 値 は , 割込み に 対す る オン ・ ユ ニッ ト の 中 で それ ら 
が 参照 され た とき , 最後 に 割り 当て られ た 値 で も る と と が 保証 され 
る 。 ORDER ブロ ッ ク の 中 で は , 割込み を 起す 可能 性 の ある 式 を 
前 ま ん は 後 K 移 動 す る と と を の ぞい て , 他 の 形式 の 最適 化 が 許さ れ 
て いる 。 起 と る 可能 性 の ある すべ て の 条件 を 禁止 する 必要 が ある の 
で , OR DER を 使用 する と , 実質 的 に , . ル シル ー プ か ら ス テー トメ ン 
ト また は 式 を 移動 する と と は , 抑止 され る と と (て を る 。 


REORDER オプ ショ ン 


REORDER オプ ショ ン を 使用 する と , コン バイ ラー は ある 程度 
の 柔軟 性 が 得 られ る の で , 生成 され る 目的 コー ド の 中 で 高い レベ ル 
の 最適 化 を 行なう り と と が で きる 。 


ルー プ の 中 書か れ て いる ステ ー ト メン ト が , ルー プ の 中 で それ 
を 繰返し 実行 す る と と が 余分 で も ちる よら な 場合 が ある 。 REORDER 
オプ ション を 用 いる と 。 コン バイ ラー は , その ステ ー ト メン ト が 一 
度 だ け 実行 され る よう, と の よう な を ステー トメ ント を 原始 ブロ グ 
ラ ム の 中 で ルー プ の 前 ま た は 後 の 地点 < 移動 する と と が で きる 。 同 
様 C。 ルー プ の 影響 (に 関し て 不変 で ある 式 は , ルー プ の 外側 の 一 地 
上 加 で 1 度 だ け 評 価 す る と と が で きる 。 


ルー の 実行 中 に 頻繁 に 修正 さ れる 対象 と な る 変数 の 値 を レジ ス 
ターK 保 持 し て お く と と (CC よって, ルー プ を より 効率 よく 実行 する 
と と が で きる 。 エラ ー な し で 実行 が で き る と き は , レジ スタ ー の 中 
KC 値 を 保存 する と と が で きる の で , 記憶 位置 で 変数 の 値 を リセ ッ ト 
する た め の , 時 間 の か か る ロー ド と 記憶 の 操作 を 排除 する と と K よ 
っ て , 大 巾 C 効 率 を よく する と と が で きる 。 ルー プ が 実行 され た あ 
と で 変数 の 最新 の 値 が 必要 を と き は , 制御 が ルー プ の 外 に 渡さ れ た 
と き K 変 数 の 記憶 位置 に 値 が 割り 当て られ る 。 


プ ブロック K 対 し て REORDEER が 指定 され て いる とき は , レジ ス 
ター の 割 振り を 有意 義 K 最 適 化す る と と が で きる 。 し か し , 計算 割 
込み が 起 っ た とき , ブロ ッ ク の 中 で リセ ッ ト され る 変数 の 値 は , 最 
後 C 割 り 当 て られ た 値 で ある と は 保証 され を い 。 と れ は , 変数 の 最 
新 の 値 は レジ ウス ター の 中 と は ある か も し れ を い が , 変数 の 記憶 位置 
(C は を いた めで ある 。 し た が っ て , 計算 割込み の た め C 入 る オン ・ 
ュ ニ ッ ト で は , REORDER ブロ ッ ク の 中 で セッ ト さ れる 変数 を 
参照 し て は を ら を な い 。 し か し , 組込み 関数 ONSOURCE お ょ よび 
ONCHAR は , と の 文脈 の 中 で 使用 し て も よい 。 


スネ ステー トメント の 実行 ま た は 式 の 評価 の 順序 を 変更 する と , 変更 


を し な けれ ば , 条件 付 の P し ノエ ス テー トメ ント よっ て 諸 け られ 
た は ず の 計算 割 愉 み が 起 と る 可能 性 が ある 。 た と え げ , 


IF Y マ ーー 0 THEN DOJ 1 TO K: 
Z(J) = ノン Y: 
END: 


メ Y が ルー プ の 外側 で 評価 され た 場合 は , Y の 値 が で ぞ ロ の と き , 
ZERODIVIDE 条件 が 起 と る 。 


順序 変更 の 結果 , 次 の よう な と と が 起こ る 場合 は 。 ORDER ォ 
プシ ョ ン を 指定 し を けれ ば な ら な い 。 


1. 計算 割込み また は 
2. 故意 初期 値 化 し な い 変数 を 使用 する 。 


と の どちら る, 順序 変更 が な けれ ば , 条件 付 の PL エス テー トメ 
ント KC よっ て 開け る と と が で きる 。 


値 が 保証 され て いな を い 変数 が うし ろ で 使用 され て いる 
REORDER ブロ ッ ク の 中 で 計算 割込み また は シス テム 和 置 割 込 
み が 実行 中 に 起 っ た 場合 は 。 プロ グラ ム は エラ ー に な る 。 


CONVERSION ォ オン ・ ュ ユニ ッ ト K 対 し て ONSOURCE ぉ 
よび ONCHAR 擬似 変数 を 使用 し て いる 場合 を の ぞい て , と れ ら 
の 制約 は , エラ ー の ある デー タ の 集 り を 排除 する の で , プロ グラ マ 
ー は , 標準 の シス テム 処置 て まかせ て ブロ グラ ム の 実行 を 中 止 する 
か , ある い は , オン ・ テ ユニ ッ ト を 使用 し て , エラ ー の 回 復 処 置 を 行 
を い , 計算 の た め 新しい デー タ を 得 て プ ログ ラム を 再開 する か し 
を けれ ば な ら な い 。 2 番目 の 手法 を 用 いる と き は , で きる 限り 最適 
化 を 利用 し な が ら , すべ て の 有効 を デー タ を 処理 し , 無効 を デー タ 
(て は 注 を つけ る よう (て し な けれ ば な ら な い 。 


次 の 例 は , REPORDER オプション の 効果 を 示 し た も の で ある 。 


ON OVEREFLOW PUT DATAj 


DO J = 1 TO M: 
DO Ii = 1 TO Ni: 

X(1,J) = YO) + 2Z0) *L + SQRT(W): 
P = 1*Jj ' 
END: 

END: 


上 記 の ステ ー ト メン ト が REORDER ブロ ッ ク の 中 に ある と , コ 
ン バ パイル され る 原始 コー ド は , 次 の ょ よう (C 解 釈 され る 。 
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ON OVERFLOW PUT DATAj: 


TEMP1 = SQRT(W): 

DO J = 1 TO M: 

TEMP2 Z(J) * 廿 二 TEMP1: 
DO 』 = 1 TO Nij 

X(1,J) = Y(1) 十 TEMP2: 
END: 

END: 


TEMP 1 と TEMP2 は , ルー プ の 後に 移さ れ た 式 の 値 を 入れ て 
ぉ お く た め に 作ら れ た 一 時 的 を 変数 で ある 。P 三 IL*Jiji と いう 
スネ ステー トメント は , P の 値 が 必要 (C を る の は 外側 の ルー ブ の 最後 の 
反復 の あと だ け な を ので, ルー プ の 前 (< 移動 する と と も で きる 。 オォ ー 
バー ラ ョ ロー 割込み が 起 っ た と き は , ルー プ の 中 で 使用 され る 変数 の 
値 は 。 割込み が 起 と る 前 (割り 当て られ た 最新 の 値 で ある と は 保証 
する と と は で き ない 。 と れ は , その 時 点 の 値 は レジスター(C は 入っ 
て いる か も し れ を ない が , オン ・ ユ ニッ ト が 参照 し を けれ ば ならない 
記憶 位置 Cx は 入っ て いな いた めで ある 。 


余分 な 式 の 排除 


余分 た 式 と は 。 ブロ グラ ム を 正しく 実行 し て ゆく 上 で 評価 す る 必要 
の な い 式 で ある 。 


と の 最適 化 の 効果 は ,。 ITF ステー トメント の 中 の 論理 式 の 使用 を , 
一 連 の ネス ト され た ステ ー ト メン ト 群 より る も 効率 の よい も の (C す る 
と と で ある 。 た と を えば げ , 

IF (A=D ) | (C=D ) THEN メー テニ Y+ オ の : 


は , 次 の も ゃ の より 効率 が よい 。 


IF A=ーD THEN ※ーY オ + グ の : 
ELSE IF C=D THEN 共 ニ Y+ オ : 


と これ は ,。 A が D と 等 し けれ ば , C と D が 等 し いか どう 2 か を テス ト せ 
ず 【C, 最初 の 例 の TH EN クロ ー ズ が 実行 され る た めで ある 。 


式 の 単純 化 
式 の 単純 化 と は , 意図 され た 効果 を 変え ん る と と な を く , 原始 ステ ー ト 
メン ト 式 の 形式 を 変更 し て , それ ら を より 効率 の よい 目的 コー ド 


コン バイ ル す る と と が で きる よう する 処理 (つい て 述べ る の 用 
いら れる と と ば で ある 。 


と の コン バイ ラー で は , 2 つの 形式 の 式 の 単純 化 が 行なわ れる 。 
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どちら の 場合 も , 演算 式 の 中 で 算術 定数 が 用 いら れる 。 式 の 単純 化 
は 次 の よう iC し て 行なわ れる 。 3* B と いう よう な 式 は 。 B 十 B 十 
B と 変形 され , また , 添字 式 の 場合 は , エ + 2 と いう よう な 式 は , 
I*MULT 二 2*MULT と 変形 され る (MULT に は 定 乗数 ) 。 
と の あと, 2* MULT は , アド レス 計算 の と き オ フ セ ッ ト 因 数 と 
し て 用 い られ る 。 


最適 化 コ ン パ イラ ー の た め の 原 始 プ ログ ラム の コー ディ ング 


と の セク ショ ン で は 。 最適 化 機能 を 利用 する た め C 守 ちな けれ ば な 
ら な いと と また は 避け な けれ ば を ら を いと と 関連 する 実際 の コー 
ディ ング の 詳細 に つい て 述べ る 。 


共通 式 の 排除 
次 の よう な 場合 て は , 共通 式 の 排除 は , 禁止 され る 。 


1. 入出 力 ま た は 計算 の オン ・ ユ ニッ ト の 中 で リセ ッ ト さ れる 可 
能 性 の ある 値 を も つ 変 数 の 式 の 中 で 用 いら れ て いる と き 。 


2. 基底 付 変数 が 。 プロ グラ ム 内 の ど と か で , 共通 式 の 中 で 用 い 
られ て いる 変数 の 先頭 か ら オ ー バ ー レ ー さ れ て いる 場合 は , 
2 つの 共通 式 の 間 で 基底 付 変数 に 新 し い 値 を 割り 当て る と , 
最適 化 は 禁止 され る 。 た と えば , 次 の 例 の 共通 式 メ キ 多 の 場 
合 は 。 プロ グラム の 前 の 方 で 基底 付 変数 A が 変数 双 に オォ ー バ 
ー レ ー さ れ て ち おり, 2 つの X メ 十 必 の 間 で AK 値 が 割り 当て ら 
れ て いる の で , 共通 式 双 十 は 排除 され を い 。 


DCL A BASED(P): 
P = ADDR( 双 )』 


ADDR(Y) : 


P = 

B 王 オグ の: 
P->A テ 2: 
C ー え + ク の: 


3 ORDER が 指定 され て いる と き は , 別名 を も つつ 変数 に つい 
て の 次 の 定義 該当 し て いる 変数 の 場合 。 別 名 を も つ 変 数 と 
は , それ 自身 の 識別 名 以外 の 識別 名 を 参照 する こと (よっ て 
修正 され る 可能 性 の ある 変数 。 た と を ば , DEFINED 属 
性 を も つ 変 数 , 定義 づけ さ れ た 変数 対す る 基底 と し て 用 い 
られ て いる 変数 。 バラ メー ター, ADDR 組 込み 関数 KC 対す 
る 引数 , 基底 付 変数 を ど で あ る 。 


外部 (ある ボイン ター また は 9 と し て 用 い られ て いる ポイ 
ンタ ー (よって, 外部 プロ シー ジャ ー に その アド レス が 知ら 


れ て いる 変数 も , 別名 を も つつ 変数 と み を され る 。 


別名 を も つ 変 数 の 効果 は , 共通 式 の 排除 を 完全 に 阻止 する と 
と で は を く , 一 時 的 禁止 する と と で あぁ る 。 別名 を も る つ 変 数 
の すべ て を 対 し て ,。 コン バイ ラー は , 別名 を も つつ 変数 を 参照 
する 可能 性 の ある すべ て の 変数 の リス ト を 作成 する 。 と の リ 
スト は , リス ト の どの メン バー に つい て る 同じ で あり , ある 
1 つの ブロ グラ ム の 中 CC, と の よう な を リスト が いく つも ある 
場合 も ある 。 


別名 を も つ 変 数 が 含ま れ て いる 式 が , 共通 式 と し て 使用 され 
る か どう か チェ ッ ク さ れる と き は , その 式 の 中 で 参照 され て 
いる 変数 ば か り で な く , その 変数 が 属し て いる 別名 リス ト の 
すべ て の メン バー ついて, 割当 て が 行なわ れる か どら か , 
関連 する 共通 式 が 出 て くる 可能 性 の ある 流れ の 道筋 が 探索 さ 
れる 。 ブ ログ ラム 外部 ポイ ンタ ー 変 数 が 含ま れ て いる 場合 
は , 外部 ブ プロシージャー KK 知 られ て いる アド レス を も つ す べ 
て の 変数 。 すなわち , すべ て の 外部 変数 。 外部 プロ ンー ジャ 
ー《 渡 され る すべ て の 引数 。 お よび 外部 ボイン ター 割り 当 
て る と と の で きる アド レス を も つ す べ て の 変数 , 対し て , 
と この ポイ ンタ ー を セッ ト する と と が で きる と みな され る 。 し 
た が っ て , 外部 ポイ ンタ ー ま た は 外部 ポイ ンタ ー か ら そ れ に 
割り 当て られ る 値 を も つ 他 の ボイン ター は ,。 その 外部 変数 と 
同じ 別名 リス ト KC 属す る る の と み を され る 。 


式 の 形式 。B +C と いう 式 を 共通 式 と し て 取り 扱う 9 こと と が で 
きる 場合 で も ,。 コン バイ ラー は , 次 の よう な 式 の 中 で は そ 
れ を 共通 式 と し て 見 つけ 出す と と は で き ない 。 


A 十 B+C: 


コン バイ ラー は , A+ B+C と いら う 式 を 左 か ら 右 へ 処理 する 。 
し た が っ て , コン バイ ラー は , A+ B と いら 式 と (A+B ) 
+C と いう 式 を 認識 する だ け で あ る 。 し か し , D= テ A+(B 
+ C ) と いう 形 で 式 を コー ディ ング し た 場合 は , 
ー は , 優先 順位 の 最も 高い 式 を 最初 CK 処理 し を な けれ ば な ら な 
い の で , ブロ グラ マー は , それ が 認識 され る と と を 確信 する 
と と が で きる 。 


コン ババ イラ 


共通 式 の 有効 範囲 。 共 通 式 の 存在 を 判定 する た め C, ブロ グ 
ラ ム が 分 析 さ れ , 流れ の 単位 の 存在 が 簡 所 さ れる 。 流れ の 単 
位 と は , 最初 の 命令 の 〇 と と ろ で 入り , 最後 の 命令 の と と ろか 
ら 出 て ゆく と と だ けが 可能 な ブロ ッ ク 和 全体 ほ また は 一 部 分 を 表 
わす , コン バイ ル さ れ を た コー トド の 一 単位 で ある 。 共通 式 は , 

個々 の 六 れ の 単位 を 越え て 認識 され る 。 し か し , いく つか の 
流れ の 単位 の 間 に あ る プ ブログ ラム の 流れ 径 路 が 複雑 を 場合 は , 
流れ の 単位 を 越え て の 共通 式 の 認識 は 禁止 され る 。 


共通 式 の 排除 は , 以下 の 点 に よっ て 助け られ る 。 


1 


2. 


式 の 中 の 変数 は , 外部 の も る の で あっ た り , 外部 ボイン ター と 
結び つけ られ る も の で あっ て は な ら ず , また , ADDR 組 込 
み 関 数 の 引数 で あっ て は な ら な い 。 


原始 プ ゲロ グ ラム は, 外部 プロ シー ジャ ー, 外部 ラベ ル 変 数 , 
ま た は 外部 プロ シー ジャ ーK 知 られ て いる ラ ベル ん 定数 が 含ま 
れ て いて は な を なら な い 。 で きる 限り 。 ラベ ル ・ リ スト は , ラベ 
ル 変 数 の 宣言 の 中 で 与え を を な けれ ば を な ら な い 。 


式 の 中 の 変数 は 。 で きる 限り ,。 オン ・ ユ ニッ ト の 中 で セッ ト 
し た り , アク セス し た り し て は な を ならない 。 


不変 の 式 の 移動 


次 の 場合 に は , ルー プ か ら 不 変 の 式 を 移動 する と と は 禁止 され る 。 


1. 


その ブロ ッ ク に 対し て ORDER が 指定 され て いる と き , し 
か し ORDER オプ ショ ン (C よ っ て 移動 が 完全 (c 禁 止 さ れる 
わけ で は な を く , 計算 割込み が 起こ る 可能 性 の ある 演算 対し 
て 禁止 され る だ け で ある 。 活字 が 2 進 ハ ー フ ッ ー ド 整数 に よ 
っ て 表わさ れる 場合 は ,。 と の よら な 演算 C は 配列 の 添字 の 処 
理 は 含ま れ な を ない 。 こ とこ の よう な 添字 は , 初期 値 化 され を な いと と 
が な を い 限り (その 場合 C は , いずれ (CC し て も ブロ グラ ム は エ 
ラー な る が ), オー バー フロ ー を 起す と と は を い 。 


入力 ま た は 出力 ステ ー ト メン ト CC よって, セッ ト され た り , 
使用 され る 可能 性 の ある 値 を も つ 変 数 を 使用 し て いる と き 。 


入力 , 出力 ま た は 計算 オン ・ テ ユニ ッ ト の 中 で セッ ト さ れる 可 
能 性 の ある 値 を も ゃ つ 変 数 , ま た は 別名 を も つ 変 数 を 式 の 中 で 
使用 し て いる と き 。 


外部 プロ シー ジャ ー。,。 外部 ラベ ル 変 数 む な よ び ラベ ル ん 定 数 を 含 
ん で いて , ブロ グラム の 流れ が 複雑 な と き , お よび ラベ ル 変 
数 の 宣言 の 中 に ラベ ル ・ リ スト が な を いと き 。 


移動 は , 次 の も の に よっ て 助け られ る 。 


1. 


ブロ ッ ク K 対 し て REORDER を 指定 。 
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2. 上 記 の 2 一 4 の 点 が と り 除 か れ て いる 。 


余分 な 式 の 排除 


余分 を 式 の 排除 は , 上 述 の 不変 の 式 の 移動 の 場合 と 同じ 要素 に よっ 
て , 禁止 され た り , 助け られ た りす る 。 


その 他 の 最適 化 機能 


次 の よう な 項目 に つい て , 最適 化 さ れ た コード を 生成 する と と が で 
きる 。 


1 DO グル ー ズ ブ の 制御 変数 に 対し て (DO ルー ズ の 実行 中 と 明 
示 的 , また は オン ・ ユ ニッ ト の どちら か に ょ っ て その 値 が 修 
正 さ れる 可能 性 が ある 場合 を の ぞ く ) 。 


2. 他 の DO ルー プ を 含ま を な い DO グ ルー プ に 対し て (制御 変数 
の 有効 範囲 が 。 その DO ルー プ を 含ん で いる ブロ ッ ク を 越え を 
て いる と き は , DO ルー プ の 後 で ブロ ッ ク の 終り より は 前 の 
と と ろ で , 限定 され た 値 が 与え られ る と と が 条件 ) 。 


3 非 連 続 の 記憶 域 が 使用 され て いな い 限 り , 配列 ま た は 構造 の 
割当 て 対し て 。 


4. 配列 が 非 連 続 の 記憶 域 に 入っ て いる の で な い 限 り , その 各 要 
素 ( 同じ 値 が 割り 当て られ る よら な 配列 の 初期 値 化 に 対し て 


5. 複雑 な ビク チャ ー や , 文字 か ら 算 術 値 へ の 変換 が 含ま れ て い 
な を い 限 り , イン ライ ン の 変換 に 対し て 。 


6 STRINGSI ZE ま # た は STRINGRANGE の ON 条件 が 解 
禁 さ れ て いな い 限 り ,。 スト リン グ 組 込み 関数 SUBSTR ち ゎぉ 
よび INDEX KC 対 する イン ライ ン ・ コ ー ド 対し て 。 


7 。 レジスター の 割 振り お よび アド レス 体系 (対し て (外部 ブロ 
ジー ジャ 一 , 外部 ラベ ル 変 数 , 外部 プロ シー ジャ ーK 知 られ 
て いる ラベ ル メ 定 数 を 使用 し て いる た め (C ブ ログ ラム の 流れ が 
複雑 C て な っ て いる 場合 , また は ラベ ル 変 数 の 宣言 の 中 で ラベ 
ル ・ リ スト が 与え を られ て いな を い 場 合 を の ぞ く ) 。 別名 を も る つ 
変数 や 。 オン ・ ユ ニッ ト の 中 で 参照 され た り , モッ ト さ れ た 
りす る 変数 を 使用 し て いる と きも , レジ ス ター の 用 法 の 最適 
化 は 禁止 され る 。 


プロ グラ ミン グ の 手法 


PL ノエ で は , ある 1 つの 効果 を 得る た め の 方 法 が いく つも あぁ る 場 
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合 が 多く あ る 。 そ れ ら の 方 法 の うち の ある も の は , 特定 の 観点 か ら 
人 みて, 他 の 方 法 に くら べ て 効率 が よい と いう と と に な る が , と れ は , 
関連 する 言語 機能 の 実施 の 仕方 K よっ て 大 きく 左右 され る 。 し か し , 
プロ グラ ム の 効率 の 良否 の 原因 と を な る も の は , 実際 の プロ グラ ミン 
ク グ が 始ま る 前 の , 問題 定義 の 段階 で す で K 発 生 し て いる と と を , 最 
初 C よ く 認 識 し を けれ ば を ら を い 。 PL1 の 機能 を よく 考え て 問 
題 を 定義 し な けれ ば , PL/I を 充分 活用 する と と は で き ない 。 


と の セク ショ ン は , ブロ グラ マー が と の コン パイ ラー を りら まく 活 
用 で きる よら , その 一 助 と し て 書か れ て いる 。 初め の 2 つの 部 分 は , 
次 の よう な 2 つの 異な る 観点 か ら 表 わ さ れ て いる 。 


コン バイ レー ショ ン 速 度 の 向上 


実行 の 速度 の 向上 


と の セクション の 残り の 部 分 は , 共通 の 関心 事 で あり , 記憶 域 の 使 
用 法 。 コン ベイル 時 の 機能 の 用 い 方 , 入出 力 機能 の 用法 や , その 他 
の ヒン ト て つい て 取り 扱 9。 


コン パイ レー ショ ン の 速度 の 向上 


NOOPTI MI ZZE コ ン バ パイ ラー・ オ ォ オプション は , で きる 限り コン 
バイ レー ショ ン を 速く する よう 要求 する る の で ある 。 さら MC, 次 の 
ょ うら な 方 法 ゃ 使用 する と よい 。 


1. で きる だ け 多 く の 記 憶 域 を コン パイ ラー 割り 振る 。 と の 
よう (に する と , コン パイ ラー が 補助 記憶 装置 (と り 出 す を た め 
KC 費やさ れる 時 間 が 少 を なくなる 。 


2. 開始 アブ ロック お よび ブ プロシージャー の 数 を 最小 に 抑え る 。 ス 
テー トメ ント を グル ー プ 化す る だ け の た め (C BEGTIN- 
END を 使用 し な いと と 。DO グル ー プ を 使用 すれ ば , ょ 
り 科 単 《C 同じ 効果 が 得 ら れる 。 


3 リスティング, た と えば 目的 リス ティ ング な ど を 作成 する コ ュ 
ン バ パイ ラー・ オ プシ ョ ン を 用 いる と と は , 極力 避け る と と 。 


4. 再 実行 の 場合 は , 次 の よう に する と , わずか で は ある が 効率 
が 上 が る 。 


a. 参照 され ない ラベ ル と デー タ を すべ て 取り 除く 。 


b. 原始 ブログ ラム の エラ ー を すべ て 町 正 し , さら KK 可能 な 
と と ろ で は , "FILEZSTRING option 
missing in GET プ PUT statement” な どの 
メッ セー ジ $ 含 め て , 診断 メッ セー ジ の 原因 を と り 除 く 。 


5. ブロ グラ ム ・ チ ェ ッ クア ウト の 補助 手段 を 不 必要 KC 使 2 と と 
-- と く (CCHECK ス テー トメ ント - - を 避け る 。 


実行 速度 の 向上 


OPT IMIZEーTIME コン バイ ラー・ オ プシ ョ ン は ,。 ブロ グラ 
ム の 実行 を で きる 限り 速く する と と を 要求 する る の で ある 。 さら 
ま た, 次 の ょ うな 方 法 も 使用 する と よい 。 


1. 不 必要 (CC ブロ グラ ム を セグ メン ト 化 し た り , ブロ ッ ク 構 造 
CC す る の を 避け る 。 プロシージャ ー, オン ・ ユ ニッ ト , お よ 
び 開 始 ブ ロッ ク は すべ て , ブロ ロー グ と エピ ローグ を 必要 と 
する の で , 相当 多く の ォ ー バ ベー ヘッ ド が 含ま れる と と (C な る 。 
プロ グラ ム の 論理 を 制御 する を め CGO TO また は IF 
ステ ー ト メン ト を 使用 する と , 必要 を GO TO また は 
IF ステ ー ト メン ト の 数 が 多 す ぎ な い 限 り , CALL ス テー 
トメ ント を 使用 する より は , 効率 が よい 。 


2. 次 の 方 法 を ラベ ル K 対 し て 使用 する と と が で きる 。 


a.、 GO TO ステ ー ト メン ト は , ブロ ッ ク の 外側 の ラベ ル 
より も る 同じ プ ブロック 内 の ラベ ル を 参照 し た 場合 の 方 が 効 
率 が よい 。 


b. ラベ ル 変 数 を 参照 する GO TO ステ ー ト メン ト は , 
その 変数 が 表わす こと と の で きる ラベ ル ん 定数 の 完全 な リス 
ト が ラベル 変 数 の 宣言 に 含ま れ て いる と , 効率 が よく な 
る 。 


3 調節 可能 な 配列 な よび プ ま を は CONTROLLED 記憶 域 
の 乱用 を 交 け る と と 。 


4. 可能 を な と と ろ で は , 式 の か わり 定数 を 用 いる と と 。 
5. 精度 の 指定 K 注 意 す る と と 。 た と えば , 


DCL A FIXED DEC(8, 4 ) 
B FIXED DEC(10,2), 
C FIXED DEC(10,1): 


CA 十 B 


と の 例 で は , B を (10 , 4 ) と 宣言 し た 場合 C く ら べ て 約 
2 倍 の コー ト が 必要 (CC を な る ( A+ B の 評価 (と C,。 スケ ー ル 因数 
4 が 必要 を た め )。 


6. 必要 な とき だけ PICTURE 属性 を 使用 する と と 。 たとえ 
ば , PIC '999V99' の か わり (CEFIXED DECIMAL 
( 5 ,2 ) を 使用 する 。 2 つ 以 上 の 算術 演算 で 同じ ビク チャ 
ー・ フ ィ ー ル ドド が 用い られ て いる 場合 は 。 それ を 一 旦 変 換 し 
て か ら , 各 演 算 で は 新 し い 形 式 を 使用 する と と 。 と れ は , 2 
回 以上 必要 な 変換 の た め (C と っ て お か れる 。 


算術 式 の 中 で PICTURE 属性 を も つ デ ー タ を 使用 する 必 
要 が ある 場合 は イン ライ ン で 女 理 され る ビ ピクチャー を 使 
用 する と と (と の よう する と , 実行 時 間 が 大 巾 (減る の で ) 。 
全 桁 が 2 と 1 個 の V を も も, 肖 動 符号 を も ゃ た を い ビ ピクチャー 
は , と くく 有効 で も ちる 。 た と えば , 


'999・ 

'$99V929 

1 S99 

「V?99% 
内 部 スイ ッ チ や カウ ンタ ー, ぉ よび 実質 的 を 計算 (C 含 まれ る 
デー タ や 添字 (C 用 いら れる デー タ は , BINARY と 宣言 
る 方 が よい じ 。 出力 必要 を デー タ は , DPC IMAL 形式 で 
保存 する と よい 。 


デー タ 変 換 は , 最少 C と ゞ め る と と 。 そのため の いく つか の 

方 法 を 以下 EK 示 す 。 

a。 変換 を 追加 し て 用 い る 。 た と えば , 文字 変数 を 定期 的 
1 ず つ 増 や し て ゆか なけ れ ば を ら な いと と を 問題 が 指定 
し て いる 場合 (C, 


DCL CTLNO CHAR(8): 


CTLNO = CTLNO+1: 
上 の 例 で は 変換 が 2 回 必要 で ある の KK 対し て , 


DCL CTLNO CHAR(8), 
DCTLNO DEC WIXED : 


DCTLNO= テ DCTLNO+1: 
CTLNO=DCTLNO: 


と の よら に すれ ば , 変換 は 1 度 だ け で よい 。 


b. ぁ る 構造 か ら 別 の 構造 に デー タ を 移動 し た い 場 合 は , 2 
つの 構造 が 一 致す る よら と く 人 注意 し を けれ ば な ら な い 。 


c. 混合 モー ド の 算術 演算 は 避け る と と 。 と く K, 算術 演算 
の 中 で 廊 字 スト リン グ を 使用 する の は 避け る 。 


デー タ の 集合 体 (対し て , 次 の 方 法 を 用 いる 。 
a. 一 般 IC, 配列 式 は 反復 DO グル ー プ に 拡張 し , 構造 式 は 


一 連 の 要素 式 に 拡張 する 。 し か し , 次 の よら な 形式 の 単 
純 な 割当 て の 場合 は , 
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AB : 


A と B が 配列 ま た な は 構造 なら ば , B は A 全 体 に 1 まとまり で 
複写 され る 。 4 と B は , 調節 可能 を 限界 , 長 さ 。 ま た は サイ 
ズ を も つも の で あっ て は な ら ず , その 参照 は , 連結 され た 記 
憶 域 (C 対す る も の で な け れ ば な ら な い 。 


b. 構造 の 中 で , 余分 な レベ ル を 宣言 する と と を 避 ける 。 た 
と えば, 


3 C(10), 
3 D CHAR( 20): 


と の 例 で は , B は 余分 で ある 。 


c. スト リー ム 方 式 入 力 の 中 で , 集合 体 の 引数 を も つ 擬 似 変 
数 を 参照 する と と を 癌 け る 。 


d. 集合 体 の 式 の 中 で , ユー ザー の 関数 や 配列 取扱 い 組込み 
関数 を 参照 する と と を 避け る 。 


e. 関数 , と < く 集 合体 の り 数 を も つ 関 数 (対す る , ネス ト 
され た 参照 を 示 け る 。 


f. 集合 体 の 宣言 は , 引数 と し て それ ら を 渡さ ず に , で きる 
限り め ,。 それ ら が 使用 され て いる ブ プロシージャー の 中 で 行 
を ら て と と 。 1 つの 集合 体 が 2 つ 以 上 の プロ シー ジャ ー の 
中 で 必要 を 場合 は 。 その プロ シー ジャ ー が 外部 の も の で 
あれ ば EXTERNAL と 宣言 し 外部 で な け れ ば それ 
が 使用 され て いる 一 番外 側 の プ ブロック の 中 で 宣言 し な たけ 
れ ば を ら な い 。 


g. 添字 変数 は それ ら が FIXED BINARY (15,0) 
と し て 用 い られ て いる ブロック の 中 で 宣言 する と と 。 


スト リン グ に つい て は ,。 次 の ょ うな 方 朱 を 用 いる と と が で き 
る 。 


4. ビット ・ ス トリ ング は , で きる だ け , 8 ビッ ト の 倍数 と 
し て 指定 すべ き で ある 。 し か し , 論理 スイ ッ チ と し て 用 
いら れる ピッ ト ・ ス トリ ング は , 必要 を スイ ッ チ の 数 
合わ せ て 指定 し を な け れ ば を ら な を い 。 以下 の 例 で は 。 (9 は 
(b) よ り 望 まし く , (D は (c) よ り は 望ま し い 。 

例 1: 


- 単 一 スイ ッ チ 


(9 。 DCL SW BIT⑪ INIT(「1「B) : 
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IF SW THEN DO: 

(b) pcr SW BIT8) INIT('1・B): 
im sw THPEN DO: 

(e) pcr SW BIT@8) INIT (1・B): 


IE SW = 10000000'B THEN 


DO: 
例 2: 
複数 スイ ッ チ 


(g DCr B BIT8: 
5 = '11100000'B: 
im g =ー*11100000'B THEN DO: 
(D pcr B BITG): 
B = 「111!B: 
rp p ーー "111'B THEN DO: 
(@ Dcr (SW1, SW2, SW3) BIT (1): 
SW SW2, SW3, ニ ・1'B: 


IF SW1gSW2gSW3 THEN DO: 


長 さ が 8 の 倍数 で ない ビ ッ ト ・ ス トリ ング ・ デ ー タ が 構 
造 の 中 に ある 場合 は , と の よう な 構造 は ALIGNED 
と 宮 言 し を けれ ば を ら な い 。 


b.。 ピッ ト ・ ス トリ ング KK 対す る 連結 演算 は , 時 間 が か か る 
と と 注意 し て いた だ きた い 。 


c。 長 さ の 変わ る スト リン グ は , 一 般 《C, 固定 長 の スト リン 
グ に くら べ て 効率 が 悪い 。 


d. 固定 長 ス トリ ング は , 次 の 例 C 示 す よ う 《, コン バイ ル 
時 (C そ の 長 さ が 知ら れ て いな い と , 効率 が 悪い 。 


DCL A CHAR(N): 


.。 デ バッ ギン グ 中 以外 は , SIZE,SUBSCRTIPTRANGE, 


STRINGRANGE, ぉ よび CHPECK ON- 条件 を 使用 
する の は 避け る と と 。 デ バッ ギン グ の 補助 手段 は , 生産 的 を 
ジョ ブ と し て ブロ グラ ム を 操作 する 前 に, と り 除 か けれ ば なら な い 。 


.。 1 回 の 操作 で , 2 度 以 上 D A TE 組込み 関数 を 参照 し を いと 


と 。 か わり C, 関数 を 1 回 参照 し て 。 そ の 値 を 後 で 使用 する 
た め K 変 数 の 中 保存 し て な お く 。 た と えば , 次 の よう (て する 
か わり 【C, 


PAGEA=ー TITLEAIIDATE: 
PAGEBー TITLEBIIDATE: 


次 の よう 書く 方 が 効率 が よい 。 
DTE ニーDATEj: 
PAGEA=TITLEAII DTEj: 
PAGPB=TITLEBIIDTEj: 


入出 力 対 し て , 次 の よう な 方 法 を 用 いる と と が で きる 。 


a. ブロ グラ ム が , 入出 力 制 約 さ れる と と が を い ょ よう 。 
緩衝 域 を 充分 に 割り 振る と と 。 


b。 ブロ ッ ク 化 され た 出力 レコ ー ド を 使用 する と と 。 


c.。 1 つの OPEN ステ ー ト メン ト で ,。 いく つか の ファ イル 
を 開く と と 。 


d. STREAM 入 出力 で は , 入出 力 ス テー トメ ント を 分 割 
する か わり KC, 長い デー タ ・ リ スト を 使用 する こと と 。 


e. リス ト 指示 また は デー タ 指 示 よ り は むしろ, 編集 指示 人 
出力 を 使用 する 方 が よい 。 


f. 文字 スト リン グ 構 造 と の 間 で の 転送 を 単純 C する た め 【C, 
ォ オー バー レー 定義 を 使用 する と と を 考え て みる と と 。 た 
と えば げ , 


DCL 1 LIN, 
2 TYPE CHAR2), 
2 REC, 
3 A CHARO5), 
3 B CHARO7), 
3 C CHAR(66) : 
GET EDIT(1IN) 
(A(2)。A(5).A(7) )A(69) )) 


上 の 例 で は , 形式 項目 プ ゾ デ ー タ ・ フ ィ ー ル ド の 名 対 は 別 
々 て 突き 合わ せら れ ,。 突合せ 操作 の 各々 (CK 対 し て コー ド 
が 生成 され る 。 構造 の 上 文字 スト リン グ を 定義 し , そ 
の スト リン グ K 対 し て GEBT ス テー トメ ント を 用 いる と, 
効率 が よく を る 。 


DCL STRNG CHAR(80) DEF IN: 


GET EDIT (STRNG) (A(80)): 


ファ イル が DIRECT INDEXED と 宣言 され て い 


る 場合 は 。 INDEXAREA, NOWR ITE お よび 


ADDBUF な どの ENVIRONMPENT オ プシ ョ ン を , 
で き る だ け 用 いる と よい 。 


。 CONSECUTIVE デ ー タ ・ セ ッ ト の 作成 また は アク 


セス を する と き は , イン ライ ン ・ コ ー ド が 生成 され る 
よら C, で きる 限り ,。 ファ イル お よび レコ ー ド 変数 の 宣 
言 を 使用 する と と 。 宣言 C つ いて の 詳細 は , 第 1 2 章 
「 レコ ー ヤ 方式 の 転送 」 の ととろ で 説明 され て いる 。 


。 REGIONAL デー タ ・ セ ッ ト 人 対す る 原始 キー の 変 


換 は , 次 の ょ うな 特別 の 場合 に は , 排除 する と と が で きる 。 


(1 REGIONAL1) の 場合 : 原始 キー が , 固定 2 進数 
の 要素 変数 , ま は 範囲 が (2 ,0) か ら (23,0) ま で の 精 
度 を も つ 定 数 の と き 。 


(2 REGIONAL( 3 ) の 場合 : 原始 キー が , ( 交 字 
スト リン ク グ 式 1 1 r ) と いう 形式 で .。 し か も “ ェ /" 
が 固定 2 進数 の 要素 変数 , また は 範囲 が ( 1 2 ,0) 
か ら (23,0) ま で の 精度 を も ゃ つ 定 数 の と き 。 


。 同じ キーK 対 する READ と REWRITE の 間 MC, 同じ 


ファ イル 対す る 入出 力 操作 が 介在 し て いる 場合 は , 
INDEXED デー タ ・ セ ッ ト の 直接 的 な 更新 の 速度 が 落 
ちる 。 と の よう な 場合 は 。 REWRITE ス テー トメ ン 
ト が 余分 た RE AD を 出す 結果 (C な る と と も ある 。 


(入出 力 に つい て は , と の 章 の 「 入 出力 機能 の 用 法 」 の 
と と ろ で も 説明 する 。 ) 


第 16 章 : 最適 化 と 実行 効率 213 


. 言語 間 の 連絡 (C, 次 の 方 法 を 用 いる と と が で きる 。 


a. 可能 を 限り 。 PL 1 の 集合 体 引数 が , COBOL また 


は FORTRAN の 集合 体 と 同じ よ 2C に マップ され て い 
る よう (CC す る 。 


。 PL グ 1I と COBOL の 構造 が 同じ よう (C と マッ プ さ れる 


と き を , コン バイ ラー が つね 発見 で き る わけ で は を い 。 
基底 の 構造 の 中 の 各 要 素 は , 境界 合せ の 必要 条件 を も っ 
て いる 。 た と えば , CHAR( 4 ) 項 目 は , 主 記憶 域 の 中 
で どの バイ ト に で も 境界 合せ する と と が で きる が , それ 
MC 対 し て , FIXED BIN(31) 項目 は フル ワー ド 
(て 合わ せ を な け れ ば を ら な い 。 構造 の 最初 の 基底 要素 の 境 
界 合 せ の 条件 が 。 他 の 基底 要素 C《 く ら べ て 厳重 で な い 場 
合 は つね に, コン バイ ラー は 構造 た 対し て 見 か け 引 数 を 
作成 する 。 と の 規則 は , レベ ル 2 の 各 小 構造 に 対し て も ゃ , 
独立 に 適用 され る 。 項目 の 実際 の 長 さ が , 挿入 され る ズ べ 
ディ ング 用 バイ ト を 必要 と し な いと き は , NOMAP ォ 
ブ プション を 指定 し な けれ ば な を ならない 。 た と えば, 


DCL 18, 
2 双 CHAR⑭), 
2 Y FIXED BIN(31): 


Y の 境界 合せ の 条件 が か, 又 よ りゃ 厳密 で ある た め , コン 
バイ ラー は , と の 構造 C 対 し て 見 か け 引 数 を 作成 する 。 
し か し , と の 場合 バディ ング は 不要 を の で , と の 構造 は 
PL プ I と COBOL で は 全く 同じ と マッ プ さ れる 。 


. 引数 の マッ プ が 異 を っ て いる 場合 は , 見 か け 引 数 を 不 必 


要 K 初 期 値 化 す る の を 避け る た め に NOMAPIN オォ オブ 
ショ ン を 使用 し 。 さら KK, 最終 値 が 不要 を ら ば (たとえ 
ば , 値 が 変わ ら な いと き ), 見 か け 引 数 か ら の 不要 た 割 
当て を 避け る た め C, NOMAPOUT オプ ショ ン を 使 
用 する と と 。 


。 次 の よう CC する と と に よっ て , P エ 1 環境 の 初期 設定 


が 何 度 も 行わ れる の を 避け る 。 


(1 主 プ ロン シ ー ジ ャ ー を PL ノ TIC す る , また は 


(2 PL プ 1I プロ シー ジャ ー が 主 ル ー チ ン か ら 呼 び 出 さ 
れる よう する 。 ま た は 


(3) いく つか の P エグ TE モブ プロシージャー を 呼び 出 し て い 
る 間 ( て PL/1 環境 が と こわ され を な いよ うな, ブロ 
グラ ュ 構 造 に する 。 


15. ブロ グラ ム ュ 論 理 の 一 部 分 と し て オン ・ ユ ニッ ト を 使用 する の 
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を 避け る - - オン ・ ユ ニッ ト が 実行 され る と , オー バー ヘッ 
ド が 著しく と られ る 。 た と えば , キー を も つ デ ー タ ・ モ セット 
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(と 対 し て レコ ュー 方 式 の 出力 を 使用 する プロ グラ ム の 中 で, 
ある 特定 の キー は , デー タ ・ セ ッ ト の 稚 囲 収まら な いた め 
排除 し た い 場 合 だ ある 。 と の よ うな を とき K, 不適 当 を キー を 
みつ ける た め (CKTE Y 条 件 を 引き 起す 方 法 を 使 29 こ と と も で き 
る が , 各々 の キー を 明示 的 (た テ スト する 方 が 効率 が よい 。 


イン ライ ン 操 作 


多く の 操作 は , イン ライ ン で 処理 され る 。 し た が っ て , と の 操作 が 
イン ライ ン で 行なわ れる の か , ま た どれ が ライ ブラ リー 呼出 し を 必 
要 と する の か を 認識 し て , で きれ ば 前 者 が 使用 され る よら プロ グラ 
ム を 編成 すれ ば , ユー ザー は ょ ゆい 効果 を 上 げ る こと が で きる 。 

と の よう な イン ライ ン 操 作 の 大 多数 は , デー タ 変 換 と スト リング の 
取扱 い (C 関 する る の で ある 。 


デー タ 変 換 


イン ライ ン で 行なわ れる デー タ 変 換 が , 16.1C 示 し て ある 。 
ある 変換 が イン ライ ン で 行なわ れる か どう 5 か は , 最小 の 実行 時 間 
が 要求 され て いる か どう 5 か C よ っ て 決ま る 。 「 最 適 化 ] の 欄 'C は , 
要求 され て いる 最適 化 の レベ ル が 重要 で を いと き は 「 を し 」 と 記入 
され て お むり , 実行 時 間 の 最適 化 が 必要 を と き は 「 時 間 」 と 記入 され 
て いる 。 与え られ た 範囲 ま た は 条件 の 外 (C あ る 変換 また は 「 行 な 
われ な を ない 」 と 記入 さ れ て いる 変換 は ,。 ライ プラ リー 呼出 し に よっ て 
実行 され る 。 


使用 可能 な ビク チャ ー 文 字 の すべ て が , イン ライ ン の 算術 変換 
KK 関係 する ビ ピクチャー の 中 で 使用 で きる と は 限ら ち を い 。 使用 で き る 
の は , 次 の も の だ け で ある 。 
V と 9 
党 動 , ま た は 非 肖 動 文字 $ S 十 
ゼロ 消去 文字 用 * 


旬 読 点 文字 ,。 . グ B 


イン ライ ン の 変換 の 場合 , と の 廊 字 の サブ プ セ ッ ト か ら な る ビク 
チャ ー は 。 3 つの タイ ブ K 分 け られ る 。 


ビク チャ ー・ タ イプ ブ 1: 1 個 の V (任意 選択 ) と 先頭 まほ た は 末尾 
符号 を も つ , 全 桁 が 9 の ビク チャ ー。 たとえば, 


最 適 化 


' 注 を よび 条件 
原 フ ィ ー ル ド 目標 フラ フィー ルド S1ZE S 1 ZE 
( 禁止 ) ( 解禁 ) 


FIXED BINARY 


ども らち か の スケ ー ル 因数 王 0 で , 他方 の スタ ケー ル 因 数 
0 の と き は , 最適 化 は 「 な た し 」 IC と な る と と が ある 。 


F IXED DPC IMAL 


原 フ ィ ー ル ド の スケ ー ル 因数 三 0 の と き は , 最適 化 は 
[を な し] と な る と と が ある (SI ZP が 解禁 され て いる 
か どう ら か に よっ て ) 


FIXED BINARY 


ビッ ト ・ ス トリ ング 


スト リン グ は 。 固定 長 , ALIGNED で , 長 さ < 2048 
の も の で な けれ ば な ら な い 。 


原 フ ィ ー ル ド の スケ ー ル 因数 は 一 0 で を けれ ば を ら な を い 。 
スト リン グ は 。 長 さ 2 5 6 で ビク チャ ー・ タ イブ 1 2 
また は 3 の 固定 長 の も ゃ の で を けれ ば を なら な い 。 


文字 スト リン グ ま た は 
コン os 


原 お よび 目標 フィ ー ル ド の スケ ー ル が 同じ 符号 で ,。 ゼ 
ロ で な いと き は , 最適 化 ( SIZE 禁止 ) は 「 時 間 ] で 
を けれ ば ならない 。 


FIXED BINARY 


FIXED DEC IMAL 


原 フ ィ ー ル ド の 精度 は ご 10 で な け れ ば な ら な い 。 


FIXED DECIMAL | 『LOAT 


原 フ ィ ー ル ド の スケー ル 因 数 は ゼロ で な け れ ば な ら な 
\。 スト リン グ は , 固定 長 。 ALIGNED で , 長 さ が < 
204 8 で な けれ ば を ら を ない 。 


ビ ピット ・ ス トリ ング 


原 フ ィ ー ル ド の スケール 因数 は 0 で な けれ ば な ら な い o 
スト リン グ は 。 固定 長 で 長 さ が < 256 で な けれ ば な 
ら な を ない 。 


文字 スト リン グ 


ビク チャ ー・ タ イプ 1, 2 , お よび 3。 符号 を し の ビク 
チャ ー・ タ イプ 1 と 2 の 場合 は , 最適 化 は 「 を し 」 K 
な る と と も ある 。 


FIXED BINARY 


FIXED DEC IMAL | 目標 フィ ー ル ド の 精度 は , ご 9 で な けれ ば を ら な い 。 


FLOAT 原 む よび 目標 フィ ー ル ド の 長 さ は , 単 で も 倍 で も よ ゆ 。 


スト リン グ は , 固定 長 , ALIGNED で 長 さ ご 2048 
で を けれ ば な ら な い 。 


ビッ ト ・ ス トリ ング 


原 フ ィ ー ル ド の スト リン グ は , 固定 長 , ALTGNED 
で , 長 さ <20 48 で な けれ ば を ら な を い 。 


F IXED BINARY 


原 フ ィ ー ル ドド は, 固定 長 。, ALIGNED で , 長 さ ご 32 
で な け れ ば を ら を い 。 


FIXED DECIMAL 
お よび FLOAT 


ビッ ト ・ ス トリ ング 


図 1 6 1 ( 2 の 1 ) イン ライ ン で 行なわ れる 暗示 的 を デー タ 変 換 
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文字 スト リン グ 
ば を ら な い 。 
ビク チャ ー 


両方 の ビク チャ ー が 同じ で を けれ ば ならない 。 


FIXED BINARY 


FIXED DEC IMAL 


ビク チャ ー・ タ イプ 


原 フ ィ ー ル ド の 精度 は , ぐ 1 0 で な けれ ば ならない 。 


ビク チャ ー が 符号 を も っ て いる と き は , 最適 化 は 「 時 
間 」 で な けれ ば ならない 。 


注 お よび 条件 


スネ ストリング は , 長 さ < 2 5 6 の 固定 長 の も の で な けれ 


原 フ ィ ー ル ド の 精度 は , 10 で な けれ ば な ら な い 。 


ビ ピクチャー・ タ イプ 1 ぅ 2 , また は 3 


図 1&41 (2 の 2 ) イン ライ ン で 行 を われ る 暗示 的 を デー タ 変換 


199V999!。 9 の 9) 1S99W 99V 填 )。 「$999 
ピクチャー・ タ イブ 2: ぞ ュ 消去 文字 , お よび (任意 選択 で ) 句 
読点 娘 字 ,。 お よび 符号 文字 を も つ ピク チャ ー。 句読点 文字 を も つ タ 
イプ 1 の ビク チャ ー も と れ し K 当 た る 。 た と え げ , 

ルル !* ま ネプ ** ネ の ェ ッ クア ク 92W. 79 。 


の の の 2 の クリ ブシ ンク / 29 ツタ” 7! 


ビ ピクチャー・ タ イプ ブ 3: 浮動 スト リン グ , お よび (任意 選択 の ) 
挿入 文字 , お よび 符号 文字 を も つ ビ クチ ャ ー。 た と えば , 


1$$$$ ! らい ーッ ーー ツイ ュ SSZS タ トッ 
! 十 十 十 9V .9・。 !$$$9-・ 
ビク チャ ー が 上 記 の タイ プ の いずれ か で あっ て も, ビク チャ ー 変 換 
が 行なわ れ を い 場 合 が , と き に は ある 。 と れ は , 次 の よう 理由 の 
た め で ある 。 
1. 最適 化 の レベ ル が 低 す ぎる 。 


2. S 1I ZZE が 解禁 され て いる 。 


3 原 フ ィ ー ル ド と 目標 フラ フィー ルド の 数 字 格 の 間 C オー バー ラッ 
プ が な い 。 た と えば げ 。, 


DECIMAL(6,8 ) ま を た は DECIMAL(5 3 ) か 
ら PIC '999V99・ へ は , 実行 され な い 。 
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4、 ピク チャ ー が , イン ライ ン で 処理 する の を な ず か し くす る あ 
る 種 の 性 質 を も っ て いる 。 たとえば, 


a. 和 動 ク ま た は 肖 動 * と , 最初 の 9 の 間 の 句読点 の 前 CV 
が な を ない 。 た と えば ぴ , 


(の の 2 ゲバ 1 


b. 小数 点 の 右側 , 浮動 文字 ま た は ゼロ 消去 文字 が ある 。 
た と えば , 


「 ZZV. ZZ の"」 ユキ V+ オキ ・ 


スト リン グ の 取扱 い 


イン ライ ン で 行 を われ る スト リン ク グ 関 数 と 演算 が 図 1 。 2 な よび 
図 1 4 3 示さ れ て いる 。 つ ね に イン ライ ン で 行 を われ る と 表示 さ 
れ て いる スト リン グ 関 数 が , ライ ブラ リー・ ル ー チ ン を 呼び 出す と 
と も ある の で 注意 し を けれ ば を ら を い 。 た と えば , B IT また は 
CH AR 関数 の 中 の 式 が ,。 イン ライ ン で 処理 され を い 暗 示 的 変換 
を 必要 と する 場合 は , 該当 する ライ ブラ リー・ ル ー チ ン が 呼び 出さ 
れる 。 


記憶 域 の 用 法 


記憶 域 ス ペー ス を 減 ら す と と の 方 が , 実行 時 間 を 減ら す と と より も 
重要 を 場合 は , 次 の ょ うな 方 法 を 用 いる と と が で きる 。 


注 お ょ び 条 件 


調節 不可 能 。 AL IGNED, 固定 長 の 調節 不可 能 , AL IGNED OPTIMI ZE= ニ TIME が 指定 され 
ビッ ト ・ ス トリ ング の ビッ ト ・ ス トリ ング て いる 場合 は , 長 さ の 制約 は を い 。 
それ 以外 の 場合 は , 最高 8122 ビッ ト o 


ストリ ング 演算 


OPTIMI ZE=TIME が 指定 され 
て いる と き 婦 け 。 


調節 不可 能 , ALIGNED 
で < ご 2048 ビッ ト の ピッ ト ・ 
スト リン グ 。 


調節 不可 能 ま た は VARYING, 
ALIGNED の ビッ ト ・ ス トリ ング 。 


OPTIMIZE= ニ TIME が 指定 され 
て いる と きだ け , 最大 の 長 さ モニ 5 7 ビ ピ 


( 原 フ ィ ー ル ド と 同じ ) 


調節 可能 を 限界 また は 男 囲 を も ゃ た を い 
AUTOMATTIC, BASED , ま た は 
STAT1IC 構造 の 一 要素 で ある , 調 
節 不可 能 。 UNAL 1 GNED, 固定 長 の 


ビッ ト ・ ス トリ ング 。 


調節 不可 能 の 文字 スト リン 
グ 。 


調節 不可 能 , 固定 長 の 文字 スト リン グ 。 


調節 不可 能 で , <2 5 6 の 


調節 可能 また は VARYING の 文字 
か の グ ム 


ビッ ト ・ ス トリ ング 割当 て の 場合, し か し , 調節 可能 また は 長 さ の 変わ る オペ ラン トド は , 処理 され な い 。 


原 フ ィ ー ル ド と 日 標 フィール ド の 役割 を する 2 つの 比較 ォ ベ ラン ド に よる 割当 て の 場合 。 し か し , 調節 可能 また 
は 長 さ の 変わ る オ ペラ ンド は , 処理 され を い 。 


連 絡 スト リン グ 割 当て の 場合 , し か し , 調節 可能 ま た は 長 さ の 変わ る 原 ス トリ ング は 処理 され を い ゆい 。 


STRING 関数 


注 ・ 1 指定 され て いる 最大 の 長 さ は は オペ ラン ド で は なく 演 算 の 長 さ を 指し て いる 。 目標 フィ ー ル ド が 固定 長 の と き は , 洒 算 の 藤 
ょ 人 は 目標 フィー ルド の 長 さ C な る 。 目標 フィ ー ル ド が VARYTNG の とき は 江 算 の 長き さ は, 両 オペ ラン ド の 藤 さ の 2 


も 短い 方 に な る 。 


連続 記憶 域 (C あ る , 要素 変数 , ぉ よび 調節 不可 能 配 列 お よび 構造 変数 。 


の バラ メー ター, 定義 づけ され た 変数 。 ま た は 集合 体 変数 の 一 部 分 で ある UNALIGNED ビッ ト ・ ス トリ ング は , 処理 さ 
れ な い 。 


図 1 62 スト リン ダグ 演 算 が イン ライ ン で 処理 され る 場合 の 条件 


も 計算 IK 用 い られ る 固定 小数 点 デ ー タ は , で きる 限り , 1 0 進 3. 境界 合せ の 属性 : これ ら の 属性 を 用 いる と と (と よって, ユー 
数 で は を く , 2 進数 に すべ き で ある 。 ザー は , 算術 な よび スト リン グ ・ デ ー タ KK 対 し て , 次 の よう 
て 境界 合せ を 行 を りら と と が で きる 。 
2。 INDEXED と し て 宣言 され て いる ファ イル が ,D 1RECT 


UPDATE と し て 用 いら れ て いる が , それ て レ ュー ド が 追 ALIGNED: 
加 され る と と は な を いと いら 場合 は , ENV IRONMENT オブ 
ンション の NOWR TITE を 使用 する と , デー タ 管 理 ブ ログ ラ 算術 : 


ム 関 し て 約 50 00 ベイ ト の 記憶 域 が 節 滅 され る 。 
FIXED DECIMAL: バイ ト 


第 1 6 章 : 最適 化 と 実行 効率 217 


つね 


ネト リン グ 関 数 


3 番目 の 引数 は , 定数 で な けれ ば ならない 。 
最初 の 2 つの 引数 は , 図 1 4 2 に 示さ れる 
'and', or お よび 「not' 演算 IC 対 する 
条件 を 満足 し て いな けれ ば な ら な い 。 


つね に 


つね に 


2 番目 の 引数 は , 長 さ <2 5 6 文字 の , 調節 
不可 能 な 文字 スト リン グ で な けれ ば を ら な い 。 


LENGTH つね (C 


LOW つね 


REPEAT 2 番目 の 引数 は , 定数 で を な け れ ば を ら を い 。 


SUBSTR STRINGRANGE は, 禁止 し た けれ ば な 


ら な い 。 


最初 の 引数 は 固定 長 で を けれ ば な ら ず , 2 舌 
日 と 3 番目 の 引数 は 定数 で を け れ げ ば を ら を い 。 


TRANSLATE 


UNSPEC つね 


VERIFY 最初 の 引数 は 固定 長 で な けれ ば ならない 。 

CHARACTER の と き は ご 2 54 文 字 で 
を け れ ば を ら ず , BIT の とき は ALIGNED 
で , ご 20 4 8 ビット で な けれ ば な ら な い 。 2 


番目 の 引数 は 定数 で な け れ ば を らい 。 


図 1643 スト リン グ 関 数 が イン ライ ン で 処理 され る 場合 の 条件 


FLOAT(DOUBLEB) : ダブ プル ワー ド 
FIXED BINARY 


(pq)・ ハー フワ ー ド 
(た だ し じ PS1 5.) 
その 他 : ワー ド 
スト リン グ : バイ ト 


UNALIGNED: 


算術 スト リン グ : バイ ト 
文字 スト リン グ : バイ ト 
ビッ ト ・ ス トリ ング ・ ビッ ト 


し た が っ て , バディ ング を 最少 に し て , 主 記憶 域内 (C ちあ ける 
デー タ の ズック 化 の 密度 を 濃く する た め (C, UNAL IGNPD 
属性 を 使用 する と と が で きる 。 
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エリ ア お よび 事象 デー タ は , つね IC ワ ー ド また は ダ プ ルッ リー 
ド 境界 (に 合わ せ られ る 。 と これら を UNALIGNEDIC す る と 
と は で き な い 。 


デー タ の 集合 体 の 中 で , 集合 体 に 対 し て 明示 宣言 され た 境界 
合せ は , その 集合 体 の 各 要 素 (C 適 用 され る 。 し か し , 構造 の 
場合 , と の 境界 合せ は , 個々 の 基底 要素 iC 対 し て 指定 され た 
境界 合せ (よっ て 置き 換 を る と と が で きる 。 た と えば げ , 


DCL 1 STR UNALIGNED, 
2 A> 
2 B ALIGNED, 
生れ 


と の 場合 _ A と C は UNALIGNED, B は ALIGNEDC な る 。 


省略 時 解釈 の 属性 は , デー タ 項 目 の 場合 も 。 デー タ 集 合体 の 
場合 も , 関係 する 要素 の デー タ ・ タ イプ よっ て 決ま る 。 と 
れ ら の 省略 時 解釈 は 次 の 通り で ある 。 


UNALIGNED すべ て の スト リン グ ・ デ ー タ と 
PICTURE 項目 


ALIGNED 次 の よう な , すべ て の 算術 デー タ 
BINARY 
DPC IMAL 
FIXED 
FLOAT 
た と えば げ , 


DCL A BITG⑭), 
I 


(B CHAR(10) , 双 ) UNALIGNED, 

(C BIT(12),Y FIXED) ALIGNPD : 
と の 場合 , A は 省略 時 解釈 CK より UNALIGNED, I は 省略 
時 解釈 と よ り AL TGNPD C な る が , B ,C, 双 , お よび Y は , 
明示 宣言 され た 通り C な る 。 


と の 場合 A 1 と A2 は , 明示 宣言 され た 通り に な り , B1 
と C 1 は 省略 時 解 釈 CK よ ょ っ て UNALIGNED , D 1 は 省略 時 
解釈 CK より ALIGNED に な る 。 


DCL 1A 


ト S SO トマ 


と と で , A は 大 構造 , 
B は 省略 時 解 収 に ょ り , FLOAT DECIMAL 
AL TIGNED, 
C は 明示 宣言 に より UNALIGNED, 


D は 小 構造 , (C よ っ て (レコ ー ド 形式 。 長き, ブロ ッ ク 化 因数 。 を ど ) , 時 間 の 


E は BIT ALIGNED(D か ら 受 けつ ぐ ) , オー バー ヘッ ド が 大 巾 (違っ て くる 。 一 般 C, レコ ー ド を ブロ ッ ク 
F は 省略 時 解 釈 CK ょ り FLOAT DECIMAL 化す る と , 時 間 と デー タ ・ セ ッ ト 上 の スペ ー ス の 両方 が 節減 され る 。 
ALIGNED( と の 場合 , ALIGNED は D 
か ら 受 けつ い だ も の で ある が , D が ファ イル を 開く 作業 を 別々 C 行 な うと (明示 的 ま た は 暗示 的 の ど 
ALIGNED と 宣言 され て い を い 場 合 で も , ちら で あっ て も ), 常駐 ライ プラ リー か ら OPEN モジ ュー ル を ロ 
と れ が FC 対 する 省略 時 解 収 で ある ) 。 ー ド し 直す 必要 が ある の で , 1 つの OPEN ステ ー ト メン ト で いく 
G は CHAR UNAL TIGNED で ある 。 つも の ファ イル を 開く 方 が 有利 で ある 。 ファ イル が 開か れる と き 。, 
緩衝 域 ほ た は 作業 え スペース と , デー タ 管 理 プ ログ ラム と の イン ター 
以下 の 点 多 関 し て 変数 の 突合せ を する と き , ユー ザー は , 境 フェ ー ス ・ モ ジュ ー ル が 記憶 域 (C 入 る と いう と と も ゃ 考慮 に 入れ な け 
界 合せ の 属性 が 正しい か どう か 注意 し を けれ ば を ら な い 。 れ ば を た ら を い 。 し た が っ て , 記憶 域 ス ペー ス を 第 一 考え な けれ ば 
な を ならない と き は , OPEN お よび CLOSE ス テー トメ ント を 充分 
a. DEFF I NED 属 性 の 使用 考慮 し て 使用 する と , 使用 可能 を 記憶 域 を りう まく 制 御 す る と と が で 
きる 。 


b. 引数 お よび 関連 する バラ メー ター 
STREAM 転送 CK 関す る 3 つの 手法 の うち , デー タ 指 示 転 送 は 。 


4. 次 の 例 で 示す よう を DO グル ー プ は , 時 間 の 面 か ら け は 効率 が 通常 , 時 間 も ス ペース $ ゃ 最も 多く 必要 で ある (転送 され る デー タ 変 
ょ いら が , 記憶 域 の 面 か ら み る と 無駄 が 多い 。 数 の 各々 (C 対 し て , 記号 テー ブル 記入 項目 が 目的 時 存在 し て いる ) 。 

リス ト 指示 は , フリ ー 形 式 の 入出 力 K 使 用 する と と が で きる が , 編 

DO T 学 1。 26, ダ 5 集 指示 を 使用 する と と (C よ っ て 最も 高度 の 制 爺 を 得る と と が で きる 


( 編集 指示 は , 通常 , 目的 時 (に お ける スペ ー ス と 実行 時 間 の 点 で 最 
も 効率 の よい 手法 で ある ) 。 スト リー ム 入 出力 操作 を 繰 返 し 実行 す 
6 る た め の 最 も より 方 法 は 。 DO ルー プ の 中 に ステ ー ト メン ト を 入れ 
END: る 方 法 で は を く 〈, 入出 力 ス テー トメ ント の 中 繰返し DO 指定 を 入 
れる 方 法 で あ る 。 繰返し 指定 を 用 いる と , 緩衝 域 を 設定 する を どの 
記憶 域 を 節減 する た め の ゃ 2 う 1 つの 方 法 は , 次 の 通り で ある 。 初期 的 を た ハウ ス キー ビン グ 操 作 を 行なう た め の ラ イブ ラリ ー 呼 出し 
を 繰り 返す 必要 が を く を な る 。 
DCL VALUES4) F IXED BIN STATIC 


INIT(1,2.6,9): RECORD 転送 は 。 デー タ の 集合 体 を , 要素 か ら 要 素 へ と いう 

形 で は を なく, デー タ 全 体 を 1 つの ゃ の と し て 取り 扱 9 機 能 を も っ て 
DO J デ 1 TO 4: いる 。 し た が っ て , デー タ の 変換 も 編集 も 行なわ れ を な い の で , デー 
I= ニ VALUESJ): タ ・ セ ッ ト ・ レ コー ド を 効率 よく アク セス する と いう 点 , な よび デ 


ー タ ・ セ ッ ト ・ ス ペー ス を 効率 よく 使 用 する と いう 点 で , 有利 で あ 
る 。 位置 指定 方 式 の 転送 を 用 いれ ば , 緩衝 域 と 変数 の 間 で の デー タ 
の 移動 が 節 減 され る 。 


END: 
INDEXED デー タ ・ セ ッ ト 編 成 を 使用 し て いる と き C。 あふ 


れ 域 の 中 で レ ュ ー ド を アク セス する と , 処理 速度 が 著しく 遅く な る 
可能 性 が ある 。 1 ND EXED デー タ ・ セ ッ ト を 定期 的 に 作り 直し 
て , 論理 的 (< は 削除 され て いる が , 物理 的 (C は 存在 し て いる レ ュ コー 
ド を デー タ ・ セ ッ ト か ら 追 い 出 し ,。 あふ れ 域 (C と ある レコ ー ド を 主要 
デー タ 域 集め る よう (て する と よい 。 


5.。 デバ ベッ ギン グ が 終っ たら,。 デバ ッ ギ ング の 目的 で 解禁 され て 
いた 条件 ( 普通 は 禁止 され る も の ) は , NO - 条件 接頭 語 を 
つけ る の で は な く , 関連 する 接頭 語 を と り 除く と と に よっ て 
禁止 する こと 。 た と えば , S IZE 条 件 の 場合 は ,NOSI ZE 
接頭 語 を つけ る の で は を く , S 1Z 素 接頭 語 を と り 除く と と 


(C よ っ て 禁止 する 。 後者 の 方 法 を 用 いた 場合 は せ は 。 コン パイ ラ 順次 アク セス で 使用 可能 を ,。 BUFF ER PD と UNBUFFERED 
ー は , その 条件 を チェ ッ ク す る コー ド を 除去 する と と が で き ファ テ ァイル 属性 の いずれ を 選択 する か に つい て は , と く < く K よ く 考 慮 す 
る が , 前 者 の 方 法 で は , チェ ッ ク が 行なわ れ な いよ うす る る 必要 が ある 。 BUFFERED ファ イル の 場合 は , 目的 プロ グラム 
た め の 余 分 を な コー ド を 生成 する 必要 が ある 。 は , 「 予 期 的 を 緩衝 法 」, す を わ ち も , 装置 の 転送 と 計算 の 時 間 の ォ 


ー バ ー ラ ッ プ を する と ょ が 可能 CC な る 。 UNBUFEEEREBD フ ァ イ 
ル の 場合 は 。 EVENT オプション が 使用 され て いな い 限 り , と の 


入出 力 機 能 の 用 法 よう な オー バー ラッ プ を する と と は で き な い 。 (UNBUFFERED 
ファ イル は , つね X 了 さ れ た 緩衝 域 を 必要 と する と と 注意 し て い 
大 量 の 入出 力 を 行なう プロ グラ ム で は , デー タ ・ モ セット の 性 質 如 何 た だ きた い 。 ) 


第 1 6 章 : 最適 化 と 実行 効率 219 


入出 力 エ ラー の 回 復 


入出 力 転送 ェ ラ ーK 出 合う と , 自動 的 C デ ー タ 管理 プログ ラム (て よ 
っ て 余す と と ろ な を く 回 復 処 理 手 順 が 行 を な われ る の で , TRANSMTI T 
オン ・ ユ ニッ ト K 入 っ て か ら , それ 以上 ェ エ ラー 訂正 手順 を 実行 する 
必要 は を いし , また 不可 能 で ある 。 転送 ェ ラ ー と 関連 する オン ・ テ 
ニッ ト K 入 る と と と が 確実 に 同期 で き る の は , 入力 エラ ー の 場合 だ け 
で あぁ る 。 出力 操作 の エラ ー の 場合 は , 該当 する エラ ー は , ブロ ッ ク 
化 因 数 や 割 振 られ た 緩衝 域 の 数 (て よっ て 決ま る の で , 後続 の 出力 
操作 の 中 で 発見 され る と と も ある 。 


その 他 の ヒン ト 
オペ レー ティ ング ・ シ ステ ム と ジョ ブ 制 御 


御 セ クシ ョ ン と し て 取り 扱わ れる 。 


男 
由 
【 エ F 
市 
3 


釧 略 時 解 釈 CK あま り 頼 りす ぎ を いと と 。 明示 的 宣言 すれ ば , 
原始 アロ グラ ム の 論理 は 明確 KC なる し 。 ある 場合 に は ( た と 
えば , 精度 ) エラ ー の 可能 性 も 減る 。 


ー よ 


2. FIXED BINARY または FLOAT BINARY と 宮 
言 さ れ た 変数 は , それ ら が 単 一 の も ゃ の で ある か , 集合 体 の 一 
部 で ある か MC は 関係 を く , 自動 的 に 正しい ワー ド 境 界 (C 合 わ 
せら れる (UNALIGNED と 宣言 され て いな を い 限 り ) 。 
FIXED DEC IMAL 変数 は 。 バック 1 0 進数 形式 で 貯 
えら れ , それ ら が 関係 する 演算 で は , シス テム 3 60 の 10 
進数 命令 が 用 いら れる 。FLOAT DEC IMAL 変数 は , 
浮動 小数 点 形式 で 野 え られ る 。 そ れ ら が 関係 する 演算 は , 浮 
動 小数 点 命令 モッ ト を 用 いて 実行 され る 。 


割当 て と 初期 値 化 


1. 算術 変数 の 割当 て また は 初期 値 化 で 必要 を と き は , 高位 に ゼ 
ロ が 押入 され る 。 


DCL A FIXED DEPC IMAL (5,2) INIT (12): 
グ *A HAS VALUE 012.00* ン 

DCL B FiXED BINARY (15,0): 

昌三 123 

*B HAS VALUE 000000000001100B* ブ 
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2. 要素 式 か ら 割り 当て る と と よっ て , 配列 を 初期 値 化す る と 
と が で きる 。 


DCL A(10): 
A=0: 


配列 の 各 要 素 要 素 値 が 割り 当て られ る 。 同様 に , 要素 式 が 
構造 割り 当て られ る と き は , 構造 の 各 要 素 C そ の 値 が 割り 
当て られ る 。 


DCL 1B, 
os 没 征 5 
2 D CHAR(1), 
2 E CHAR (4): 
B ニ 0 


と の 割当 て の 結果 , それ ぞ れ の 要素 の 値 は 次 の よう (C な る 。 


C 0!B 
生 。 の 仮 
E 'bbb0* 


2 種類 ま た は すべ て の 3 種類 の デー タ ・ タ イブ を 含 す 構造 の 
中 で , すべ て の 算術 要素 お よび ビッ ト 要 素 (C( ぞ ロ を 割り 当て , 
すべ て の スト リン グ 要 素 に プラ ンク を 割り 当て る 必要 が ある 
と き は , 構造 (は, 次 の よう を ナル ・ ス トリ ング が 割り 当て 
られ る と と が ある 。 


し た が っ て , 要素 の 値 は 次 の よう KC な る 。 


C 呈 UM1 

D | 

E "bbbb 
DO グル ー プ 


反復 を 後生 き (する と と も で きる の で , WHILE オプ ショ ン の 中 
の 式 で , 制作 変 数 を 参照 する と と が で きる 。 


DO 1=NT+2*L BY -X WHILE (1 テ 0): 
END: 


と の ルー ブ の 中 で , 制御 変数 を 修正 する と と が で きる 。 
DO ルー プ の 中 か ら , その グル ー プ 対す る 選 ND ス テー トメ ン 


ト の ラベ ル K 移 行 す る と と が で きる 。 と の よう ら と する と , 中 間 的 な 
処理 を せ ず 制御 変数 を 増やす 効果 が 得 ら れ , 制御 は 失敗 し を い 。 


に 


また , 制御 変数 の 最終 値 C 達 する 前 C 反 復 DO グ ルー プ ブ の 外 へ 移行 
する と と も で き る 。 


関 数 


関数 参照 の 中 (C ある 引数 を , 関数 に よっ て 修正 す る と と が で きる 。 


オン 条件 と オン ・ ユ ニッ ト 
条件 接頭 語 の 有効 範囲 と 注意 し て いた だ き た い 。 


(SIZE):A: PROC: 


(NOSI ZE): IF M>N THEN DO: 
りー セ +†EF 5 
END: 


END Aj: 
上 の 例 で は , M>N : と いう 式 を 評価 する 間 だ け , SIZE は 禁 


止 さ れる 。 す サーE+F と いう 割当 て の と き は , SI ZE は 解禁 され 
て いる 。 


一 般 的 な エラ ー と 落し 穴 


次 ヒ あ げ る リス ト は , PL/1 の 原始 プロ グラ ム を 書く と き K 陥 り 
や すい ェ エラ ヌー と 落し 穴 を 上 げた も の で ある 。 と れ ら の 項目 の いくつ 
か は , 言語 の 規則 を 誤解 し た り , 見 逃し た り し た た め の も の で ある 
が , それ 以外 の も の は , その シス テ ム で の 約束 事 や 制約 を 守ら な か 
っ た た め (C 起 る も の で ある 。 


オペ レー ティ ング ・ シ ステ ム と ジョ ブ 制 御 

オォ オー バー レー・ セ グ メ ント の 中 て ある STATTIC 変数 は , 根 セ グ 
メン ト の 中 に ある の で な を ない 限り , オー バー レー 操作 中 に 上 書き され 
て も よい 。 

原始 プロ グラ ム と 一 般 的 な 統語 規則 


1. 次 の よう な 文字 を 書く と き は , と く K 注 意 し を いと , 窪 孔 の 


転記 エラ ー が 起 る 可能 性 が ある 。 


1 (数 字 ), 1 ( 甘 字 ),| (また は ) 
グ (斜線 ) , ′ (引用 符 ): 

ーー バ (not ), 7 ( 数 字 ) り 

2 の 大 の 

O ( 甘 字 ), 0 (セロ ): 

S (英字 ), 5 (数 字 ): 

Z (英字 ), 2 (数 字 ): 

0 ( 分 割 文字 ) 》 

- ( 負 符 号 ) : 


2. MARGINS オプション で 指定 され て いる マー ジン の 中 (, 
原始 アロ グラ ム が 完全 (C 収 まっ て いる か 確か め る と と 。 


3. ある 種 の 記号 を 不 注意 で ぬ ね か し て し まう と , 追跡 が 困難 を ェ 
ラー が 起こ と る と と が ある 。 と の よう な 一 般 的 を エラ ーK は , 
相手 の な い 引 用 符 , 相手 の な い 括 弧 , 相手 の ない 注 釈 区 切り 
符号 ( た と えば , 注 釈 の 終り IC* プ の か わり CC* と 容 孔 し 
た 場合 た ど ) , セ ミコ ロン が な い ,。 な どの 場合 が ある 。 


4. 48 文 字 セ モッ ト の 場合 の , 予約 キー ワー ド 演 算 子 ( た と えば , 
GT,CAT な ど ) は , どん な 場合 も , その 前 後 K プ ラン ク 
か 注釈 が な け れ ば な ら な い 。 


5. BND ス テー トメ ント が ,。 該当 する DO , BEGIN, お よ 
び PROCEDURE ス テー トメ ント と 正しく 一 致し て いる か 
どら か , よく 注意 し て 確か め を けれ ば な を な ら な い 。 


6 ある 場合 (と は, その 必要 性 が 直接 的 に 明らか で な いと き で も , 
括弧 が 必要 で ある 。 とく, WHILE お よび RETURN 
の 後 C あ る 式 は , 括弧 で 囲ま を な けれ ば なら な い 。 


プロ グラ ム の 制御 


1. 実行 時 K 最 初 i と 制御 が 渡さ れる プロ シー ジャ ー は ,OPTIONS 
(MAIN) 属性 を も る っ て いな けれ ば な を ならない 。 2 つ 以 上 の 
ブ プロシージャー が MAIN オブ ショ ン を も っ て いる と き は , 
連係 編集 プロ グラ ム が 最初 KC 出 あ っ た 方 が 制御 を 得る 。 


2. プロ グラ ム の プロ シー ジャ ー が , まだ 活用 状態 た ある と き K 
呼び 出さ れ た と き は , 回 帰 的 KC 用 い られ て いる と いう 9。 
RECURS 1 VE 必 性 が 与え られ て い を ない プロ シー ジャ ー を 
回 帰 的 に 使用 し よう と する と , その プロ シー ジャ ー か ら 出 た 
あと で ブロ グラ 割込み が 起 と る 可能 性 が ある 。 と の よう な と 
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と は , その ブロ シー ジャ ー が 前 に 呼び 出さ れ た と き の 自動 デ 
ー タ を 参照 し た と き 起 と る 。 


と 属性 


AUTOMATIC 変数 CK 対す る DECLARE ステ ー ト メ 
ント は , 実際 CC は ブロック MC 入る と き K 実 行 さ れる 。 次 の タ 
イプ の 一 連 の ステ ー ト メン ト は , 使用 し て は な ら な い 。 


A: PROC 
N テ 4 : 
DCL B(N) FIXED: 


END: 


DECLARD ステ ー ト メン ト の 中 で カン マ を ぬか す と いう 
と と は , 原始 プログ ラム KK 共通 の エラー で ある 。 た と えば , 
構造 宣言 の 中 の 各 要 素 (c 対 する 記入 項目 の 後 (は カン マ を つ 
け を けれ ば な を な ら な い 。 


外部 識別 名 は , 7 桁 を 越え を て は を ら を な いし, また 1 BM と い 
5 文字 で 始め て は ならない 。 


PICTURE 宣言 の 中 で , V と いう 文字 は , ス ケー ル 因 数 を 
表 わ し て い る が , それ 自体 出力 の 中 で 小数 点 C は を ら を じい 。 
小数 点 ビク チャ ー 文 字 は , 出力 の 中 で 小数 点 に な る が , と れ 
は 純粋 !C 編 集 文 字 で あっ て, スケ ー ル 因数 を 表わす も の で は 
な い 。 し か し , 1 0 進数 の 定数 で は , 小数 点 は スケ ー ル 因数 
を 表わし て いる 。 た と えば , 


DCL A PIC'?92.2 1 
B、 PTC' タク WV ダ 『! 
C PIC'%2.V2「: 

AB)Cー45.6: 

PUT LIST (A,B,C): 


上 の 例 で は , A , B , CC 対し て そ れ ぞ れ 次 の ょ うな 値 が 印 
避 さ れる 。 


と れ ら の 値 が , 今度 は GET LIST ステ ー ト メン ト よっ 
て 変数 (読み 戻さ れん た と すれ ば , A , B,C は それ ぞ れ 次 の 
よら な 値 《 セ モッ ト さ れる 。 


004 56 .0 45 .6 


次 (C。 PUT ス テー トメ ント を 繰り 返し た と すれ ば , その 結 
果 は 次 の よう CC な る 。 


DOS PL エン 1 最適 化 フ ン バ イ ラー : 言 語 解説 書 第 1 者 


同じ 識別 名 iC 対す る 別 の 外部 宣言 で は , 明示 的 , 省略 時 解釈 
の いずれ に と ょ よっ て も , 志 盾 する 属性 を 指定 し て は を ら を な を い 。 
と の よう な と と が 起 っ て も , コン バイ ラー は その 矛盾 を 発見 
する こと と は で き な い 。 


1 つの 識別 名 を , その 有効 範囲 内 で 2 つ 以 上 の 目的 使用 す 
る と と は で きま ない 。 し た が っ て , 次 の 一 連 の ステ ー ト メン ト 
の 中 で 文 を 使用 する と, エラ ー な る 。 


PUT FILE (X) LIST (A,B,C) : 双 ーWZ: 
文 : M 三 Ni 


1 0 進 整定 数 を 濾 す と き は , その よう な 定数 の 精度 も 考慮 し 
な けれ ば を ら な い 。 た と えば げ , 


CALL ALPHA(6): 


ALPHA: PROCEDURE(XX) : 
DCL 双 FIXED DPC IMAL : 
END : 


ALPHA が 外部 プロ シー ジャ ー の と き は , 双 KC 省 略 時 解釈 
の 精度 が 与え を られ る の で , 上 の 例 は 正しく ない 。 そ れ に 対し 
て , 定数 , 6 は , 精度 ( 1 , 0 ) を つけ て 渡さ れる 。 


ある デー タ 項 目 を 見 か け 引 数 KC 変換 する 必要 が あり , 呼び 出 
され た ブロ シー ジャ ー が パラ メー ター の 値 を 変え る と いう 場 
合 は 。 見 か け 引 数 は 変 を た られ る が 。 も と の 引数 は 変え られ を 
いと と 注意 し て いただき たい 。 た と えば げ , 


DCL A FIXED, 
B FLOAT: 
CALL (AA, B): 
双 : PROC(Y,Z の )』 
DCL (Y, 必 ) FIXED: 
YーZ**100: プ *A IS ALTERED IN 
CALLING PROC* ブ 
グ *B IS UNALTERED IN 
CALLING PROC* ジ 


ZーY** 3: 


END 区 : 


ある 識別 名 KC 対 する 属性 が 全部 宮 言 され て いな を ない とき は , 必 
要 を 残り の 属性 は , 省略 時 解 釈 ヒ C よ っ て 補 を われ る 。 次 の よ 
うな 省略 時 解釈 の 想定 ' て は , 充分 注意 し な け れ ば な ら な い 。 


FLOAT DECIMAL(6 ) REAL は , 暗示 的 (と 宣言 さ 
れ た 算術 変数 と みた され る 。 た だ し , 頭 文字 が 1 か ら N の 範 
囲 に ある も の は 例外 で , こと の 場合 は F IXED BINARY 
(15,0 ) REAL と みな を され る 。 


変数 が 明示 的 官 言 され て お り , し か も る 基 数, スケ ー ル , ま 
た は モー ド の いずれ か が 宣言 され て いる と き は , その 他 の 属 
性 は 。 FLOATDEC IMAL プ REAL の セッ ト か ら 想 
定 さ れる 。 た と えば げ , 


10. 


11. 


14. 


CE 生 : ノ * 1 IS FIXED BINARY 
(15,0) REAL 
AUTOMATIC*/ 


DCL J REAL: ノ *J IS FLOAT DEPCIMAL 
(6 ) REAL 
AUTOMAT1IC* ブ 


DCL K_ STATIC:/*K IS FIXED BINARY 
(15, 0 ) REAL 
STAT1C* ブ 


DCL L FIXED: プ *L IS FIXED DEC IMAL 
(5,0) REAL 
AUTOMATTIC* ブ 


複素 数 式 の 精度 は , 明らか で な い 。 た と えば 。 1 十 1 1 の 精 
度 は ( 2 , 0 ) で ある 。 つま り , と の 精度 は 式 の 評価 の 規則 
し た が の 


1 つの プロ シー ジャ ーK 2 つ 以 上 の 入口 点 が 含ま れ て お り , 
各々 の 入口 ど と C 列 の バラ メー ター・ リ スト が つい て いる と 
き は , その プロ シー ジャ ーK 制 御 が 入 っ た 地点 で 結び つけ ら 
れ た バラ メー ター 以外 の も の は , 参照 し を た いよ ょ うに し な けれ 
ば な を な ら な い 。 た と え げ ば, 


A: PROCEDURE(P,Q): 
P=QT 8j RETURN: 
B: ENTRY(R, S) : 
RーP+S: ノ * THE REFERENCE TO P 
IS AN ERROR* ブ 
END : 


. 基底 付記 憶 域 は 。 ダブ プル ワー ド の 単位 で 割り 振ら れる 。 し レ し 


た が っ て ,。 最小 の 項目 対し て も , 少な を なく と も 8 ベイト か が 必 
要 で ある 。 


。 REFER オプ ショ ン の 中 で 用 いら れ て いる 変数 は , 不明 確 


(て ならない よう KK 参照 し を な けれ ば ならない 。 た と えば げ , 


DCL 1 A, 
2 Y FIXED BIN, 
2 乙 FLOAT, 
1 B, 
2 Y FIXED BIN, 
2 T(1:N REFER(B.Y) ) 


と の 宣言 を 参照 する と き は つね (, 不明 確 に ならない よう KC, 
Y を 完全 (修飾 し な けれ ば を ら な い 。 


矛盾 する 文脈 宣言 は , 避け を な けれ ば を ら を な い 。 P は , ボイン 
ター の 名 前 と し て よく 用 いら れる の で , 省略 時 解 和 収 に よっ て 
別 の デー タ ・ タ イブ の 性 質 が 想定 され を いよ ょ うに し な けれ ば 
な を ならない 。 たとえば, 


DCL B BASED (P), 


P AUTO 


P の 明示 宣言 が 最初 C コ ン パ ペイ ラー よっ て 処理 され 。 省略 
時 解釈 の 属性 。 FLOAT と DEC IMAL が つけ 加え られ る 。 
し た が っ て , P の 文脈 宣言 は 矛盾 し た も の に な る 。 


15. 基底 付 変数 を バラ メー ター と し て 使用 する と と は で き な い 。 


PROCEDURE グ ENTRY ステ ー ト メン ト の オプ ショ ン 


OPTIONS オプ ブ プション の オプ ショ ン と ,。 その 他 の オプ ショ ン 
( RECURSIVE な ど ) と を 区 別 す る よら , 注意 し な けれ ば なら 
な い 。 た と えば 。 次 の ステ ー ト メン トド は 


P: PROC OPTIONS (MAIN, RECURSIVE) : 
正しく を い 。 と れ は 次 の よら (て し を な け れ ば ならない 。 


P: PROC OPTIONS (MAIN) RECURSIVE : 


割当 て と 初期 値 化 


1. 変数 が アク セス され る と き , その 値 は , 以前 (C そ れ K 割 当 
て られ た も ゃ の で , その 変数 の 属性 と 矛盾 し た いも の で ある と 
みな を され る 。 と の 想定 が 正しく ない と き は , ブロ グラ ム は 論 
っ を た デー タ を 用 いて 先進 な みか, ある い は プロ グラ ム 割 込み 
が 起 と る 。 と の よう な と と は , 変数 の 初期 値 化 が 2 まく ゆか 
を か っ た と き や , 次 の いずれ か の や りか た で 変数 が セッ ト さ 
れ た と き K 起 と る 可能 性 が ある 。 


a。 UNSPEC 擬似 変数 を 用 いて 

b. レコ ー ド 方 式 の 入力 を 用 いて 

c。 文字 スト リン グ の 上 に C ビ ピクチャー を 定義 づけ し て か ら そ 
の 文字 スト リン グ 底 割り当て, さら CC その ビク チャ ー を 
アクセス する と と MC よ っ て 

d。 別 の プロシージャー で 割り 当 て られ た 変数 を , バラ メー 
ター の 属性 と 一 致 さ せ ず (Cc。 引 | 数 と し て 湊 す と と (と よ っ 


て .。 


e. 異な る 属性 を る っ て いる が , 同じ 位置 C ある よう ら な 基底 
付 変数 C 割 り め 当 て る と と C よ っ て 。 
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変数 の 初期 値 化 が うま く 行 を われ を いと , 実行 時 (は, 予期 
し を いよ ょ うな 値 を も つつ 変数 が 作ら れる 結果 C な る 。 と の 値 が 
ゼロ で ある と みな し て は な を ならない 。 


添字 の 初期 値 化 が うま く 行 な われ な か っ た と き は , ブロ グラ 
ム を デバッグ する と き (CSUBSCRIPTRANGE を 解禁 
すれ ば げ , 発見 する と と が で きる (初期 値 化 され を な か っ た 値 が 
添字 の 範囲 内 C を な けれ ば ) 。 


初期 値 化 され な を か っ た 変数 ま た は 配列 を 出力 し よう と する と , 
当然 の と と と し て , デー タ 割 込み が 起 と る 。 た と えば , 


DCL A(10) FI1IXED: 
A(1) ニ 10: 
PUT LIST (A):: 


デー タ 割 込み を 避け る と は , 割当 て ステ ー ト メン ト の 前 で 配 
列 を 初期 値 化 し を た な けれ ば を ら を い 。 し た が っ て , 次 の よう 
まる 。 


A デ 0 


と の 問題 は , 初期 値 化 され を か っ た 配列 対す る CHECK シ 
ステ ム 処 置 の 結果 と し て 起 と る 可能 性 も ある 点 注 意 し て い 
た だ きた い 。 上 の 例 の 中 で 。 と の 配列 C 対 し て CHECK 条 
件 が 人 解禁 され て ぉ り , シュ テム 処置 が と られ た と すれ ば , そ 
の 結果 や , ブロ グラ ム の 終了 の 仕方 は , 予測 で き を い 。 PUT 
DA TA が 使用 され て いる と きも , 同じ 問題 が 起 と る 。 


三 (割当 て ) と = (比較 ) の 違い 注意 す る と と 。 次 の ステ 
ーー ドス ペド 枝 


AB デーC: 


「B と C を 比較 し て , その 結果 ( '1'B ま た は ' 0 'B の 
どちら か ) を , 必要 (応じ し て タイ プ 変 換 を し た 上 で AK 割 り 
当て よ 」 と い 9 う 意味 で ある 。 


変換 を 含む 割当 て は , で きる 限り 避け る べき で ある (と の 章 
の 後 の 方 の 「 人 算術 演算 と 論理 演算 」 の 項 の 第 2 セク ショ ン を 
参照 の と と ) 。 


固定 長 ス トリ ング へ の 割当 て また は 初期 値 化 の 場合 : 割り 当 
て られ る 値 が スト リン グ よ り も る 短い と 。 と の 値 の 右側 (た ブラ 
ング (文字 スト リン グ の と き ) ま を は ゼロ (ピッ ト ・ ス トリ 
ング の と き ) が 補 を われ て 拡張 され る 。 た と えば , 


DCL A CHAR(6) , 
B CHAR(3) 
AーB : 


INIT('CR' ) : 


DOS PL ン I 最適 化 コ セン パイ ラー : 言語 解説 書 第 1 部 


上 記 の ステ ー ト メン ト が 実行 され た あと , BC は CRb, 
AIC は CRbbbb が 入っ て いる 。 


割 芝 て ステ ー ト メン ト ま 友 は その 他 の 単 一 ステ ー ト メン ト の 
中 で 。 構造 の 配列 の 断面 を 参照 する と と は で き な い 。 構造 の 
配列 全体 ,。 ま た は 1 つの 要素 は 参照 で きる が , 断面 は 参照 で 
き な い 。 


S 1 ZE が 禁止 され て いる と き は , SI ZE を 引き 起 し た 割 
当て の 結果 は , 予測 で き な い 。 


FIXED BINARY: と と で の 割当 て の 結果 - - た と え ぇ 
ば , 原始 言語 に よる 割当 て や , バラ メー ター の 突合せ に よっ 
て 暗示 され る 変換 な ど を 含む - - は , FIXEDOVERFLOW 
を 起 と す 可 能 性 が ある 。 


FIXED DEC IMAL : 割込み を 起 さ ず KK, 最も 近い バイ ト 
っ へ の 切捨て が 起 と る 可能 性 が ある 。 目標 フィ ー ル ド の 精度 が 
偶数 の と き は 。 最 高位 の バイ ト iMC 余 分 の 数 が 挿入 され る 。 
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式 の 評価 の 規則 , と く K 演 算 の 優先 順位 iC 関し て , 充分 注意 
する 必要 が ある 。 次 CC あげ る 例 は , 起り が ちな 誤 り の 種類 を 
示し た も の で ある 。 

XY1Z は , >Y | メッ グ と 同じ で は を い が , ( メ >Y ) 
| み と は 同じ で ある 。 


メー マー ク は , メーYg YZ と 同じ で は を いら が 。 ( メーY ) テ の 
と は 同じ で ある 。 


同じ 優先 順位 を も ゃ つ 一 連 の 演算 は すべ て , 左 か ら 右 の 順 c 評 
価 さ れる が , * * , 接頭 語 + , 接頭 語 - , な よび つけ は 例外 で , 
と れ ら は 右 か ら 左 の 順 !C 評 価 さ れる 。 し を た が っ て , 次 の ステ 
トド メジ ネト 械 / 


AB* *ーC**D: 
以下 の も の 等 し い 
AB**( 一 (C**D) ) : 
括弧 は 通常 , 優先 順位 の 規則 を 修正 する た め C 用 い られ る 。 


し か し , 安全 手段 と し て , ある いひ は 演算 を 明確 C す る た め 
余分 を 括弧 を 使用 する の ゃ 便利 で ある 。 


変換 は 。 わか りや すい 規則 (C し た が っ て 行なわ れる 。 不要 な 
トラ ブル を 避け た いな ら ば , と の 規則 を よく 理解 し て お く 必 
要 が ある 。 変換 の 影響 CK つい て の いく つか の 例 を 次 に あげ る 。 


ーー 


ペー 


ペペ ーー 


る 。 


C. 


DECIMAL FIXED か ら BINARY FIXED へ の 
変換 Cc, 小数 部 が 含ま れ て い る と , 予期 し た いよ うな を 結 
果 に を る 可能 性 が ある 。 


DCL 1I FIXED BIN(31,5) INIT ⑪: 
E 9 因 65 


と の 場合 。 1 の 値 は 1.0625(C な る が , と れ は , . 1 が 
FIXED BINARY(5, 4 ) KK 変換 され る の で , その 
2 進数 の 近似 値 は 00001B( 4 捨 5 入 な し ) に な る た め 
で ある 。 とれ に 相当 する 1 0 進数 は , .0625B で ある 。 
.-1 の か わり MC .1000 を 指定 すれ ば , も う ヶ 少 し ょ い 
結果 が 得 ら れる 。 


文字 スト リン グ ・ デ ー タ 対し て 算術 演算 が 行なわ れる 
と き は 最高 の 精度 が ( 1 5, 0 ) の 固定 1 0 進数 (中間 
結果 が 貯え られ る 。 


DCL A CHAR(6) INIT('12345 り : 
DCL B FIXPD (5,2): 

BA: ノ *B HAS VALUE 12345* ン 
BA 填 Ai ノ *B HAS VALUE 24600*/ 


1 0 進 定数 か らち ビッ ト ・ ス トリ ング へ の 割当 て は , 算術 
形式 か ら ビ ピット ・ ス トリ ング へ の 変換 の 規則 CC よっ て , 
影響 を 受け る 。 


DCL A BIT(1), 

D BIT(5): 
A デ 1 : プ *A HAS VALUEP '0'B* ブ 
D=1: /*D HAS VALUE '00010'B*/ 
D=・1'B: /*D HAS VALUE 

! 10000 'B*/ 
IF A=1 THEN GO TO Y: 
ELSE GO TO XX: 


A へ の 割当 て が 行なわ れる と, 次 の よう な 一 連 の 処置 が 
と られ る の で , XX に ブランチ す る 。 


(1) 10 進 定数 の 1 は , FIXPED DECI1IMAL( 1, 0 ) と 
みな され , FIXED BINARY (4, 0 ) と いら 属性 
を も つ 一 時 記憶 域 に , 0001B と いう 値 を と っ て 割り 
当て られ る 。 


(2) 次 C, と の 値 は 長 さ (4) の ビッ ト ・ ス トリ ング と し て 
扱わ れる の で , '0001'B(C を る 。 


(3 ぅ ) その 結果 の ビ ピット ・ ス トリ ング が A(C 割 り 当 て られ 
る 。 A は 長 さ 1 と 宣言 され て いる が , 割り 当て られ 
る 値 は 長 さ 4 を も っ て いる の で , 右端 で 切捨て が 行 
な を われ, A の 最終 値 は "0' BC を る 。 


IF ステ ー ト メン ト の 中 で 比較 演算 を する た め C, '0'B 
と 1 が FIXED BINARY 変換 され , 算術 的 に 比較 され 
る 。 と れ ら は 等 し く を い の で , A テ 1 の 関係 は 「 偽 ] と いら 5 
結果 (C を る 。 


DC 最初 割り 当て る と き (C は , ACE つい て の べた も の と 人体 
符 同じ 一 連 の 処置 が と られ る 。 た だ し , DC つい て は , 割り 
当て られ る 値 の 長 さ より も ゃ 1 だ け 多 いひ 長 さ が 宣言 され て いる 
の で , 右側 CEC ゼロ が 補 を われ て 値 が 拡張 され る 。 


。 文字 スト リン グ 算 術 値 を 割り 当て る と き は , F 節 | デー タ 


変換 と 式 の 値 の 計算 」 の と と ろ で 述べ る 規則 iC し た が っ た 変 
換 が 行なわ れる 。 


例 1 


DCL A CHAR(4), 
B CHAR(7 ): 
A= テ "0': ノ *A HAS VALUE Obbb' ぁ / 
A 王 0 : ノ *A HAS VALUE 'bbb0'*/ 
B=1234567: ノ *B HAS VALUE 
'bbb1234'* ブ 


注 : 負 特 号 の 可能 性 。 1 0 進数 ま た は 2 進数 の 小数 点 。 な 


よび 小数 点 の 前 iC 先 行 せ や ロ を 1 桁 置く , を どの 余裕 を 
と る た め C は , 3 桁 の プラ ンク が 必要 で ある 。 


例 2 
DCL CTLNO CHAR(8) INIT('0・): 


DO 1=1 TO 100: 
CTLNO=CTLNO+1 : 


END: 


と の 例 で は , 次 の よう な 一 連 の 和 置 が と られ る た め , 変換 エ 
ラー が 起 と る 。 


(1) CTLNO の 初期 値 , すなわち DObbbbbbb ' が FIXPD 
DECIMAL(15, 0) C 変 換 さ れる 。 


(2) FIXED DECIMAL( 1, 0 ) と み を され る , 10 
進 定数 の 1 が 加え られ る 。 加算 の 規則 に したがって, 結 
果 の 精度 は (16, 0 ) で ある 。 


(3 次 C と の 値 は , CTLNO KC 割り 当て し 直す た め の 准 備 
と し て , 長 さ 1 8 の 文字 スト リン グ K 変 換 さ れる 。 
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(4) CTLNO の 長 さ は 8 を なので, 割当 て の 結果 , 右端 で 
切り 捨て られ る 。 し た が っ て , CTLNO の 最終 値 は , 
全体 が ブ プラ ンク に な る 。 と の 値 は , 2 回 目 の ル シー プ 
の 反復 で は 算術 タイ プ に うまく 変換 する と と が で き 
ない 。 


。 FIXED の 除算 は , 予期 し た を た い ょ ら な を 桁 や あふ れ や 切 搭 


て を 起す と と が ある 。 た と えば , 次 の 式 は , 
25+1 グ 3 


5 、33 . 。.3 と いう 値 人 な る 。 25.33...3 と ゆう 結 
果 を 得る た め C は , 次 の よら 書く 必要 が ある 。 


25 寺 01/3 


と れ は , 書か れ た 通り の 精度 と スケ ー ル 因数 を 定数 が も 
っ て いる の 対し て , FI XED 除算 の 結果 は ,。 その シス 
テム で 決め られ た 最大 の 精度 を も つ 値 CC な る , と いう と 
と で あぁ る 。 2 つの 評価 の 結果 は , 次 の よう に な る 。 


0 . 33333333333333 
25 

5 、33333333333333 

( 左 で 切り 捨て られ る : 禁 


(15,14 ) 


止 さ れ て いな い 限 り 
FIXEDOVERELOW が 
起 と る ) 


01 
3 

00 .3333333333333 
25 

25 . 3333333333333 


か わり , 次 の よう に し て PRECISION 組込み 関数 
を 使用 し て も よい 。 


2 5+PREC( 1 ブ 3, 15, 13) 


ビク チャ ー 変 数 割り 当て られ る と き (C だ け , ビク チャ 
ー の 検査 が 行 な た わ れる 。 


DCL A PIC'292299292 い 5 
B CHAR(6 ) DEF A, 


C CHAR(6): 
B='ABCDEF': 
C= ニ Ai ブ *WILL NOT RAISE CONV 
COND IT ION * ブ 


A=C: ノ *WILL RATSE CONV*/ 
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次 の 例 C つ いて も 注意 し て いた だ き を た い (A,B,C は 
上 記 と 同じ し K 宣 言 さ れ て いる ) 。 
Aー123456: ノ *A HAS VALUE 
123456* ブ 
グ *B HAS VALUE 
* 123456'* グ 
C=123456: プ *C HAS VALUE 
'bbb123・* ブ 
CA: プ *C HAS VALUE '123456'* ブ 


g. 偶数 の 精度 ( P , Q ) が 宣言 され て いる FIXED 
DEC IMAL 要素 は , 最高 位 の バイ ト が ゼロ で な いと と 
も あり 得る の で , 実際 の 精度 が ( P 十 1 , Q ) に な る と 
と が ある 。 と の よら みな 影 を さけ る た め , SIZE 条 
件 を 使用 する と と が で きる 。 


DCL (A,B,C ) FIXED DECIMAL (6,0) : 
ON S1ZE: 


(SIZE) : A テ B+ CC: 


と の ょ うら する と , 割当 て の 後 , A の 最高 位 の バイ ト は , 
確実 CK ゼロ IC な る 。 


DO グル ー プ 


1. DO ステ ー ト メント KK 適用 され る 条件 接頭 語 の 有効 範囲 は , 
その ステ ー ト メン ト 自体 の 実行 K 限 られ て お り , グル ー プ 全 
体 の 実行 (は 適用 され を い 。 


2. 初期 値 化 の とき 最 終 条 件 が 満足 され て し まっ た と き は , 反 
復 DO グ ルー プ は 実行 され ない 。 


ITー6} 

DO 1 TO 4: 
ー メ 十 了 

END: 


と の グル ー プ で は ,。 BY 1 が 暗示 され て いる の で , 又は 変 
えら れ な い 。 逆 方 向 (C 反 復 す る と と も で きる の で BYー1 
が 指定 され て いる と き は , 反復 は 3 回 行なわ れる 。 


3 DO ステ ー ト メン ト の 中 の 式 は , 変数 で は を <, 式 と 同じ 性 
質 を る つ 一 時 域 C 割 り 当 て られ る 。 た と えば , 


DCL A DECIMAL FIXED(5,0): 
A ニ 10: 
DO 1=1 TO 4 グ 2: 


END : 


A グ 2 は , 10 進 数 の 精度 (15,10) を も っ て お り , と れ 
は 2 進数 に 変換 され る と ( 1 と の 比較 の た め (C ), 2 進数 
(31 , 34 ) と を な る の で ,。 と の ルー プ は 実行 され を い 。 


DO ステ ー ト メン ト を 次 の よう 置き 換え る と , 反復 が 5 回 
行 な た われ る 。 


1TEMP ニ =A ン 2: 
DO 1 テモ 1 TO 1TEMP: 
また は 


DO = テ 1 TO PREBC(A グ 2 6,1): 


DO グル ー ブ は , オン ・ ユ ニット と し て 使用 する と と は で き 
友 い 。 ス テー トメ ント の グル ー プ K 対 し て は , 開始 ブロ ッ ク 
を 使用 し を な けれ ば を ら を い 。 


反復 DO グル ー プ の 上限 と 下限 は , 関係 する 変数 が グル ー ブ 
の 中 で 再 割当 て され る と き で も る も, 1 回 だ け 計 算 さ れる 。 と れ 
は , BY 式 C も 適用 され る 。 


関係 する 変数 割り 当て られ る 新 し い 値 は せよ 。 DO グル ー ブ が 
再び 開始 され る と きだ け , 効力 を 発する 。 


制御 変数 と WHILE オプ ショ ン の 両方 を も つ DO グ ルー デブ 
の 中 で は , 反復 を 行なう と と が で きる と 判定 され た (制御 変 
数 の 値 か ら ) あと で だ け , WHILE 式 の 評価 と テス ト が 行 
を われ る 。 た と えば , 次 の グル ー ブ は 。 多く て 1 回 だ け 実 行 
きれ る 。 


DO 1ー1 WHILE (>Y) : 


END : 
1I は , DO グル ー プ ブ の 中 で 制御 変数 と し て よく 用 い られ る 。 
導 : だ み 姓 。 


DO 1 テ 1 TO 10: 


と の 暗示 宣言 の 有効 範囲 内 で IT が ボイン ター と し て 文脈 的 
(と 宣言 され る と と が ある 。 たとえば, 


DCL X BASED(1 ) : 


と の 2 つの ステ ー ト メン ト は 矛盾 し て いる の で , 診断 メッ セ 
ー ジ が 出さ れる 。 


I が ボ ポイン ター 変数 の と き は , 次 の いずれ か の 方 法 を 用 いた 
と きだ け , DO グル ー プ の 中 で 使用 する こと と が で きる 。 


a. DCL (1, 1A, 1IB, 1C) POINTER: 


b. DCL (1, IA) POINTER: 


DO WHILE(1=IA) : 


デー タ 集 合体 


1. 


配列 の 計算 は , 反復 計算 を 指定 する た め の 便 法 を 考え る べき 
で ある 。 を たとえば, 


DCL A(10,20): 


A= テ AA(1,1)}: 


は , 次 の も の と 同じ 効果 を も っ て いる 。 


DCL A(10,20): 


DO 1=1 TO 10: 

DO J=1 TO 20: 
A(T,J)ーA(T)J)/A(1」1): 
END : END: 


と の 場合 , 最初 の 反復 で は A ( 1 , 1 ) 対す る 値 が 1 C な 
る の で , その 効果 は , A ( 1 , 1 ) の 値 が 変わ る だ け で ある 
と と し 注意 し て いた だ き た いひ 。 A ( 1 , 1 ) の も と の 値 に と よ 
っ て A の 各 要 素 を 除算 し た い 場 合 は , 次 の よう MC 書け ば よい 。 


B 三 A (1。1): 
AA ノ B: 


また は , か わり 次 の よら し て も よい 。 


DCL A(10,20): 
B(10,20)j 
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2. 配列 の 乗算 の 効果 IC 注 意 し て いた だ きた い 。 


DCL (A,B,C) (10,10): 


AーB*C: 


と れ は , 行列 式 の 乗算 の 効果 と は 違っ て お むり, 次 の よう KC し 
た の と 同じ で ある 。 


DCL (A,B,C) (10,10): 


DO 1= テ 1 TO 10: 

DO J= テ 1 TO 10: 
A(』J) 王 B(T,J)*C(T) 了 ) | 
END: END: 


スト リン グ 


1. SUBSTR 擬似 変数 を 用 いて , 長 さ の 変わ る スト リン グ K 割 
当て を し て も , スト リン グ の 長 さ は セッ ト され な い 。 長 さ の 
変わ る スト リン グ は , 初め CC 長 さ が 定 義 さ る れ を な い の で , その 
スト リン グ へ の 割当 て が すべ て , SUBSTR 擬似 変数 を 用 
いて 行なわ れ て も , スト リン グ は 依然 と し て 不定 長 で あり , 
他 の 変数 割り 当て た り , 書き 出し た り し て も うま く ゆ か な 
い S 


2. スト リン グ 式 の 中 間 結 果 の 長 さ が ,。 3 27 67 バ イト を 越え 
て い な いか 確認 し を けれ ば を ら を な い 。 長 さ の 変わ る スト リン 
グ の 場合 は , 目的 時 (C 長 さ の チェ ッ ク が 行なわ れ を い の で, 
と くに と の と と が いえ る 。 


関数 と 擬似 変数 


1. 擬似 変数 と し て UNSPEC を 使用 する と き は , 右辺 の 式 は 
ビッ ト ・ ス トリ ング 変換 され る 。 し た が っ て , と の 式 は , 
と の よ うな 変換 関し て 無効 を る の で あっ て は を ら な い 。 た 
と を ば 。 と の 式 が 。 0 また は 1 以外 の 文字 を 含む 文字 スト リ 
ング の と き は , 変換 エラ ー が 起 と る 。 


ON 条件 と オン ・ ユ ニッ ト 


1 ON ステ ー ト メント を 正しい 位置 と 置く よう 注意 し を けれ ば 
を ら を い 。 あ る ステ ー ト メン ト i て よっ て 指名 の 条件 が ひき 起 


228 DOS PL/ ノ 1 最適 化 ラ セン パイ ラー : 言語 解 説 書 第 1 部 


され た と き (C, 指定 の 処置 を 適用 し た いと き は , その ステ ー 
トメ ント が 実行 され る 前 (CON ス テー トメ ント を 実行 し を な け 
れ ば げ ば を ら を ない 。 次 の ステ ー ト メン ト の 場合 , 


GET FILE (ACCTS) LIST (A, B,C): 
ON TRANSMIT (ACCTS) GO TO TRERR: 


最初 の GET 操 作 中 転送 エラ ー が 起 っ た と きけ は , ERROR 
条件 が ひき 起 さ れる が , 所 要 の プラ ンチ は と られ な い ( 前 
ON ステ ー ト メン ト が 適用 され て いな い と すれ ば ) 。 さ ら K 
また , GET ス テー トメ ント が 実行 され る た び (C, その 後 で 
ON ステ ー ト メン ト が 実行 され る 。 


2. GO TO ステ ー ト メン ト を 用 いて , オン ・ ユ ニッ ト K 人 る 
と と は できない 。 故意 (オン ・ ユ ニッ ト を 実行 する た め は , 
SIGNAL ステ ー ト メン ト を 使用 する と と が で きる 。 


3. 変換 が 正しく を な いため と 入 っ た (SIGNAL の 反対 ) 
CONVERSION オン ・ ユ ニッ ト で は , 正しく な ゆい 交 字 を 
変え る か (ONSOURCE ま を は ONCHAR 擬似 変数 よっ 
て ) , ま を た は GO TO ステ ー ト メン ト て よっ て 終了 させ な 
けれ ば を ら を い 。 と の よら とし て いな いと き は , シス テム が 
メッ キー ジ を 印刷 し 。 ERROR 条件 を ひき 起す 。 


4. ARPA オン ・ ュ ユニット から の 正常 な 出口 で は , 像 準 の シス 
テム 処置 と し て , 割 振り が も うら 一 度 試み られ る 。 そ の 結果 
再び オン ・ テ ユニット 入り, 無限 の ルー プ が で きる 。 と れ を 
避け る た め に は , EMPTY 組込み 関数 を 用 いた り , ポイ ン 
ター 変数 を 変え た りす る な どの 方 法 (C よっ て , オン ・ テ ニッ 
ト の 中 で 割り 振ら れる 量 を 修正 し を けれ ば な ら を な い 。 


5. デバ ッ ギ ング の あと は , デバ ベッ ギン グ の 目的 で 解禁 され た 条 
件 ( 普通 は 禁止 され て いる も の ) を , NO - 条件 接頭 語 を 含 
め る 方 法 で は な く , 関連 する 接頭 語 を と り 除 く と いう 方 法 で , 
禁止 する と と 。 たとえ ば, SIZE 条件 の 場合 は , NOS1IZE 
接頭 語 を 追加 する の で は な く , SIZPE 接頭 語 を と り 除 いて 
禁止 する 。 前 者 の 方 法 で は , チェ ッ ク が 行なわ れ を な いよ ょ よう 
する た め K 余 分 の コー ド を 生成 する 必要 が ある の 対し て , 
後者 の 方 法 で は , コン バイ ラー は , その 条件 を チェ ッ ク す る 
た め の コ ー ド を 排除 する と と が で まき る 。 


入力 ノ 出 力 
1. UNDEFINEDEILE 条件 は , 言語 の 属性 が 矛盾 する と き 
(DIRECT と PRINT な を ど ) ば か り で な を く , 次 の よう な 場 
合 に も 起こ と る 。 


a. レコ ー ド ・ サ イズ より も ブロ ッ ク サ イズ が 小さ いと き 。 


b. LINES IZE が , 許さ れる 最大 値 を 越え を て いる と き 。 


c. INDPXED, また は REG TONAL (3③) デ ー タ ・ セ ッ ト 
の 作成 の と き iC, KEYLENGTH が ゼロ か また は 指定 
され て いない と き 。 


d.。 INDEXED デー タ ・ セ ッ ト の 場合 iC, KEYLENG THT+ 
KEYLOC の 結果 の 値 か レコー ド の 長 さ を 越え を る よう な 
値 を も つ , KEYLOC オプ ショ ン を 指定 し て いる と き 。 


e. STREPAM デー タ ・ セ ッ ト K 対 し て , 1 8 ベイト より 
短 か い V 形 式 論 理 レロ ュー ド が 指定 され て いる と き 。 


f.FB- 形式 の ブロ ッ ク 化 レコ ー ド K 対 し て , レコ ー ド ・ サ 
イズ の 整数 何で を ない ブロ ッ ク ・ サ イズ が 指定 され て いる 
と き 。 


g. VB - 形式 レコ ュー ド K 対 し て , 指定 の ブロ ッ ク ・ サ イズ 
より 少く と も る 4 バイト 少 た いも の で な い 長 さ の 論理 レコ 
ー ド が 指定 され て いる と き 。 


h. VSAM ファ イル を 開く とき, 正しく を い バ パスワード 
が 指定 され た と き 。 


i. VSAM デー タ ・ セ ッ ト が 開か れ て いる 間 KC VSAM 
(C よ っ て エラー が 発見 され た と き 。 


ファ イル が , 入力 と 出力 の 両方 と 使用 3 れる と き は , 1NPUT 
また は OUTPUT 属性 の どちら か を つけ て 宣言 し を た けれ ば 
な ら な い 。 OPEN ステ ー ト メン ト で , 必要 を オプ ショ ン を 
指定 する と と が で きる 。 


入力 ノ 出力 の リス ト は , 1 対 の 括弧 で 囲ま な けれ ば を な ら な い 。 
反復 リス ト $ 同 様 で ある 。 し た が っ て , 次 の ステ ー ト メン ト 
の 中 で は , 外側 の 括 了 源 は 2 対 必 要 で ある 。 


GEPT LIST ((AG) DO 1=1 TO N)): 


REG I ONAL デー タ ・ モ セッ ト を アク セス する た め の 原 始 キ 
ー の 最後 の 8 バイ ト は , 固定 1 0 進 整 数 を 表わす 文字 スト リ 
ング で を けれ ば を ら な い 。 キー を 作成 する と き は , 算術 形式 
か ら 文 字 ス トリ ング へ の 変換 の 規則 に つい て 考慮 し を けれ ば 
な ら な い 。 た と えば , 次 の グル ー プ は エラ ーK を る 。 


DCL KEYS CHARK(8): 
DO 1=1 TO 10: 
KEYS ニ 1: 
WRITE FIILE0⑪0 FROM QR 
KEYFROM (KEYS): 
END : 


10. 


11. 


1 の 省略 時 解釈 は 。 FIXED BINARY(15,0) で あ 
る が , と れ は , と の 算術 値 の 文字 スト リン グ 表 現 を 収容 する 
た め K, 8 桁 で は を く . 9? 桁 を 必要 と する 。 


ファ イル を 参照 する 入出 力 ス テー トメ ント の 中 で KEY , 
KEYFROM , ま た は KEYTO オブ ショ ン が 用 いら れる 
と き は , その ファ イル は KEYED 属性 を も っ て いな けれ ば 
な ら を いと と 注意 し て いた だ きた い 。 


標準 ラフ ァイル 名 SYSIN お ょ び SYSPRI NT は , GET 
お よび PUT ステ ー ト メン ト の 中 で だ け 暗 示さ れる 。 そ の 体 
か (CC, ON ステ ー ト メン ト ま た は レ ュ コー ド 方 式 の 入出 力 ス テ 
ー ト メン ト を ど で 行 を われ る 参照 は , 明示 的 で を けれ ば な ら 
な い 。 


PAGESTIZP お よび LINESIZE は , ファ イル 属性 で は 
を い 。 つ まり , と れ ら は , ファ イル の 宣言 含め る と と は で 
き を な い 。 と れ ら は 。 O PEN ス テー トメ ント の オプ ション で 
ある 。 


編集 指示 の デー タ ・ リ スト が な く を なると, 次 の 形式 項目 が , 
それ KK 対応 する デー タ 項 目 を 必要 と し て いな を く て も , それ 以 
上 形式 項 日 は 処理 され な い 。 た と えば , 


DCL A FIXED(5), 
B FIXED (5,2): 
GET EDIT (A,B) (F(5),F(5,2),XX(70)) : 


双 (70 ) 形式 項目 は 。 処理 され を い 。 次 の カー ド の 最初 の 
1 0 桁 の デー タ だ け を 読む た め C, SKIP ォ プシ ョ ン を 使 
用 する と と が で きる 。 


GET SKIP EDIT (A,B) (F(5),F(5, 2)): 


デー タ ・ リ スト の 中 ある 配列 名 ま た は 構造 名 に よっ て 表 わ 
され る デー タ ・ リ スト の 数 は , 配列 ま た は 構造 の 要素 の 数 と 
同じ で ある 。 し た が っ て , 2 つ 以 上 の 形式 項目 が 形式 リス ト 
の 中 に ある と き は , 連続 する 要素 は , 連続 する 形式 項目 と 突 
き 合わ せら れる 。 た と えば , 

DCL 1A, 

2 B CHAR(5), 
2 C FIXED(5.2): 
PUT EDIT ⑳) (A(⑤,F(5,2)): 


B は , A(⑤5) 項 目 と 突き 合わ せ られ , C は , F(5 ,2 ) 項 目 
と 突き 合わ せら れる 。 


配列 は , 行 を 主 と し た 順序 で 転送 され る (た と えば , A 
(1.1),。 A(1.2),。 A(1,3) 」…A(2,1),… な ど ) 


GET DATA お よび GET LIST 対す る 入力 デー タ と し 
て 用 い られ る スト リン グ は , 引用 符 で 囲ま な けれ ば な ら な い 。 
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12. 


13. 


14. 
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4 8 文字 セッ ト で の セミ コロ ン の 表現 ( ,. ) は , デー タ 指 
示 入 力 ス トリ ー ム の 中 で は , セミ コロ ン と し て 認め られ を な い 。 
1 1 8 -6 府 乾 を 使用 し を けれ ば を ら を な い 。 

ュー ザー は , PUT DATA: の 制約 (つまり , デー タ ・ リ ス 
ト を も た な い )K 注 意 し な けれ ば を ら を な い 。 ON ステ ー ト メ 
ント と いっ し ょ 使用 され た と き の 効 果 は , PUT DATAK 
知ら れ て いる デー タ は オン ・ ユ ニッ ト の 地点 で 知ら れ て いる 
デー タ で ある た め , 制約 を 受け る 。 


次 の ON ステ ー ト メン ト が , 


ON ERROR PUT DATA: 


外側 の ブロ ッ ク で 使用 され て いる 場合 は 。 内 側 の プロ ッ ク の 
変数 は 知ら れ て い を ない ため, それ ら は ダン プ さ れ な いと と 
注意 し を な けれ ば な ら な い 。 し た が っ て ,。 デベ バッ ギン グ 中 M, 
内 側 の すべ て の ブロ ッ ク の 中 で オン ・ ユ ニッ ト を 繰り 返す と 
と は ょ い 方 法 で ある 。 


PUT DATA ステ ー ト メン ト の 実行 中 に ェ ラ ー が 起り , し 
か も と の ステ ー ト メン ト が ERROR オン ・ ュ ユニ ッ ト の 中 
ある 場合 は , 記憶 域 が か な く を な る まで ダン プ を 行なう 5。 と れ は , 
機械 時 間 と 印刷 を 無駄 に する と と IC を る の で , 活用 化 さ れ た 
あと は , ERROR オン ・ ユ ニッ ト を ォ フ (て す べ き で ある 。 


ON ERROR PUT DATA: 


上 の ステ ー ト メン ト の か わり た, 次 の コー ド を 使っ た 方 が よ 
い 。 


ON ERROR BEGIN: 
ON ERROR SYSTEM: 
PUT DATAg 
END: 


デー タ ・ リ スト の な い PUT DATA を 使用 し た と き は , ブ 
ログ ラム 内 の その 地点 で 知ら し て て いる すべ て の 変数 が , 指定 
の ファ イル に デー タ 指 示 出 力 形 式 で 転送 され る 。 し か し , と 
の 機能 を 使用 する と き , ユー ザー は , 次 の 点 K 注 意 し を けれ 
ば な ら な い 。 


a) 初期 値 化 され を な い FIXED DECIMAL デー タ は , 
CONVERS ION 条 件 ま た は データ 割込み を 起 と す 可 
能 性 が ある 。 


b ) 割り 当て られ て い を い CONTROLLPBD デー タ は , 
任意 の 値 を 印刷 する の で , FIXED DECIMAL の 
場合 は 。 CONVERS ION 条 件 ま た は デー タ 割 込み を 
起 と す 可 能 性 が ある 。 


READ SET また は LOCATE SEET の 中 で セッ ト され 
た ボイン ター は , その ファ イル K 対 し て 次 の 操作 が 行 を われ 
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た あと ,。 また は CLOSE ステ ー ト メン ト の 後 で は 。 無効 で 
ある 。OUTPUT ファ イル の 場合 は , WRITE と 
LOCATE ス テー トメ ント 人 は, 自由 KC 混ぜ る と と が で きる 。 


緩衝 域 に 読み 込ま れ た レコ ー ド を 書き 直し て (SRPQUENTIAL 
UPDATE ファ イル を 指定 する READ SET ステ ー ト メ 
ント を 用 いて ), 更新 する 必要 が ある 場合 は 。 FROM オプ 
ショ ン を も た を い REWRITE ステ ー ト メン ト を 使用 する 
と と が で きる 。 READ SET の あぁ あと で REWRITE を 与 
える と,。 その 結果 つね MC, 最後 の 緩衝 域 の 内 容 が デー タ ・ セ 
ッ ト KK 書き 直さ れる こと (C な る 。 た と えば げ , 

3 READ FILE (F) SET (P): 

5  P->R = S: 

7 REWRITE FILE (F): 

11 READ FILE (F) INTO ( 駐 ): 


15 RBWRITE FILE (F): 


19 REWRITE FILE (F) FROM (X): 


| 記 
CE 


ステ ー ト メン ト 7 は , 緩衝 域 の 中 で 更新 され を た レ ュー ド 
を 書き 直す 。 


ステ ー ト メン ト 1 5 は,。 デー タ ・ セ ッ ト 上 の レコ ー ド を 
全く 変え を いじ 。 


ステ ー ト メン ト 1 9 は , 前 (CRE AD ステ ー ト メン ト が 
ない の で , ERROR (CC な る 。 


レコ ロード の 転送 が 試み られ る まで , LOCATE ステ ー ト メ 
ント の KEY 条件 を チェ ッ ク す る と と が 不可 能 を 場合 が ある 。 


これ は , 


REGIONAL (3) ファ イル EIC レコ ュー ド を 出力 する 
た め の 余 地 が , 指定 の 区 域内 C な いと き で ある 。 と の 条 
件 を 起 し た レコ ー ド も 。 現地 の レコ ュー ド も 転送 され ない 。 


ファ イル が 閉じ られ る 前 実行 され た 最後 の 入出 力 ス テー ト 
メン ト が LOCATE の 場合 は 。 ファ イル が 閉じ られ る まで 
レコ ー ド は 転送 され な い 。 


し た が っ て ,。 CLOSE ステ ー ト メン ト MC て よって, 条件 が ひ 
き 起 され る と と が ある 。 


15. 


。 エリア,。 ポイ ンタ ー 


記憶 域 が 割り 振ら れ て いな いら 基底 付記 憶 域 C 対 し て , 日 的 
時 iC 参照 が 行 を た われ る と , 予測 で き な い 割込み ( 記憶 保護 , 
ア ドレ ラス 指定 , また は 指定 ) が 起こ る 可能 性 が ある 。 


, オフ モ キット お よび 構造 で それら の い 
ずれ か を 含む な も の は , STREAM 入出 力 で 使用 する と と は 
で き な い 。 


, 基底 付記 憶 域 が 解放 され を た とき, 関連 する ポイ ンタ ーM は , 


後に 立つ 情報 は も 入っ て いな い 。 


. エリ ア の 中 で 割り 振ら れ た 基底 付 変数 は , その ェ エリ ア の 中 


で 解放 し を けれ ば げ ば な ら を な い 。 た と えば げ , 


DCL A AREA, B BASED (XX): 
ALLOCATE B IN (A): 


FREE B: ノ * 。 INVALID * ブ 
FREE B IN (A): プ * VALID * 


ASC I 1I デー タ ・ モット か ら 読 み 込 まれ た ブロ ッ ク の 中 
ある レ ュ ー ド の 最初 の バイ ト は , 必ず し も ゃ 緩衝 域 の 中 で ダブ 
ルゥ ワー ド 境 界 c 位 置 合 せ さ れ を な い 。 ブロ ッ ク 接 頭 語 は , ダブ 
ル ワ ー ド 境界 に 合わ せら れる が , レコ ー ド の 境界 合せ は , ブ 
ロッ ク 接 頭 語 の 長 さ に よっ て 異 を る 。 
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第 17 章 : 言語 間 の 連絡 機能 


PL/1 最 適 化 コン バイ ラー に よっ て コン バイ ル さ れ を た ブロ グラ ム 
と , 次 に あげ る コン バイ ラー また は プロ グラ ム ・ ブ ロダ クト の い ず 
れ か よっ て コン バイ ル さ れ , 対応 する ライ プラ リー を 用 いて 実行 
され る プロ グラ ム と の 間 の , 実行 時 に ぉ ける 連絡 は , PL 1 言語 
間 機能 を 用 いて 行 を うら と と が で きる 。 コン バイ ラー, ブロ グラ ム ・ 
プロ ダク ト ,。 お よび ライ プラ リー は すべ て , DOS 用 WC 1 BM で 開 
発 さ れ を た も の で ある 。 


360N-CB-452 
360B-CB-482 
5736-PBB2,5736-LM2 
5 る る 6"CB 1 
360N-FO-472 


COBOL(D) レベ ル D 
COBOL ANS レベ ル F 


COBOL ANS SUBSET 
FORTRAN IV レベ ル F 
FORTRAN LIV ライ ブラ リー・ 
サブ ブロ グラ ム 360N-LM-480 
DOS ライ プラ リー・ オ プシ ョ ン 5746-LM3 


PL/』I の プロ グラ ム と , FORTRAN ま を た は COBOL コン 
バイ ラー の いずれ か に よっ て コン パイル され た プログ ラム と の 間 の 
連絡 は , 次 の 2 つの 方 法 の いずれ か に よっ て 行なう と と が で きる 。 


1 PL/』 お よび COBOL プ FORTRAN ルー チン 作 対 し て 
共通 の デー タ ・ セ ッ ト を 用 いる と と よっ て 。 


2. PL/I ルー チン か ら CO BOL プ FORTRAN ルー チン を 
呼び 出し ( また を は その 逆 ) 引数 ,。 また は 静 的 記憶 域 の 形式 で 
デー タ を 渡す と と に よっ て 。 


PL/』 と COBOL ルー チン の 間 の 連絡 に 共通 の デー タ ・ セ ッ 
ト を 使用 す る 場合 は , ENVI RONMENT 属性 の COBOL オブ 
ショ ン が 必要 に たる と と が ある 。 さ らし 詳 し い 点 に つい て は , 第 12 
章 の 「 デ ー タ 交換 | の 項 を みて いた だ きた い 。 


PL/I プロ シー ジャ ー で は , CALL ステ ー ト メン ト を 用 いる 
と と に て よっ て COBOL ルー チン を 呼び 出し た り , CALL ステ ー 
トメ ント また は 関数 参照 を 用 いる と と (て よっ て FORTRAN ルー 
チン を 呼び 出し た りす る と と が で きる 。 か わり (と, COBOL また 
は FORTRAN の 主 プ ログ ラム また は 主 ル ー チ ン の 中 で 対応 する 
言語 機能 を 用 いる と と に よっ て PL プ 1 プロ シー ジャ ー を 呼び 出す 
と と が で きる 。 呼出 し の と き (C 引 数 を 流す こと と が で きる し , また , 
関数 参照 に 対し て 値 を 返す と と が で きる 。 


FORTRAN CC おぉ お ける COMMON ブロッ ク の 記憶 域 は ,PL 
ン 1I C な ける STATIC EXTERNAL 変数 の 場合 の 記憶 域 
と 同じ で ある 。 COMMON ブ ロッ ク と STATIC EXTERNAL 
変数 に 同じ 名 前 が 与 あ られ て いる 場合 は , PL/T で 2 つの 
同一 の STATIC EXTERNAL 変数 に 対す る の と 同じ ょ うに 


し て , 同じ ブロ ッ ク の 記憶 域 が と これら に 割り 振ら れる 。 一 方 の 変 
数 に 値 が 割り 当て られ る と , 他方 に $ 同 じ 値 が 割り 当て られ る 。 
COBOL で は , と の よう を な 同一 扱い は 行なわ れ な い ーーCOBOL 
の 変数 は , 引数 ま を た は バラ メー ター 以外 に , PL バ 1 変数 と の 問 に 
共通 の 記憶 域 を 共有 する と と は で きた な い 。 


言語 間 の 連絡 機能 は ,。 PL プ I の コン パイ ラー に よっ て 全面 的 
準備 され る 。 これ ら の 機能 は , 呼出 し 側 ま を た は 呼び 出さ れる 側 の 
PL/I プロ シー ジャ ー の 中 で 適当 を 言語 項目 を 指定 する と と に よ ょ 
っ て , 利用 する と と が で きる 。 一 般 に , 既存 の COBOL また は 
FORTRAN プロ グラ ム ま た は ルー チン は , 言語 間 で 使用 する た 

。 修正 し た り , コン バイ ル し 直し た りす る 必要 は を い 。 ま た, 
SC それ ら の 言語 で 書 
いて , 前 の 通り (コン パイ ル す れ ば よく , 言語 間 の 連絡 を 予想 し て 
書く 必要 は を た い 。 し た が っ て 既存 の COBO し また は FORTRAN 
の 適用 業務 プロ グラ ム は , PL プ 1 プロ シー ジャ ー を 用 いる と と 人 
ェ っ て 拡張 する と と が で きる が , 一 方 , COBOL また は 
FORTRAN ライ プラ リー は , 新しい らい PL] ブロ シー ジャ ー ま 
た は 既存 の PL ノ I ブ プロ シー ジャ ー で 使用 する と と が で きる 。 


注 : 本 章 の 説明 の 中 で 「 ル ー テ ン 」 と いう と き は , COBOL サ 
プ ブ プログラム, ま を は FORTRAN サブルーチン また は 関数 

(FORTRAN ライ ブラ リー 関数 も 含め て ) も ゃ その 中 MK 含ま れる 。 
と れ ら の 言語 の 中 で サ プ ル ー チ ン や 関数 を 取扱 ら 際 C 存在 する 規則 
は , 通常 その まま 適用 され , 言語 間 で 使用 する た め 修 正 さ れる と 
と は を な い 。 とく, FORTRAN の 関数 の 場合 に , 1 個 以 上 の 引 
数 を 渡さ ず と 呼出 し を する と と は で き な い と いら 制約 は , 呼出 し が 
PL/I ルー チン か ら 行 を われ る と き に も や は り 適 用 され る 。 


言 語 間 の 機能 


言語 間 の 機能 を 使用 す る 際 C, COBO し や FORTRAN KC つ 
いて の 詳し い 知識 を も っ て いる 必要 は を い が , PL と 他 の 2 つ 
の 言語 に な ける デー タ の 構成 の 等 し さ に つい て 注意 する 必要 は ある 。 
引数 プペ ラメ ー タ ー の 突合せ を する た め , と れ ら の 等 し さき に つい 
て 理解 し を な けれ ば を ら な い 。 


引数 と バラ メー ター の 突合せ を する と き , 言語 間 の 機能 は , 等 価 
2 
ログ ラマ ー は , 必要 に 応じ し て と の 処置 を 打ち 消す と と も で きる 。 


呼び 出さ れ た COBOL また は FORTRAN ルー チン を カペー 


する た め C, PL ン I の 制 込み 処理 を 拡張 する た め の 機 能 も 用 意 さ 
れ て いる 。 
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COBOL また は FORTRAN ルー チン へ の 引数 
受渡 し 


引数 が COBOL また は FORTRAN の ルー チン 渡さ れる と き 
は , PL1 の 普通 の や り 方 で , つま り , 関連 する 入口 宣言 の パラ 
メー ター 記述 子 リ スト また は 引数 その も の か ら , デー タ ・ タ イプ が 
決定 され る 。 し か し , 言語 間 機 能 は , その 引数 (C 対 する アド レス 体 
失 が , 呼び 出さ れ た 言語 で 使用 され る も の で ある か , また , 他 の 点 
で 必要 が を けれ ば , 渡さ れる 集合 体 の マッ プ が , 呼び 出さ れ た 言語 
で 使用 3 され て いる も の で ある か を 確 め る 。 PL ン 1 に 備わっ て いる 
言語 間 機能 は , 呼び 出さ れん た ルー チン の 中 の バラ メー ター を みる と 
と は で き な を ない の で , プロ グラ マー は 自己 の 責任 に な いて , 呼び 出さ 
れ た ルー チン の 中 に ある ペラ メー ター が , デー タ ・ タ イプ と 構成 の 
面 で , PL T で の 引数 の 記述 に 対応 する よう (C し な けれ ば な ら な た 
いと と 注意 し て いた だ きた い 。 


構造 または 配列 引数 の マッ プ が , PL ン I と , 呼び 出さ れ た 言語 
の 両方 で 同じ で ある と と を , コン バイル 時 MC PL プ I コン バイ ラー 
が 判断 で き る 場合 は , 引数 は , 呼び 出さ れ た ルー チン 直接 渡さ れ 
る 。 し か し , この よう を マッ プ の 形 が 同じ で を じい 場合 は , 言語 間 機 
能 は , みか けり 引数 を 渡す ょ 9 人 準備 する 。 と の 場合 の 見 か け 引 数 は , 
呼び 出さ れる 言語 の 規則 に し た が っ て マッ プ さ れる 。 人 K 節 「 デ ー タ 
・ マ ッ プ の 作成 」 を 参照 の と と 。 


FORTRAN また は COBOL に 渡さ れる 引数 の PL ノ I の デ 
ー タ ・ タ イプ が , と れ ら の 言語 の 中 で 該当 する も る の を も た な い 場 合 
は , コン バイ ル 時 C, 警告 メッ セー ジ が 出さ れる 。 実行 され た と き 
の 結果 は どう な る か わか ら ず , 異常 停止 に な る と と も ある 。 


デー タ ・ タ イプ : PL ンジ I で は , COBOL や FORTRAN + 
り も , デー タ ・ タ イプ の 数 が 多い 。 し た が っ て , と れ ら の 言語 の 中 
で 該当 する タイ プ を も た を いも の も ある 。 PLI の デー タ ・ タ イ 
プ が CO BOL また は FORTRAN の 中 で 対応 する る の を も $ つ 範 
囲 , し た が っ て , 引 毅 と し て 渡す と と の で きる 範囲 が ,。 と と 要約 
し て ある 。 


問題 デー タ : PL プ T の デー タ ・ タ イプ の 多く は , COBOL ま 
た は FORTRAN の いずれ か に と , 該当 する タイ プ を も っ て いる 。 
PL エーCOBOL お ょ よび PL ンジ [一 FORTRAN の 間 で 対応 
する デー タ の 表 が , それ ぞ れ 「COBOL イン ター フェ ー ぇ | と 

「FORTRAN イン ター フェ ー ス 」 と いう 題目 で 以下 に 示し て あ 
る 。 


プ ブログ ラム 制御 デー タ : 呼び 出さ れ を た COBOL また は FORTRAN 
ルー チン 対し て , ブロ グラ テラ ュ 制御 デー タ ・ タ イプ の 引数 を 
渡す こと が で きる 。 しかし, 呼び 出さ れ た ルー チン の 中 で は , 入口 
引数 し か , 渡し て 使う 9 こと は で き な い の で , その ルー チン が 
FORTRAN ルー チン の と きだ け 可 能 で ある 。 それ 以外 の デー タ ・ タ イ 
プ の 引数 は , 次 (C PL プ I プロ シー ジャ ー に 渡す 以外 KC, 呼び 出さ 
れ た を た ルー チン の 中 で 使用 し て は な を なら な い 。 
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邊 : 特定 の 入出 力 操作 で 使用 され る ファ イル に 対し て , 


ENVIRONMENT 属性 の 中 で COBOL オプ ショ ン を 指定 する 
こと が で きる 。 と の オプ ショ ン を も つ フ ァイル は , ファ イメ 引数 ま 
を た は ファ イル ・ ペ パラメータ ー と し て 使用 する と と は で き な い 。 
ENVIRONMENT 属性 の COBOL オプ ショ ン の 使い か た に つ 
いて は , 第 1 2 章 「 レ コー ドド 方式 転送 ] の 「ENVTRONMENT 
属性 ] の 項 を みて いた だ きた い 。 


デー タ の マッ プ : COBOL ま た は FORTRAN ルー チン (と 引 
数 を うま く 渡 す と と が で きる よう に する た め K, 渡さ れる 実際 の 引 
数 の マッ プ は , その バラ メー ター 対し て CO BOL また は 
FORTRAN が 想定 する マッ プ と 一 致し て い を なけ れ ば な を ならない 。 


要素 引数 の 場合 は , 引数 と バラ メー ター の 境界 合せ 互換 性 が あ 
る と いう と と が , 唯一 の 条件 で も る 。 PL ンプ I で は , 変数 の 境界 合 
せ は , ALIGNED と UNALIGNED 属性 に ょ っ て 決ま る 。 
COBOL と FORTRAN で の , それ 対応 する 指定 は , 次 の 通 
り で ある 。 


PL プ 1 COBOL FORTRAN 
ALTIGNED SYNCHRONTZED 通常 の 境界 合せ 


UNALIGNED SYNCHRONIZEE され を い 対応 する る の を し 


P エ LT の 引数 の 境界 合せ は , デー タ ・ タ イプ と 同様 。 バラ メー 
ター 記述 子 リ スト また は 引数 を の も の か ら , 推論 され る 。 
SYNCHRONTIZED COBOL パ ラメ ー タ ー, また は FORTRAN 
バラ メー ター 作 対 し て 渡す と と の で きる の は , ALIGNED の 要 
素 だ け で ある 。 SYNCHRON1IZE さ れ て いな い COBOL の 
ラメ ー タ ー 作 対し て は , ALIGNED また は UNALIGNED 
の どちら の 芝 素 で も 渡す と と が で きる 。 とれ ら の 境界 合せ が 互換 性 
を も っ て いる か どう か 確 め る の は , プロ グラ マー の 責任 で ある 。 


デー タ の 集合 体 の 場合 , 問題 は さ ら K 複 雑 で ある 。 た と えば ぱ , 
PL/T また は COBOL の 構造 は , 上 で 述べ た よう K, 境界 合せ 
(につい て 厳格 さ を も っ て いる 可能 性 が ある 。 さ ら (C, その 各々 の メ 
ン バ ー は , それ 自体 境界 合せ の 厳格 さ を も っ て いる と と も , すべ て 
の メン バー が 同じ 境界 合せ の 厳格 さ を も っ て いる と と も ある 。 各 メ 
ン バ ー を 対し て 必要 な 境界 合せ を する た め に , 該当 の 言語 の マッ プ 
作成 の 算法 に よっ て , ペデ ィング ・ バ イト が 挿入 され る 。 PL/1 
の 構造 で は , 必要 を バディ ング の 量 を 最小 に する た め K, 可能 を 限 
り , 境界 合せ は 調整 され る 。 そ れ に 対し て , COBOL の 構造 で は , 
と の よう な 調整 は 起 ら な い 。 その 結果 , PL プ I の マッ プ 作 成 の 算 
法 に よっ て マッ プ が 作ら れ た 構造 と , CO BOL の 算法 で マッ プ が 
作ら れ た 構造 と で は , 主 記憶 域 で の レイ アテ アッ ゥ ト が 同じ に を なら を いと 
と も ある 。 


同様 に , 配列 の マッ プ も , PL ンプ [と FORTRAN と で は 違っ て い 
る 。 PL ルン ] は , 2 次 元 以 上 の 配列 を 列 を 主 と し た 順序 で 記憶 する 
の 対し て , FORTRAN は , 行 を 主 と し た 順序 で それ ら を 記憶 
する 。 し た が っ て , 2 次 元 以 上 の 配列 の 場合 , PL ン 1 で 要素 を 参 


司 す る と , FORTRAN で 同じ 要素 を 参照 する の 有用 いら れる 添 
字 の 順序 を 逆 に する と と (て よっ て と り 出 され る 。 


言語 間 機 能 は , COBOL ま た は FORTRAN ルー チン (CC 引数 
と し て 渡さ れる PL プ T の デー タ 集 合体 に 対し て 見 か け 引 数 を 作る 
と と (よって, と れ ら の 問題 を 解決 する 。PL ン 1 の 構造 が COBOL 
ルー チン 引数 と し て 渡さ れる と き は , 双方 の 言語 に な ける 引 
数 の マッ プ に つい て 考慮 され る 。 マ ッ プ が 同じ で ある と コン パイ ラ 
ー が 判断 で きる 場合 は , 引数 は , COBOL ルー チン (直接 渡さ れ 
あぁ 


し か し , マッ プ が 同じ で ある と コン パイ ラー が 判断 で き を い 場 合 
は , COBOL の マッ プ の 算法 に し た が っ て マッ プ さ れ た , 見 か け 
引数 が 作ら れる 。 PL ノブ { 構造 の メン バー の 値 が , 見 か け 引 数 の 中 
の 対応 する メン バー を 割り 当て られ , その あと で , COBOL ルー 
チン (C 引 数 と し て 見 か け 引 数 が 渡さ れる 。 PL プ I プロ シー ジャ ー 
(て 戻 る と き , 見 か け 引 数 の 中 の 値 (変更 され て いる 場合 も , され て 
いな を い 場 合 も ある ) が , も と の PL バ 1 8 数 の 対応 する メン バー 
割り 当て られ る 。 


同様 CK, PLI の 配列 お FORTRAN ルー チン (引数 と し て 
渡さ れる と き は , 双方 の 言語 に な ける 配列 の マッ プ が 考慮 され る 。 
双方 の 配列 が 1 次 元 で , し か る ゃ 連続 する 記憶 域 に 入っ て お ぉ り , 同じ 
(境界 合せ され て いる 場合 は , 呼び 出さ れ を た FORTRAN ルー チ 
ン 《C 引 数 が 直接 濾 さ れる 。 双方 の 配列 が 1 次 元 で は ある が , 上 記 の 
条件 適っ て いな いか , また は 2 次 元 以 上 の 場合 は , FORTRAN 
の 配列 の 処理 に し た が っ て マッ プ さ れ た 見 か け 引 数 が 作ら れる 。 
(実際 に は , と の と と は 添字 を 逆 に する と と を 意味 し て いる 。 ) 
PL1 の 配列 要素 の 値 は , 見 か け 引 数 の 中 の 対応 する 要素 C 割 り 
当て られ る 。 その あと で , 見 か け 引 数 が , 引数 と し て FORTRAN 
ルー チン 渡さ れる 。 PL プ I プロシージャー 戻る と き , 見 か け 
引数 の 中 に ある 値 (変更 され た 場合 も , され を か っ た 場合 も ある ) 
が , PL/I 引数 の 該当 する 要素 割り 当て られ る 。 


ブロ グラ マー は , デー タ の 集合 体 の マッ プ を 作り 直す た め の 言 語 
間 機 能 の 効果 を 禁止 し た り , 制限 し た りす る た め の 特 定 の オプ ショ 
ン を 指定 する と と が で きる 。 たとえば, 呼出 し の 際 に 数 個 の 引数 が 
渡さ れる 場合 プロ グラ マー は , ある 1 つの 引数 対し て は と の 機 
能 を 禁止 し , 別 の 引数 に は と の 機能 を 適用 し た り , ある いけ は 第 3 の 
引数 に 対し て と の 機能 を 制限 する , と いう よう (と す る と と も で きる 。 


COBOL また は FORTRAN ルー チン の 呼出 し は , COBOL 
また は FORTRAN ルー チン の 入口 点 K 対 応 す る 値 を る つ 入 口 定 
数 ま た は 変数 を 指定 す る 関数 参照 また は CALL ス テー トメ ント 


(FORTRAN ルー チン の 場合 の み ) に よっ て , 行なわ れる 。 

と の 入口 定数 また は 変数 は , PL/ プ 1 プロ グラ ム 内 の 入口 宣言 の 中 
で , OPTIONS 属性 の 該当 する オォ オプション を 使用 する と と にょ 
っ て , COBOL し また は FORTRAN を 呼び 出す も の と し て 識別 
し な けれ ば な ら な い 。 また, プロ グラ マー は , デー タ 集 合体 の マッ 
プ の 作り 直し を 抑止 する た め の オ ォ オプション や , COBOL また は 
FORTRAN ルー チン の 中 で 起こ と る 特定 の 割込み を PLI が 処 
理 で きる よう (に す る た め の ォ オプション も る も, 指定 する と と が で きる 。 


と れ ら の オプ ショ ン は , 次 の 通り で ある 。 


COBOL : と れ は , 指定 され た 入口 点 が COBOL ルー チ 
ン の 中 (て ある と と を 指定 する も の で ある 。 


FORTRAN: と れ は , 指定 され た 入口 点 が FORTRAN ん 
ー チ ン の 中 に ある と と を 指定 する も る の で ある 。 


NOMAP : と れ は , 見 か け 引 数 を 作ら を いと と を 指定 する 
も の で ある 。 集合 体 引数 は , 呼び 出さ れ た ルー 
チン 直接 渡さ れる 。 


NOMAPIN: と れ は , 見 か け 引 数 が 作ら れる と き に , 集合 体 
引数 の 値 で 初期 値 化 し を た いと と を 指定 する も の 
で ある 。 


NOMAPOUT : 見 か け 引 数 が 作ら れる 場合 に C に , あと で 戻る と き , 
見 か け 引 数 の 値 を 集合 体 引数 に 割り 当て を な いと 
と を 指定 する も の で ある 。 


ARGn: と れ は , NOMAP, NOMAP IN, な よび 
NOMAPOUT の 各 オ プシ ョ ン が 適用 され る 
引数 を 指定 する た め (C, 用 いら れる 。 ARGn 
が 指定 され て いな いと き は , すべ て の 引数 に ォ 
プシ ョ ン が 適用 され る 。 


INTER: と れ は , COBOL また は FORTRAN 割 込 
み 処 理 機能 に よっ て 処理 され な い COBOL ま * 
た は FORTRAN ルー チン の 実行 中 に 起 っ た 
割込み を , PL エバ { 割込み 処理 機能 で 処理 する 
と と を 指定 する も の で ある ( と の 章 の 後 の 方 の 
「 割 込み 処理 ] の 項 を 参照 ) 。 


NOMAPIN お よび NOMAPOUT オプ ショ ン を 使用 する と , 
ュ ン バイ ラー は , 不要 の 初期 値 化 コー ド を 省く と と が で きる の で , 
プロ グラ ム の 効率 が 重要 を 問題 で も る と き は , 初期 値 化 が 不要 な ら 
ば , と これら の オブ ション を 使用 すべ き で ある 。 
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入口 名 を 宣言 する と き は , 次 の 点 と 注意 し を な けれ ば な ら な い 。 


例 : 
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COBOL また は FORTRAN の どちら か だ け (両方 は 不 
可 ) を 宣言 の 中 記入 する と と が で きる 。 NOMAP, 
NOMAPIN, NOMAPOUT の 各 オ プシ ョ ン の 中 , 1 つま た 
は 2 つ 以 上 を 同じ 宣言 の 中 に 記 信 し て も よい 。 


COBOL の サブ プ ブ ログ ラム は は, 値 を 返さ を な い の で , COBOL 
オプ ショ ン と いっ し ょ KK RETURNS 属性 を 使用 する 
と と は で き な い じ 。 


言語 間 機能 オプ ショ ン と いっ し ょ を 入口 変数 また は パラ メー 
ター を 宮 言 する と と が で きる 。 


GENERIC 属性 指定 の 中 で , 言語 問 機能 オプ シュン と い 
っ し ょ (て 入口 名 を 記入 する と と が で きる 。 


COBOL また は FORTRAN ルー チン の 入口 定数 名 は , 
1 か ら 8 桁 まで で ある 。 9? 桁 以 上 指定 する と , 左端 の 8 桁 だ 
けが と られ る 。 


DCL COBOL ENTRY (CHAR (5) ) 
OPTIONS (COBOL INTER ), 


COBOLB ENTRY (12 FIXED,2FLOAT ) 
OPTIONS (COBOL NOMAPIN ) , 

COBOLBXX (OPTIONS(COBOL ) 
EXTERNAL。 ENTRY(…): 


DCL FORTA ENTRY (FIXED ) 
OPTIONS (FORTRAN ) RETURNS 
(FLOAT (5) ) : 


DCL A EXTERNAL ENTRY(..…) VARIABLE 
OPTIONS (FORTRAN ), 


B OPTIONS (FORTRAN ) : 


A=B : 
AE し うり 


DCL A GENERIC COBOLZ 
WHEN ( 1 UNALIGNED, 2 FIXED, 
2 FLOAT ), 
FORTZ WHEN (FIXED BINARY ) ), 


COBOLZ OPTIONS (COBOL ) , 


FORTZ OPTIONS (FORTRAN ) : 


DOS PL/ ノ 1 最適 化 コ セン バイ ラー : 言語 解 説 書 第 1 部 


5. DCL A ENTRY: 
CAEL 区 (A) : 


双 :PROC (B ) : 
DCL B OPTIONS (COBOL ) : 


6 DCL COBSUB ENTRY(… つ ーッ) 
OPTIONS (COBOL ,NOMAP ( ARG1. ARG3): 


CALL COBSUB(A, B, C): 


CALL COBSUB (X, Y, ZZ): 


PL ププ | プロシージャー へ の 引数 の 受渡 し 


CO BOL また は FORTRAN か ら PL ンジ 1 ブ プロシージャー 
数 が 渡さ れる と き , デー タ ・ タ イプ は , PL ン 1 の 普 馬 の 方 法 で , 
つま り バ パラ メー ター の 宣言 か ら , 決め られ る 。 斉 語 間 機 能 は , その 
パラ メー ター 対し て 用 いら れ て いる アド レス 体系 が PL バ { で 使 
用 され る も の で ある と と , お よび それ 以外 C 必 要 が を けれ ば , 渡さ 
れ る 集合 体 パ テラ メー ター の マッ プ $ ゃ も PLI で 使用 され る も の で 
ある と と を 確か め る 。PL プ 1 備わっ て いる 言語 間 機 能 は , PL ン 【 
を 呼び 出し て いる ルー チン の 中 の 9| 数 を みる と と は で き な い の で , 
プロ グラ マー の 責任 に な いて , PL/1 渡さ れる 引数 が , デー タ 
・ タ イプ の 点 で も 構成 の 点 で も , PLI で 宣言 され て いる ペラ メ 
ー タ ー と 対応 する よう , 確認 し を けれ ば な ら な じい 。 


また は FORTRAN が 呼び 出さ れ た と き K 起 と る 状況 と 価 ぼ 同じ 
で ある 。 PL プ T ブロ シー ジャ ーK 入 る と き の 引 | 数 の マッ プ は , ズバ 
ラメ ー タ ー を アド レス する と き に て P エ 1 が 使用 する マッ プ を 対応 
し て いな を けれ ば を な を ら を ない 。 


要素 引数 な よび バラ メー ター の 場合 , こ とれ は , SYNCHRO- 
N 1 ZED また は SYNCHRONTI ZED され な い COBOL の 引 
数 を , UNALIGNED の PL プ T パラ メー ター 人 渡し て も よい 
と と , また は SYNCHRONI ZED の COBOL 引 数 また は 
FORTRAN の 引数 を , ALIGNED PL プ I パラ メー ター 
CC 渡す と と が で きる と と を 意味 し て いる 。 


COBOL また は FORTRAN の 引数 の マッ プ が , PL グ I の 
バラ メー ター の マッ プ と 違っ て いる と き の 集 合体 引数 と パラ メー タ 
ー の 場合 , 言語 間 機 能 は , PL プ I プロ シー ジャ ーMC 渡 され る 見 か 
け 引 数 を 作成 する と と に よって, 問題 を 解決 す る 。 


見 か け 引 数 は , PL バ { の 規則 C し た が っ て マッ プ さ れ , PL 
プロ シー ジャ ー が 呼び 出さ れる 前 (C COBOL また は FORTRAN 
引数 の メン バー の 値 が , 見 か け 引 数 の 対応 する メン バー を 割り 当て 
られ る 。 PL プ 1I プロ シー ジャ ー か ら 戻 る と き , 見 か け 引 数 の メン 
バー の 値 が も と の 引数 に 割り 当て られ て 戻さ れる 。 


COBOL また は FORTRAN と PL プ 1C お ける マッ プ が 同じ 
で ある と と を , コン パイ ラー が 認識 で きる 場合 は , と の よう な 見 か 
け 引 数 は 作ら れ な を ない 。 か わり (C, ブロ グラ マー は , 見 か け 引 数 が 作 
られ る と と , ある い は も と の 引数 と 作ら れ た 見 か け 引 数 と の 間 で 割 
当て が 行わ れる と と を , オプ ショ ン を 使っ て 禁止 する と と が で きる 。 


呼出 し 


COBOL 上 また は FORTRAN か ら 呼 び 出 され る PL プ TI ブロ シー 
ジャ ー の 中 に ある 入口 点 は , 対応 する PROCEDURE ま た は 
ENTRY ステ ー ト メン ト の 中 で 該当 する オプ ショ ン を 使っ て 識別 し た 
けれ ば な を なら な を ない , また , ブロ グラ マー は , デー タ 集 合体 の マッ プ の 
作り 直し を 抑止 する オプ ショ ン を 指定 する と と も で きる 。 


COBOL : と れ は , その 入口 点 を 呼び 出す と と が で きる の 
は , COBOL ルー チン だ け で ある と と を 指定 
する も の で ある 。 


FORTRAN : と れ は , その 入口 点 を 呼び 出す と と が で きる の 
は , FORTRAN ルー チン だ け で ある と と を 
指定 する も の で ある 。 


NOMAP : と これ は , 見 か け 引 数 を 作ら ない ょ う C 指 定 する 
も の で ある 。 COBOL ま * た は FORTRAN 
の 集合 体 引数 は , PL1 直接 渡さ れる 。 


NOMAPIN: と れ は , 見 か け 引 数 が 作ら れる と まき (C, 集合 体 
引数 の 値 で 初期 値 化 し な た いと と を 指定 する も の 
で ある 。 


NOMAPOUT : と れ は , 見 か け 引 数 が 作成 され る と き , 戻り の 
際 に その 値 を 集合 体 引数 に 割り 当て し 直さ な い 


と と を 指定 する も る の で ある 。 
バラ メー ター・ NOMAP, NOMAPIN, また は NOMAPOUT 
リス ト を 適用 する バラ メー ター ( 2 つ 以 上 も 可 ) 
を , パラ メー ター・ リ スト の 中 指定 する と と 
が で きる 。 


NOMAPIN お ぉ お よび NOMAPOUT オプ ショ ン を 使用 する と , 
コン バイ ラー は , 不 必要 な 初期 値 化 の ュー ド を 省く と と が で きる の 
で , ブログ ラム の 効率 が 重要 を 問題 で ちあ る と き は , と れ ら の ォ プ シ 
ョ ン を 使用 し な けれ ば を ら な い 。 


PRKOCEDURE ま を た は ENTRY ス テー トメ ント を コー ディ ン 
グ す る と き は , 次 の よら な 点 人 注意 し を けれ ば を ら を い 。 


1 MAIN, COBOL, また は FORTRAN の オォ オプション は , 
1 つの ステ ー ト メン ト の 中 で は 1 つ し か 指定 する と と は で き 
を い 。 NOMAP, NOMAPIN, ま を は NOMAPOUT の 
カプ ジョ ンジ は 1 つの ステ ー ト メン ト の 中 で 1 つ で ゃ も, 


以上 で も 指定 する こと が で きる 。 


2. ブロ シー ジャ ーK 対 する バラ メー ター に て, スト リン グ , エリ 
アテ, また は 配列 が 含ま れ て いる 場合 は , と れ ら 対す る 長 さ , 
サイ ズ , また は 限界 を , 1 0 進 整定 数 と し て 指定 し を な けれ ば 
な ら な い 。 


3 COBOL ルー チン よっ て 呼び 出さ れ た 入口 点 C 対 し て , 
REPTURNS オプ ショ ン を 指定 する と と は で き な い 。 


4 NOMAP, NOMAPIN, また は NOMAPOUT オォ プシ 
ョ ン 人 対す る パラ メー ター ( 2 つ 以 上 $ も 可 ) は , 引数 リス ト 
の 中 で 指定 する と と が で きる 。 


例 : 


1 P1:PROC(A,B,C) OPTIONS (FORTRAN 
NOMAPIN(C) 
NOMAPOUT (A) ) : 
DCL A (3,4) FLOAT BIN(20), 
B FIXED BIN(31 ) , 
C (5,6) FLOAT DEC(6) : 
2. P2 :PROC(R,S,T) OPTIONS (FORTRAN 
NOMAP ) : 


3. P3:PROC(X,Y) OPTIONS(COBOL NOMAPIN 
(X) NOMAPOUT(Y) ) : 
GE 2 の La 


1 YY 2 


共通 域 の 使用 


PL プ I プロ グラ ム の 中 の 変数 を , FORTRAN ルー チン の 中 に 
ある 変数 と 同じ 記憶 域 ア ロッ ク K 割 り 振 る と と が で きる 。 と の よ ょ 
2 に する と , 2 つの ルー チン の 間 で 連絡 する た め , と の 変数 を 使 
用 する と と が で きる 。 共通 域 の 割 振り は , PL ノン T の 変数 を STATIC 
EXTERNA 葉 と 宣言 し FORTRAN ルー チン の 中 を 同 
じ 名 前 を を もつ COMMON プ ロッ ク を 設定 する と と に よっ て , 行なわ 
れる 。 と の よう すると, PL プ 1 の 変数 と , COMMON プ ブロック 
内 の 変数 の 関係 は , 2 つの PL{ 外 部 プロ シー ジャ ー の 中 同 じ 
名 前 を も つ 2 つ の STATTIC EXTERNAL 変 数 が ある 場合 と 等 
し く な る 。 共通 域 を 使用 する 変数 の 数 は , 2 つ & 制 限 さ れ て いる わ 
け で は な く , 別 の いく つか の PL プエブロ シー ジャ ー の 中 に ある 同 
ー の STATIC EXTERNAL 変 数 と , 別 の いく つか の 

FORTRAN ル ー チ ン の 中 に ある 同一 の CO0MMON ブロ ッ ク と は , と れ 
ら の プロ シー ジャ ー お よび ルー チン が すべ て , 連係 編集 され て 1 つ 
の プロ グラ ム と な を る 限り は , 双方 と も いく つ で も いっ し ょ 人 使用 す 
る と と が で きる 。 連係 編集 の 方 法 に つい て は , DOS PL ン 1 最 適 
化 コ ン パ イラ ー を 対す る ブロ グラ マー の 手引 記載 さん れん て いる 。 


STATIC EXTERNAL 変数 は , これ ら の 属性 に 関連 する 通常 の 
PL ノ {1 の 規則 を 守 ちら な けれ ば を ら 才 また さら に , COMMON ブ ロッ 
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ク の 中 の 変数 の デー タ ・ タ イブ 相当 する デー タ ・ タ イプ の も の で 
を けれ ば た ら な い ( 対応 する デー タ ・ タ イプ の 表 に つい て は , と の 
章 の 後 の 方 に ある 「FORTRAN イ ンタ ー フ ェ ー ス 」 を 参照 の と 
と ) 。 また , PL バ I の 変数 は , 対応 する FORTRAN の デー タ 
・ タ イプ の 必要 条件 (て 合わ せ て , 境界 合せ し な けれ ば な ら な い 。 


PL の 変数 は , INITI AL 属性 を 用 いて 初期 値 化す る と と が 
で きる が , FORTRAN の 変数 は , BLOCK DATA サ プ プ ブロ 
グラ ム を 用 いて 初期 値 化 する と と が で きる 。 一 方 の PL プ I 変数 と 
他方 の FORTRAN 変数 が 同じ 値 し 初期 値 化 さ れ て いな いと き は , 
連係 編集 プロ グラ ム が 最初 に 上 出 あ うら プロ シー ジャ ー ま た は ルー チン 
(C よ っ て , すべ て の 変数 の 初期 値 が 決ま る 。PL/1 の 変数 と , 対 
応 す る FORTRAN の 変数 と を 別 の 値 に 初期 値 化し た り , 一 方 だ 
け を 初期 値 化 し て 他方 を 初期 値 化 し を い , と いう と と は , 別 C 誤 り 
で は な い 。 


DEF INED 属 性 を 用 いて , PL プ 1 変数 の 上 に さらに K 別 の 変数 
を オー バー レー する と と は , 定義 づけ され る 変数 が FORTRAN 
変数 の デー タ ・ タ イプ お よび 境界 合せ の 必要 条件 (合致 し て いる 限 
り , 許さ れる 。 


PL/I の 変数 と COBOL の 変数 と の 間 で 共通 域 を 使用 する こと 
と は で き な を な い 。 PL プ I プ ロン シー ジャ ー と CO BOL ル ー チ ン の 間 の 
連絡 に つい て PL/I 備わっ て いる 機能 は , 引数 を 渡す と と だ け 
で ある 。 


PL プ I の プロ シー ジャ ー を 実行 する た め に は , 最初 に ヒビ PL1 の 
環境 を 設定 し を けれ ば を ら を な い 。 ブロ グラ ム ( て PL1 の 主 プ ブロ シ 
ー ジ ャ ー が 含ま れ て いる と き は , その プログ ラム 最初 と 入る と き 
と の 環境 が 設定 され る 。 主 ルー チン が COBOL また は 
FORTRAN の 場合 は , 言語 間 機 能 に よっ て , 必要 応じ て 所 要 
の PL/ 1 環境 が 設定 され る 。 と の セク ショ ン で は , 諸 言 語 間 の 文 
脈 の 中 で の 規約 や 制約 に つい て 説明 する 。 


プロ グラ ム の 主 ル ー チ ン が PLI 主 ブ プロシージャー の 場合 は , ブ 
ログ ラム (て 入る と き , PL1 の 環境 が 設定 され る 。 と の ブロ グラ 
ム C PL プ 1 と COBOL ま を は FORTRAN ルー チン が 混じっ て 
入っ て いる と き で も ゃ も , PL プ 1 の 記憶 域 の 解放 や , PL プ T ファ イ 
ル の 閉止 と 関す る 規則 が 適用 され る 。 


プロ グラ ム の 主 ル ー チ ン が PL ノエ の 主 プ グロ ンー ジャ ー で な いと 
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き は , PL プ I プロ シー ジャ ー が 最初 呼び 出さ れる と き (C, PL 
グ 1 環境 が 設定 され る 。 と の 環境 の 範囲 に は, PL プ I プロ ンー ジ 
ャ ー を 呼び 出し た ルー チン ( 図 17 . 1 参照 ) も 含ま れ て おり, と 
の ルー チン が 終了 する まで と の 環境 は 存在 し つづ ける 。 と の 環境 は , 
必要 を だ け 何 度 で も , 再 設定 し た り , 終了 させ た りす る と と が で き 
る 。 PL1 の 環境 が 破壊 され た と き は つね (CC, PL ン 1 の 被 制御 ぉ 
ょ よび 基底 付記 憶 域 の すべ て が 解放 され , PL プ 1T ラフ ァイル は すべ て 
閉じ られ る 。 


効率 と プロ グラ ミン グ の 便宜 を どの 理由 か ら , プロ グラ ム の 実行 
中 , PL の 環境 を 破壊 する 回 数 は , で きる 限り 少く し を けれ ば 
な ら な を な い 。 主 ルー チン が PL/I 主 プ ロン シー ジャ ー で ある 場合 や , 
PL プ 1 ブロ ンー ジャ ー ( その 中 K 何 を 含ん で いて も $ ) が 主 ル ー チ 
ン か ら 呼 び 出さ れ て いる 場合 は , 上 記 の と と を 確か め る と と が で きる 。 
し か し , 後者 の 場合 , 主 ル ケー チン が FORTRAN で 書か れ て いる 
と き は , オペ レー ティ ング ・ シ ステ ュ 制 御 を 戻す た め C 最 後 の 
FORTRAN RETURN が 実行 され る と き C, PL バ 1 環 境 が 正 
常に 終了 し を な いと いう 欠点 が ある ( と の 章 の 後 の 方 の 「FORTRAN 
と COBOL ルー チン の 終了 を 参照 の と と )。 


FORTRAN ルー チン に よる 入出 力 の 制約 


SYSLST を 使用 し て いる と き は 別 と し て , PL プ 1T プロ ンー ジ 
ャ ー( て よっ て 呼び 出さ れ を た FORTRAN ルー チン が 生成 し た 入出 
力 制御 情報 は , PL プ { 環境 の 情報 の 上 に 書き 出さ れる 。 


その 逆 (C, 入出 力 ル ー チ テン を 実行 し PL プ I プロ シー ジャ ー を 
呼び 出す FORTRAN ルー チン の 入出 力 制御 情報 は PL バ { 環 
境 が 設定 さん る と , それ に よっ て 上 書き され る 。 し か し , と の よう 
を 問題 を 解決 する た め K, 各 導 入 先 で 定義 され る サ プ ブルー チン 
PL TI SA が 用 意 さ れ て いる 。 


PLISA サ プル ー チ ン は , PL バ 1 環 境 を 収容 する 記憶 域 を 確保 
する 。 PLI SA サブ ルー チン と は , 2 つの 引数 が 与え られ る 。 最 
初 の 引数 は , PL グ 1 の 環境 を と っ て むく 変数 の 名 前 で ある 。 2 番 
目 の 引 数 は , 記憶 域 の バイ ト 数 を 指定 する 整数 の 定数 で ある 。 次 て 
あげ る ステ ー ト メン ト の 例 は , FORTRAN ル シー チン の 中 で 与え る 
と と も で きる 。 PLISA サ プル ー チ テン は , PL プ I プ ブ プロシージャー 
が 呼び 出さ れる 前 に 呼び 出さ を けれ ば な を なら な を い 。 た と え ぴ , 


REAL ネ 8 PLIENV (250) 


CALL PLISA (PLIENV,2000) 


CALL PLIPROC (XX) 


図 17 . 


注 : 


PROC1 (MAIN) 


FORTRAN 


PROC8 PROC2 


FORTRAN FORTRAN 


EROG タ 


FORTRAN 


PROC5 


FORTRAN 


PROC6 


FORTRAN 


PL プ I 環境 の 境界 


1 P エ {環境 の 範囲 


FORTRAN の デー タ ・ タ イブ REAL 玉 8 は, と の 例 で 
は 適切 で は を い 。 配列 の 次 元 が , 同じ し バイト 数 を 維持 で きる 
ょ よう 修正 され て いれ ば , どの よう な デー タ ・ タ イズ プ を 指定 し 
て も よい 。 


と の 例 で 与え られ て いる バイ ト 数 は , PL/1 の 環境 で 必要 
と され る 最少 限 の 記憶 域 の 量 と みなさ なけ れ ば な を ら を い 。 

PL ンプ 1T ブロ シー ジャ ー の 実行 中 に 必要 を , 環境 情報 の 最大 
の 量 を 決め る た め の 科 便 な 方 法 と いう も の は を い 。 と の 処置 


を 最も 安全 (C す る 方 法 と し て は , FORTRAN の 配列 変数 
を で きる 限り 大 きく し て お む おく と と で ある 。 


FORTRAN ルー チン か ら 呼 び 出 され た PL プ I プロ シー ジャ 
ー が SYSPRINT ファ イル を 使用 し て いる 場合 は , FORTRAN 
ルー チン 戻る 前 に その ファ イル が 閉じ られ て いな い 限 り , 最後 の 
項目 は 転送 され を い 。 か わり た ,. 最後 の 項目 を 転送 する た め に , 
PUT SKIP ス テー トメ ント を 実行 する と と が で きる 。 


同様 C, PL プ I プ ロン シー ジャ ー が FORTRAN ル ー チ ン を 呼び 出し 
て いる と き は , FORTRAN ル シー チン か ら 戻 っ て くる まで , 最後 の 項 
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目 は 転送 され を い , し た が っ て , FORTRAN ルー チン が SYSLST 
を 使用 し て いる 場合 は , SYSPRINT 出力 の 最後 の 項目 は , 
SYSLST 出 力 の 後に 印刷 され る 。 こ と の よう な と と を 避け る (て は , 
FORTRAN ル ー チ ン が 呼び 出さ れる 前 に , SYSPRINT ファ 
イル を 閉じ る か , また は PUT SKTP ス テー トメ ント を 実行 し を 
けれ ば な ら な い 。 


割込み 処理 


COBOL お よび FORTRAN ル ー チ ン は , 実行 中 に 起 と る 可能 性 
の ある 特定 の ハー ドウ ェ ブ 割込み を 処理 する と と が で きる が , 処理 
で き ない 割込み る いく つか ある 。 PL 上 1 の 言語 間 連 絡 機能 を 使用 
すれ ば , COBOL し また は FORTRAN ルー チン で 処理 で き を いよ 
うな 割込み を , その ルー チン が 動 的 に 派生 し て きた PL プ {I ブロ シ 
ー ジ ャ ーK よ っ て , 処理 する と と が で きる よら な る 。 


プロ グラ マー は , CO BOL ま た は FORTRAN 入 口 名 を 宣言 す 
る と き , OPTIONS 属 性 の INTER ォ オプ ショ ン を 指定 する 。 

( と の 章 の 前 の 方 の 「COBOL ま た は FORTRAN ルー チン へ の 
引数 の 受渡 し 」 の と と ろ で , INTER オプ ショ ン の 項 も 参照 の と 
と 。 ) と の よう すると, 呼び 出さ れ を COBOL また は FORTRAN 
ルー チン で 処 理 さ れ な い 割 込み を , PL プ ノエ の オン ・ ユ ニッ 
ト か また は PL プ I{ の 標準 シス テム 処置 の いずれ か に ょ っ て 処理 す 
る と と が で きる よう に を な る 。 PL プ 1 で は オン ・ ユ ニッ ト が 設定 さ 
れ て いれ ば , その オン ・ ュ ユニ テッ ト は , それ が 作ら れ た ブロ シー ジャ 
. 一 ば か り で な く ぐ , そ と か ら 動 的 (C 折 生 し た すべ て の プロ シー ジャ ー 
C ゃ 適用 され る 。 COBOL ま を は FORTRAN ルー チン の 実行 中 
(C, その ルー チ テン で は 処理 され を いよ ら な 割込み が 起こ と り , し か も 
COBOL ま た は FORTRAN 入 口 名 に 対し て INTER オプ ショ 
ン が 指定 され て いる PL ププ 1I ブロ ンー ジャ ー に よっ て その ルー チン 
が 呼び 出さ れ た 場合 は , すべ て の 呼出 し ブロ ンー ジャ ー 人 わた っ て , 
適当 な オン ・ ユ ニッ ト が 探索 され る 。 何 も みつ か ら を いと き は , 標 
池 の シ ステ ム 処 置 が と られ る 。 INTER が 指定 され て いな を いと き 
は , 探索 は 行なわ れず , オペ レー ティ ング ・ シ ステ ム の 制御 ブログ 

ラム ょ っ て 割 込み が 処理 され る 。 


PL1 環境 の 限界 の と と ろ ま で , 呼出 し チェ イン の 中 に ある す 
べ て の ルー チン が 探索 され る と と 注意 し て いた だ きた い 。 し た が 
っ て , と の 探索 に CCOBOL ま た は FORTRAN ル ー チ ン が 含ま れ 
る と と も あり 得る こと で ある 。PL プ I オン ・ ユ ニット だ けが 探索 
の 対象 と を る の で , と の 探索 の 結果 に これ ら の ルー チン が 何ら か の 
影響 を 及ぼ ば す と と は な い 。 


GO TO ステ ー ト メン ト 


2 つ 以 上 の 言語 間 の 境界 を 越え て, つまり, ある ルー チン が 別 の 言 
語 の シー チン を 呼び 出し て いる 呼出 し と し て 言語 間 の 境界 が 定義 さ 
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れ て いる と と ろ を 越え て 制御 を 移す と き C, GO TO ステ ー ト メ 
ント を 使用 し て は を な ら な を ない 。 オ ン ・ ユ ニッ ト の 中 で プロ グラ マー が 
GO TO ステ ー ト メン ト を 使用 する と , と の よら な 制御 の 移動 
が 不用 意 (と 開始 され て し まう と と も ある 。 ( オン ・ ユ ニッ ト に 入る 
と いう と と は , その オン ・ ユ ニッ ト K 入 る 原因 と を っ た ステ ー ト メ 
ント が 実行 され た プロ ッ ク ま た は サブ ルー チン の 人 外 へ 制御 を 移す と 
と と は みな され を ない と と に 注意 し て いた だ きた い 。 オン ・ ユ ニッ ト 
は , そ と に 入っ て きた プロ シー ジャ ー ま た は ルー チン に K 付 加 さ れ た 
も の と み を す と と が で きる 。 と の と と は , COBOL ま た は 
FORTRAN ル シー チン か ら オ ン ・ ユ ニッ ト に 入っ 友 場 合 に る 適用 さ 
れる ) 。 次 の 例 に つい て 考え て み エ 9。 


P:PROCEDURE: 
DECLARE LAB LABEL(L1,L2) 
EXTERNAL , 
FORT ENTRY OPTIONS (FORTRAN 
INTER ) : 
ON ERROR GO TO LAB: 


CALL FORTj: 
1 ・ 
END Pi 


Q :PROCEDURE OPTIONS (FORTRAN ) : 
DECLARE LAB LABEL(L1,L2) 
EXTERNAL: 


CALL FORT : ステ ー ト メン ト が 実行 され , 次 CFORT が 
Q を CALL する と し ょ うら 。 さ ら (C ま た , P の 中 (設定 され た オン 
・ テ ニッ ト へ の 入口 を 開始 する Q の 中 で エラ ー が 起 っ た と 仮定 し よう 。 
と の 自 北 で は , オン ・ ユ ニッ ト は , そ と へ 入っ て きた プロ シー ジャ 
ー を 付加 され る も の と みな され る の で , 制御 は まだ プロ シー ジャ ー 
QK 残 っ て いる 。 LAB の 値 が L 1 の 場合 は , GO TO プラ ンチ 
は , ブロ シー ジャ ーP《 制 御 を 戻し その と き (CQ と FORT の 間 , 
お ぶよ び FORT と P の 間 の 言語 問 境界 を 越 を る と と (を る の で , エ ラ 
ーC て な る 。 LAB の 値 が L 2 の と き は , GO TO が 実行 され て も 
制御 は アプ アロ ンー ジ ャ ーQC 残 る の で , エラ ー に は な ら な じい じ 。 FORT 
で の 割込み に よっ て , Q (CC 入る 前 (オン ・ ユ ニッ ト K 入 っ た と すれ 
ば , LAB の 値 が 上 1 の と き は , エラ ー に は を な ら を な か っ た は ず で あ 
る 。 と の 場合 に た だ 1 つ だ け 越 を る で あろ ら う 言 語 間 境界 は , FORT 
と P の 間 の FORTRAN - PL 境界 で ある 。 ( と の 場合 プロ シー ジャ 
ーQ は 活用 状態 で は を い の で , LAB の 値 は L 2 で あっ て は な ら な い )。 


FORTRAN お よび COBOL ルー チン の 終了 


プロ グラ テラ ム 全体 を 終了 させ る ステ ー ト メン ト を 実行 する か , また は 
呼出 し ルー チン 制御 を 戻す と と に よっ て , ルー チン を 終了 させ る 
と と が で きる 。 


プロ グラム 全体 を 終了 させ る ステ ー ト メン ト は , FORTRAN で 
は STOP, COBOL で は STOP RUN で ある 。 と これ ら は は , 
PL プ I の STOP ステ ー ト メン ト KC 相 当 し て いる 。 とれ ら の ステ ー ト 
メン ト の 効果 は , いく つか の 言語 が まじ り 合 っ た プロ グラ ム の 中 で 
も 変ら じ ず , ブロ グラ ム 全 体 を 終了 させ る 。 


主 ル ー チ ン で は な い FORTRAN ま た は COBOL ルー チン が , 
PL ノバ { 環境 の 中 で STOP(FORTRAN ) また は STOP RUN 
( COBOL ) を 出し た 場合 は , 環境 は 終了 し な い 。 と の と と は , 
PL プ T プロ シー ジャ ー の 中 で 開か れ て いる ファ イル は , 閉じ られ 
な いと と , す を わ ち , 出力 デー タ が 失 な われ る 可能 性 が ある と と 
を 意味 し て いる 。 図 17 . 1 と ある 例 C つ いて 考え て みょう 9。 
PROC 2 の 中 の STOP また は PROC4 の 中 の STOP RUN は , 
PROC3 で 開か れる ファ イル を 閉じ な いし , また , PROC6 の 
中 の STOP は , PROC 7 の 中 の ファ イル を 閉じ な い 。 


PL プ 1 環境 の 内 側 に ある FORTRAN サ ブルー チン また は 関数 
の 中 で 実行 され , し か も その 環境 の 外側 に ある ルー チン 制御 を 戻 
す よ うら な を RETURN (いい か えれ ば , 直接 PL エル ー チ ン を 呼び 
出し て いる が , いずれ か の PL プ エ ルー チン か ら 動 的 (派生 し た の 
で は な を いよ うな FORTRAN ル ー チ ン の 中 に ある RETURN ステ 
ー ト メン ト ) が 実行 され る と , PL バ T{ 環境 は 終了 し , 動 的 C 族 生 
し た PL プ エ プロ ンー ジャ ー の 中 に ある すべ て の ファ イル は , 閉じ 
られ る 。 し か し , FORTRAN 主 ルー チン の 中 ある RETURN 
ステ ー ト メン ト は , 実質 的 CSTOP ステ ー ト メン ト の 働き を する 。 
つま り , ファ イル を 何 も る 閉じ ず に オペ レー ティ ング ・ シ ステ ュ K 制 
御 を 渡す 。 


PL ブ 1 環境 の 内 部 に ある COBOL 主 ル ー チ ン が オペ レー ティ 
ング ・ シ ステ ム に 制御 を 戻す と き は , と の 環境 は 正常 に 終了 する 。 


COBOL イン ター フェ ー ス 


PL プ T -COBOL イン ター フェ ー ス に て わ た っ て 引数 ン ノバ ラメ ー 


ター の 突合せ を する と き は , 双方 の 言語 に な ける デー タ ・ タ イプ と 
デー タ 構 成 の 対応 に つい て の 知識 が 必要 で ある 。 COBOL の デー 
タ ・ タ イプ と PL エン 1 の 対応 づけ が , 図 1 7 . 2 示さ れ て いる 。 
と れ ら は , COBOL の 引数 また は パラ メー ター に それ ぞ れ 結び つ 
けら れる PL プ T の ペラ メー ター 記述 子 の 中 に 記入 すべ き PL 
の デー タ ・ タ イプ で ある 。 


PL/1 の 要素 変数 を 使っ て COBOL の 項目 を 指定 する た め C は , 
相 等 し い デ ー タ ・ タ イプ に つい て の 知識 で 充分 で ある の 区 対し て , 
相 等 しい デ ー タ 集合 体 ( COBOL で は グル ー プ 項目 , PL/ エ で は 
構造 また は 配列 ) を 指定 する に は , 双方 の 言語 の デー タ 構 成 の 記述 
関す る 知識 が 必要 で ある 。 図 1 7 。 3 C あ げた 例 は , COBOL 
の デー タ 集 合体 を PL ルプ I の と と ば で どの よら MK 記述 する か を 示し 
た も の で ある 。 


COBOL で は , 1 つの グル ー プ 項目 記述 の 中 で , OCCURS タク 
ロー ズ を 3 回 以上 繰り 返す と と は で き な い 。 と の と と は , CO0BOL 
ルー チン (引数 と し て 渡す , PL1 の 構造 内 に お ける 配列 制約 
を 加え る と と C な る 。 また, OCCURS クロ ー ズ は , レベ ル 0 1 
の 記入 項目 で 指定 する と と が で き を い 。 したがって, COBOL ん 
ー チ ン (C ( また は , COBOL し ルー チン か ら ) 渡さ れる PL プ 1 の 構 
造 で は , レベ ル 1 の 配列 を 使用 する と と は で き な い 。 


ェ エリ ア ま た は ビッ ト ・ ス トリ ング 変数 を 含ん で いる PL プ I{ の 構 
造 を , COBOL し ルー チン へ の 引数 と し て 渡し て は を ら な い 。 と の 
よう (て する と , 診断 メッ セー ジ が 出さ れ , 構造 の マッ プ の 作り 直し 
は 自動 的 C 行 な われ を く な る 。 


FORTRAN イン ター フェ ー ス 


PL ンプ 1 -FORTRAN イン ター フェ ー ス に わた っ て 引数 プペ ラメ 
ー ター の 突合せ を する と き , お よび PL/I と FORTRAN の 変数 
(て 対し て 共通 域 を 使用 する と き は , 双方 の 言語 に な ける , デー タ ・ 
タイ プ と デー タ 編 成 の 対応 に つい て の 知識 が 必要 で ある 。 
FORTRAN の デー タ ・ タ イプ に 相応 する PL プ 1T の デー タ *・ タ イプ が 図 
1 7 、4 低 示 され て いる 。 と れ ら は , FORTRAN の 引数 また は 
バラ メー ター それ ぞ れ 結び つけ られ る PL プ エ の パラ メー ター ま 
た は バラ メー ター 記述 子 の 中 , ある い は FORTRAN COMMON 
ブロ ッ ク と 同じ 名 前 を る も つ STATIC EXTERNAL 変数 の 宮 
言 の 中 に 記入 すべ き PL プ I の デー タ ・ タ イプ で ある 。 
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PL 1 


SYNCHRO- | 基 さき 
NIZE 

な し (UNAL- 
{GNED ) 


バ UNALIG - 
(ベイト) | ALIGNED| NEp 


COMPUTATIONAL 
10 進 数 長 さ : 
1- 4 ハー フワ ー ド 1 FIXED BINARY 
(本 朋 う 
に 2 ニー ジー 


整数 ) 


FIXED BINARY 
530 
( フル ワー ド 
整数 ) 
10-18 フル ワー ド 等 し い ゃ の は な を ない ー 
COMPUTATIONAL - 1 フル ワー ド FLOAT DEC(6) フル ワー ド 
( 短 精度 浮動 小数 ) 
COMPUTATIONAL- 2 ダブ プル ワー ド バ FLOAT DEC (16) ダブ ル ワ ー ド 
( 長 精 度 浮動 小数 ) 


COMPUTATTONAL- 3 SQ 政 1 FIXED DEC の 


DISPLAY の CHARACTER? バイ ト 


1 1 0 進数 の 長 さ は , ビク チャ ー の 中 の 9 の 数 に 等しい 。 

* 最小 の 1 0 進数 値 (つまり, 1 桁 の 数 字 ) に は , 1 バイト の 
長 さ が 適用 され る 。 その他 の 値 に つい て は , CEIL 

( (数字 の 桁 数 十 1 ) プ 2 ) バイ ト が 与え られ る 。 
?VARYING 属性 を 使用 する と と は で き な じ いじ 。 


図 17. 2 COBOL - PL/I の デー タ の 対応 


01  A SYNCHRONIZED. A ALIGNED, 
02  B OCCURS 3 TIMES. 2 B(3)。, 
03 C OCCURS 4 TIMES. が,⑳( し 4 
04 D OCCURS 5 TIMES USAGE COMP-3 4 D(5 ) FIXED DECIMAL 
PIC S9?2999V999. ' NO 
02 E USAGE DISPLAY 2 E 
03 F PIC X(8). 


M 


3 FEF CHAR(8 ) , 
03 G PIC ?(8). 5 2 時 ま C CS の) 
DUMMY OCCURS 6 TIMES. 2 HH(6,7 ) FIXED BINARY (15,0): 
03 H OCCURS 7 TIMES USAGE COMP 
PIC S?999. 


図 17. 3 CO BOL お よび PL グ [ に お な ける デー タ 集 合体 の 宣 


下 


PL/I と COBOL の 場合 に くら べ る と , FORTRAN の 場 元 の 配列 また は 多 次 元 の 配列 を P エ IT の 引数 と し て 用 いる と き は , 
合 , デー タ 集 合体 は 配列 し か を い の で , PL/I と FORTRAN 問題 が 起こ る 。 
(を け る 同等 の デー タ 集 合体 の 指定 は , 簡単 で ある 。 不 連 続 の 単 次 
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FORTRAN 


INTEGER ネ 2 
INTEGER ネ 4 


REAL キ ネ 4 


ALTIGNED |UNALIGNED 


2 ペー ジル REAL FIXED BINARY(15 ) バイ ト 
フル ワー ド REAL FIXED BINARY(31) ズバ 


フル ワー ド REAL FLOAT DEC(6) 


(実数 短 精 度 浮動 小数 ) 


REAL ネ 8 


タダ プル ワー ド REAL FLOAT DEC(16) 


(実数 長 精度 浮動 小数 ) 


COMPLEX*8 フル ワー ド 


COMPLEX FLOAT DEC(6 ) 


(複素 数 短 精 度 浮動 小数 ) 


COMPLEX 玉 16 ダブ プル ワー ド 


COMPLEX FLOAT DEC(16) 


( 複素 数 長 精度 河 動 小数 ) 


LOGICAL キ 1 2 BIT(8) 


LOGICAL* ネ 4 バイ ト BIT(32) 


1 一般 (C, FORTRAN の デー タ は , と の よう な 境界 合せ を し て 主 記憶 域 に 入れ られ る 。 し か し , COMMON 
デー タ は , つね に バイ ト の 境界 に 合わ せら れる 。 COMMON 域 の 項目 が , 厳密 性 が 段々 少 を く を っ て ゆく 順 
K 貯 々 られ て いな いと き は , 上 記 の と と か ら 指 定 割 込み が 起こ と る と と が ある 。 


2UJNALIGNED の ビッ ト ・ ス トリ ング 必要 な 境界 合せ は , バイ ト で を な く ビ ッ ト で ある と いう と と が , 
PL/ ノ IFEORTRAN の デー タ 交 換 と 影響 する と と は な い 。 と れ は , FORTRAN の スト リン グ が つね 
(て, バイ ト の 整数 倍 に な る た めで ある 。 


図 17. 4 FORTR AN 一 PL 上 LT の デー タ の 対応 


一 般 C, PL プ I と FORTRAN の 間 で 引数 を 渡す と き , 言語 
間 機 能 は , 単 次 元 の 配列 を 呼出 し プロ シー ジャ ーK 直 接 渡し , 見 か 
け 引 数 を 作ら を たい 。 し か し , 不 連 続 の 記憶 域 に ある PL/1 の 単 次 
元 の 配列 が 引数 と し て FORTRAN ルー チン KK 渡さ れる と き は , 
言語 間 機 能 は 見 か け 引 数 を 作り , と の 中 不 連 続 の 配列 を マッ プ す 
る 。 そ の あと で , 見 か け 引 | 数 が 引数 と し て 渡さ れる 。 戻る と き C は , 
見 か け 引 数 の 中 の 値 が , 配列 の 中 の 対応 する 要素 (C 割 り 当 て られ る 。 


PL プ 1 と FORTRAN ルー チン の 間 で 渡さ れる 多 次 元 の 配列 


の 場合 は , NOMAP ォ プシ ョ ン が 指定 され て いな を い 限 り , つね 
見 か け 引 数 が 作ら れる 。 


PL プ I の ビッ ト ・ ス トリ ング 配列 を , FORTRAN ルー チン 
引数 と し て 渡す 場合 は , スト リン グ の 長 さ と し て 8 また は 3 2 し か 
指定 し て は なら な い 。 それ 以外 の 値 を 指定 する と , 警告 メッ セー ジ 
が 出さ れ , 配列 の マッ プ の 作り 直し は 自動 的 に 行なわ れ を く を な る 。 
同様 K く , FORTRAN 変 数 と 共通 の 記憶 域 を も る つ PL{ 変数 の 場 
合 も , スト リン グ の 値 と し て 指定 で きる の は , 8 か 3 2 だ け で ある 。 
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AA 節 : P 上 ノ 1 の 構文 表記 法 


本 書 に な いて は , PL プ 1I の ステ ー ト メン ト ま た は 有 要素 の 他 の 組合 
せ に つい て 説明 する 場合 。 つ ね と , 所 定 の 表記 法 (に も と づい て その 
ステ ー ト メン ト な いし 要素 の 組合 せ の 書き 方 を 図示 し て ある 。 


と の 表記 法 は , どの プロ グラ ミン グ 言 語 の 構文 法 を いし 構造 を 図 
示す る 場合 に も 使用 する と と の で きる 標準 化 さ れ た 表記 法 で あり , 
と の 表記 法 が PL/1 の 一 部 を 成 し て いる わけ で は な い 。 と の 表記 
法 の も と で は , ある 言語 で 使用 で きる 一 般 的 な 表現 様式 が , 簡単 で 
は あろ る が 正確 C 示 され る 。 た だ し , と の 表記 法 は 単 C 言 語 の 諸 要素 
の 構造 を 説明 す る た め の も の で あり , と れ ら 諸 要素 の 意味 を 説明 す 
る た め の も の で は な い 。 具体 的 に は , 言語 の 諸 要 素 の 記入 順序 , 所 
要 の 名 読 記号 , 指定 可能 な オプション が と の 表記 法 の も と で 示さ れ 
る 。 


以下 の 諸 規則 は と の 表記 法 の 利用 方 法 を 説明 する た め の も の で あ 
る 。 と これ ら の 規則 は すべ て の プロ グラ ミン グ 言 語 C に つい て 共通 で あ 
る 。 た だ し , と と で 取り 上 げ て ある 例 は , PL/I の 例 だ け で ある 。 


1 表記 法 変数 は ,。 プロ グラ ミン グ 言 語 を 構成 し て いる 諸 要 素 
の ある 一 般 的 を 種別 を 表わす た め の 名 前 で ある 。 表記 法 変 
数 は , 

a. 邦 字 , 英字 の 小文字 , 1 0 進数 字 , お よび ハイ フン 
で 構成 され , し か も 文字 で 始ま っ て い を な けれ ば な を な ら 
を な い 。 


b. 邦 字 また は 英 字 の 小娘 字 と 英字 の 大 文字 と の 組合 せ 
(C よ っ て 構成 され て い を けれ ば を ら な たい 。 と の 場合 , 
邦 字 また は 英字 の 小文字 だ け か ら 成 る 部 分 と 英字 の 
大 文字 だ け か ら 成 る 部 分 と が 1 つ ず つ あ り , し か も 
と の 2 つの 部 分 が ハイ フン で つ を が れ て いな けれ ば 
なら な い 。 


本 書 に な いて は , と の よう な 変数 は すべ て , 上 述 の 表記 法 
(C も と づい て と れ を 定義 し て ある か , ある い は 意味 の 上 か 
ら と れ ら の 変数 が 表記 法 変数 で ある と わか る よ ょ うな 形 で 定 
義 S き れ て いる 。 た と えば , 


(1) 数 字 。 こ れ は , 0 か ら 9 ま で の 間 の , ある 1 
つの 数 字 を と の 場所 に 記入 する と と を 示し て 
いる 。 

(2) ファ イル 式 。 とれ は , ある ファ イル へ の 参 昭 
を と の 場所 に 記入 する とこ と を 示し て いる 。 


(3) DO ステー トメ ント 。 これ は , と の 場所 と 
DO ステー トメ ント を 記入 する と と を 示し て 
いる 。 英字 の 大 文字 は 言語 の キー ワー ド を 表 
わし て いる 。 


表記 法定 数 は , 図示 され て いる 訪 字 を 図示 され て いる 通り 


て と 記入 する と と を 示す た め の も の で ある 。 表記 法定 数 は 英 
字 の 大 文字 だ け , ある い は ある 1 つの 特殊 文字 に よっ て 構 
成 さ れる 。 た と え げ , 


DECLARE 識別 名 FIXED: 


と れ は , 図示 され て いる 通り CDECLARE と 記入 し , そ 
の 後 C 表 記法 変数 「 識 別名 ] を 記入 し , 次 いで 図示 され て 
いる 通り (CF IXED と 記入 し , さら に その後 (と 図 示さ れ て 
いる 通り の 特殊 文字 ( モミ コロ ン , : ) を 記入 する と と を 
示し て いる ( 表記 法 変数 「 識 別名 」 は ど と か 別 の 場所 で 定 
義 さ れる )。 


以下 の 規則 の 中 に は 「 構 文 上 の 単位 ] と 言 ら 用語 が 出 て 来 
る 。 と の 用 語 は 次 の いずれ か 一 方 を 表わし て いる 。 


a. ある 1 つの 表記 法 変数 また は 表記 法定 数 。 

b . 表記 法 変数 , 表記 法定 数 , 言語 の 構文 表示 記号 , お よ 
び キー ワー ド の 任意 の 集 り を 中 括弧 また は 大 括弧 で く 
くっ た も の 。 


中 括弧 [ ) は , 2 つ 以 上 の 要素 が 構文 上 の 単位 を 成 し て い 
る と と を 示す た め の も の で ある 。 た と える ゆ ぴ , 


F IXED 
衣 互 
2 UsLOAT リ 


構文 上 の 単位 が た て 積み 重ね られ て いる 場合 に は , これ 
ら の 中 の いずれ か 1 つ を 選ば を けれ ば な を ならない 。 し た が っ 
て , 上 の 例 は , 「 議 別名 」 と 言う 変数 の 和俊 (CFIXED ま * 
た は FLOAT の どちら か を 記入 し を けれ ば なら を いこ と と 
を 示し て いる 。 


縦 線 | は , ある 選択 を 行なう ら り べ き と こと を 示す た め の $ 
の で ある 。 た と え ぱ げ , 


識別 名 {FIXEDIFLOAT」 


と の 例 は 上 の 例 と 同じ 意味 を 表わし て いる 。 本 書 (C な いて 
は , 選択 項目 を 示す の (てこ と の 双方 の 表記 方 法 が 使わ れん て いる 。 


大 括弧 [ 〕 は オォ オプション を 示す た め の も の で ある 。 大 括 
弧 で くく られ て いる 項目 に関し て は , と の 項目 を 1 つ 記 入 
し て も よい し, と の 項目 を 記入 し を な く て も よい 。 な お , と 
れ 以 外 K, ある 構文 上 の 単位 を 他 と 区 別 す る た め 大 括弧 
を 使 ら ど と も で きる 。 た だ たとえば, 
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({[ 下限 : ] 上 限 }」*) 


と の 例 は , 星 印 ある い は 変数 「 上 限 ]」 を 記入 すべ き と と を 
示し て いる が , 両方 と も 記入 する と と は で き な い 。「 上 限 | 
を 記入 する 場合 に は , 必要 に 応 し て, 変数 「 下 限 」 と 特殊 
文字 コロ ン と か ら 成 る 構文 上 の 単位 を 変数 「 上 限 」 の 前 
記入 する と と が で きる 。 


3 つの 点 ・. ・ は , その 直前 に ある 構文 上 の 単位 を 1 つ 以 
上 続け て 記入 し て も よい と と を 示す た め の も の で ある 。 た 
の 

〔 数字) .. . 


変数 「 数 字 ] は 大 括弧 で くく られ て いる か ら , と れ は 記入 
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し て も し を く て も よい 。 と れ を 記入 する 場合 に は , 2 つつ 以 
上 続け て 記入 する と と も で きる 。 


下線 は , 言語 の 要素 と 表記 法 の 要素 と を 混同 する 恐れ が あ 
る 場合 に と の 要素 が 言語 の 要素 で ある と と を 示す を ため の も 
の で ある 。 た と えば ぱげ ば, 


と ンク 本 ラン オン 


これ は , 2 つの 変数 「 オ ペラ ンド 」 の 間 (C「 ぉ よび 」(&) 
また は 「 ま た は ] (| ) を 記入 すべ き と と を 示し て いる 。 演 
算 子 1 の 下線 は , これ が PL1 言語 の 「 ま た は 」 を 表わす 
記号 で あり , 表記 法 の 「 ま た は ] を 表わす 記号 で を いと と を 
示し て いる 。 


B 節 : 文字 セッ ト お よび その EBCDIC と カー ド 容 孔 コ ー ド 


6O 一 文字 セッ ト 


文 


っ ツ | まこ NN! コー ンー※@ の ゃ ー キ ーー 人 ハ ・N 


- ざ 葵 … 


oo へ ひ の よ た の いら いい 記 で の の どら で の 避 ほ ビビ 拓 ご ロロ の 己 回 の の pl 


Ni 


ヾ 
N 


ーー 2 
ト う 
| 


よー ーー 
| 


1 1 1 


1 
| の ひ の ょ oo 人 … 


ト 中 に 中 に に 


| ユー ユーー ユ ーーー ユ ーーーNQSNSNSNFRONOFSDOD5 
| 


の ユ ス ユー ユーーーーーーーーーーー ーーーーーーl の の の i の の どの OO どの の の ーーーーー 
| | 
ooo ヽ ひい ひ の ょ GOD 1 


1 1 1 


| 


^S の OS へ いひ の モ の いい ーー の の の の の どら の 


カー ド 密 コー ド 


CO 


^O ONJ ひ OO 喘い いい ーー トム ら ON ひ QNO ーー ヘン ーー て ーーー ハーバ 


0100 
0100 
0100 
0100 
0100 
0100 
0101 
0101 
0101 
0101 
0101 
0101 
0110 
0110 
0110 
0110 


〇 
ー ト 
ー ト 
〇 つ 


て ON てく) や ここ ここ ふふふ ここ ぴこ へ こさ へ ささ ホ ユ ユ ユー ペー ホー トーーーーーーーーーーーー ご ご の の の の 
へ て くく NN くい へ いい さっ スス いい スス っ トペ トペ っ いら 〇 の OO の の ロロ の の どら の の の の の の の ーー ーーーーー デ ー 
ユ ユ ユ っ ム ユ ス ユー ユ ユ ユ トロ ロウ ロウ ユーーーーーーーー ご ご ご どの の ご の ーーーーー ご ロロ 


スス NN よー トス ペスト くっ つい いさ - っ ペペ ホス ペペ ホー トペ トペ ホー ペー ペーー ペ ーーーーーーーーーーーーー-ーーーーーー ご ご 


8- ビ ッ ト EBCDIC 


コー ド 


0000 
1011 
1100 
110 1 
1110D 
111 1 
0000 
1011 
1100 
1101 
1110 
1111 
0000 
0001 
1011 
1100 
1101 
1110 


1 
0 
0 
1 
1 


ホビ ーー 〇 どー つ 


1 
1 
1 
0 
0 
1110 
0001 
0010 
0011 
0100 
0101 
0110 
0111 
1000 
1001 
0001 
0010 
0011 
0100 
0101 
0110 
0111 
1000 
1001 
0010 
001 1 
0100 
0101 
0110 
0111 
1000 
1001 
0000 
0001 
0010 
0011 
0100 
0101 
0110 
0111 
1000 
1001 


ぐ = 12 一 8 一 4 86( 12-8 一 6 , 8 一 3 ) 
11 1 2 一 8 一 7, 12-8-7 (NA ) 
玉 米 11 一 8 一 4, 11 一 8 一 4 
に 1 1 一 8 一 7, 12-8 一 4 (NA) 
2 1 1 一 8-7, 0-8-6(NA ) 
= 1 1 一 8 一 7, 8-6(NA) 
デ 0 一 8 一 6 , 8 一 6 ( 8 一 6 , 83 ) 
ノ ギ 0 一 1 11-8-4 
ポジ 11-8-4, 0D-1 
ー ジ 11, 0-8-6(11,8-6 ) 


括弧 で くく られ て いる ヵ カー ド 容 也 コー ド は , 対応 する EBCDIC 
コー ド と は 異な る 形 を も つ BCDIC コ ー ド で ある 。 


NA は , BCDIC で は と の 廊 字 を 表現 する と と が で き な い こと と 
を 示し て いる 。 BCD コン バイ ラー・ オ プシ ョ ン を 指定 し て ある 場 
合 《C 限 り , PL 原始 プロ グラ ム の 中 で BCDIC コー ド を 使用 
する と と が で きる 。 と と C は , BCDIC 8 ビッ ト ・ ュ コー ド は 示さ 
れ て いな い 。 と いら の は , BCD オプ ショ ン が 指定 され て いる 場合 , 
原始 プア ログ ラム の 中 の BCDIC コー ド は すべ て コン パイ ラー に と よ 
っ て BEBCDIC 変換 され る か ら で あ る 。 


PL/I 60 一 文字 セッ ト の 中 に は , BCDIC で 表現 する と 
と が で き な い 文字 が 含ま れ て いる 。 し か し , 4 8 一 文字 セット の 場 
合 は ,。 すべ て の 文字 を BCD 1IC で 表現 する と と が で きる (次 ペー 
ジ を 参照 され た い ) 。 し た が っ て , BCD ォ プシ ョ ン と 共 C4 8 一 
文字 セッ ト ・ オ プシ ョ ン を 指定 すれ ば , PL ノ I の すべ て の 操作 を 
実行 する と と が で きる 。 
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人 48 一 文字 セッ ト 複合 記号 カー ド 容 下 コード (90- 談 字 モ ッ ト の 


12 5 
11 一 3。 12-5 ぐ = 
文 字 カー ド 冠 孔 コ ー ト 8 ビッ ト EBCDIC CAT 12ー う る 。 121 0-3 1 1 
玉 玉 11 一 8 一 4。 11-8-4 玉 玉 
ジラ ング 無 空 孔 0100 0000 NL 1 テ 5。 イイ 1 ご る 3 ュ っ く 
・ 12 一 8 一 3 0100 1011 NG 11 一 5, 12-7 コク 
( 12-8ー5 (0-8 一 4 ) 0100 1101 NE 1ー5、。 12=5 コー 
二 _12-8-6( 12 ) 0100 1110 メン Uies1。 2054 % 
$ 11 一 8 一 3 0D101 1011 >・ 守る 、 リク グー8 ニ 5 5 
玉 1 1 一 8 一 4 0101 1100 AND ラル 1 ああ 。 124 と 
) 11 一 8-5(12--8-4 ) 0101 1101 GE 2 7 当 必 si ジテ 
時 1 1 0110 0000 GT 1 ん 1 に か 
2 0- 1 0110 0001 LT よ 洲 る 還る 
6 0D-8ー3 0D110 1011 NO 1 1 一 5, 11 一 6 0 一 3 コ 
8 一 5 ( 8-4 ) Df 和 11 1101 OR Le6 下 邊 ダ | 
三 8 一 6 ( 83 ) 0111 1110 と U 泊 。 洲 も テ き 4 グ 玉 
A | 1100 DO0DU1 まま 11 一 8 一 4 0 一 1 キキ 
B 人 2 の 1100 0010 PT トラ 9 2 
C の ォ 5 1100 0011 
D 12 一 4 1100 0100 
E の 1100 0101 注 ・ 48 一 廊 字 モッ ト を 使用 する 場合 に は , 以下 の 諸 規 則 を 守ら 
F 12 一 6 1100 0110 
G 1 2 一 7 1100 0111 を けれ ば な を ら な い 。 
H 12-8 1100 1000 
人 RE 1 コロ ン を 表わす た め ( に ビリ オド を 2 っ つ 記 入 す る 場合 。 と の 
人 K 11-2 1101 0010 2 つの ビリ オド の 直前 の 文字 が ピリ オド で ある と き は と の 
RS 放 計 NM ビリ オド と 後 の ビ リオ ド と の 間 (C ブ プラ ンク を 1 つ 挿 入 し な 
N 1 1 一 5 1101 0101 けれ ば を ら な いじ 。 
O 11-6 1101 0D110 
6 放 0 2. ペー ャ ント 記号 を 表わす た め C ス ラッ シュ を 2 っ 記入 する 
R 1 1 一 9 1101 1001 場合 , その 直前 また は 直後 の 文字 が 星 印 で ある と き は その 
時 の スラ ッシュ と 星 印 と の 間 (C プ ラン ク を 1 つ 挿 入 し な けれ ば 
U 0-4 1110 0100 ならない 。 
V 0D-5 1110 0101 
2 1 3 上 示し た よう に コン マ と ピリ オド を 続け て 記入 する と. 
Y 0-8 1110 1000 と これ は セミ コロ ン を 表わす と と (て な る 。 た だ し , 注釈 , 文 
0 0 1111 OnDn 字 ス トリ ング , また は ピクチャー 指定 の 中 で コン < と ピリ 
1 1 1111 00D1 ォ ド が 続け て 記入 され て いる と き , また は , コン ママ と ビリ 
2 2 1111 0010 オド の 直人 後に 数 字 が ある 場合 は , これ は セミ コロ ン を 玩 わ 
3 3 信 弟 信和 友人 和 4 さ な い 
4 4 1 や キイ 1 0100 の 
5 5 1 詩人 1 PO1 
5 5 0 4。。 コン ペイ レー ショ ン の 際 c, 4 8 文字 モッ ト を 指定 する 
8 8 1111 100D た め の コ ン バ ペイ ラー・ オ プシ ョ ン が 含ま れ て いて も , 6 0 
9 9 1111 1001 ー 文 字 モ ッ ト の 記号 を 4 8 一 文字 セッ ト の 記号 と 自由 人 C 混 
ぜ て 使用 する と と が で き , コン バイ ラー は 6 0 文字 セッ 
ト の 記号 を 有効 を 入力 と し て 受け 入れ る 。 
5。 4 8 一 文字 セッ ト の 「 予 約 ] 語 ( た と を ば , GT , LE, 
括 紀 で くく られ て いる ヵ ー ド 宰 了 コ ー ド は , 対応 する EBCDIC CAT ) の 直前 な よび 直後 は プラ ンク また は 注釈 を 置か 
コー ド と は 凌 を る 形 を も つ BCDIC コ ー ド で ある 。 BCD コン ベ を な けれ ば ならない 。 と の 規則 を 守ら を いと, コン バイ ラー 
イラ ー・ オ プシ ョ ン を 指定 し て ある 場合 (限り , PL ン 1 原始 アロ が と れ を ど とら 解 釈 する か 予知 する と と が で きず , し た が っ 
グラ ム の 中 で BCDIC コー ド を 使用 する と と が で きる 。 と と は て コン バイ ラー と ょ る 解釈 が ーー ザー の 意図 と 合致 し ない 
BCDTC 8 ビッ ト ・ コ ー ド は 示さ れ て い を い 。 と いう の は , と と も ある 。 
BCD オプ ショ ン が 指定 され て いる 場合 , 原始 アロ グラ ム の 中 の 
BCDIC コー ド は すべ て コン ペイ ラー て よっ て EBCDIC 変 4 8 娘 字 モッ ト の 予約 語 の 一 部 また は 全体 を 含ん で いる レ 
換 さ れる か ら で あ る 。 コー ド は , その 長 さ が 3 文字 以上 で を けれ ば な ら な い 。 
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C 節 : キー ワー ド と その 省 略 形 


キー ワー ド 


A[ (w)〕 
ABS(x) 

ACOS(x ) 

%ACTIVATE 

ADD ( x,, xs , xs [ ,x4 〕 ) 
ADDBUFF(n) 

ADDR (x ) 

ALTIGNED 

ALL(zx) 

ALLOCATE 
ALLOCATION(x ) 
ANY(x) 

AREPA 

AREA〔( サ イズ)〕 

ARGn 

ASC1I 1 

ASIN(x) 

ASSEMBLER 
ASSOCI ATE ( ファ イル 名 ) 
ATAN( x」[ , x。 〕 ) 
ATAND( xi [Xsz ] ) 
ATANH(x ) 

AUTOMATIC 

B〔(w)〕 

BACKWARDS 
BASED〔( ロ ター ター 式 ) 〕 
BEGIN 

BINARY 

BINARY ( x」〔,x。 〔, xs〕 〕 ) 
BIT[ ( 長 さ )〕 

BIT(x, [,x。 ] ) 

BLKS 1ZE (ブロ ッ ク ・ サ イズ ) 
BOOL (x」 , x。 , xs ) 
BUFFERED 
BUFFERS( { 
BUFOFEF( (n 
BUILTIN 
BY 

BY NAME 

C ( 実数 形式 項目 〔 , 実数 形式 項目 〕 ) 
CALL 

CEIL(x) 

CHAR ( x」 [, x。 〕 ) 
CHARACTER ( 長 さ )〕 
CHECK〔 (名 前 の リス ト ) 
CLOSE 

COBOL 


人 の ずり 
)) 


和 


COLBIN 
COLUMN(n ) 
COMPLETION(x) 
COMPLE 共 
COMPLEX( x」 ,xz ) 
CONDIT ION 
CONDI TION( 名 前 ) 
CONJG(x ) 
CONNECTED 
CONSECUT IVE 
CONTROLLED 
CONVERSION 


%ACT 


ASM 


AUTO 


BIN 


BIN(x」〔,x。 〔[, xs]]) 


BUF 


CHAR( ( 長 さ ) 〕) 


COND( 名 前 ) 
CONN 


CTL 
CONV 


用 途 


形式 項目 

組込み 関数 

組込み 関数 

グリ ジロ セッ カー バス デー ト テ ント 
組 込 人 関数 

ENV IRONMENT 属性 の オプ ショ ン 
組込み 関数 

境界 合せ の 属性 

組込み 関数 


OPTIONS オプ ショ ング 属性 の オプ ショ ン 
ENV IRONMENT 属性 の オプ ショ ン 
組込み 関数 

OPTIONS 属性 の オプ ショ ン 

ENV IRONMENT 属性 の オプ ショ ン 
組込み 関数 

組込み 関数 

組込み 関数 

記憶 域 ク ラス の 属性 

形式 項目 

ファ イル の 属性 

記憶 域 ク ラス の 属性 

ベジ リマ ドン ント 

算術 デー タ 必 性 

組込み 関数 

スト リン グ 属 性 

組込み 関数 

ENVIRONMENT 属性 の オプ ショ ン 
組込み 関数 

ラファ イル 必 人 性 
ENVIRONMENT 属性 の オプ ショ ン 
ENV IRONMENT 属性 の オプ ショ ン 
入口 名 の 属性 

DO ステ ー ト メン ト の オプ ショ ン 
割当 て ステ ー ト メン ト の オプ ブ ション 
形式 項目 

ステ ー ト メン ト ま た は 1INITTI AL 属性 の オプ ショ ン 
組込み 関数 

組込み 関数 

スト リン グ 属 人 性 

条件 , 条件 接頭 語 


ステ ー ト メン ト 


ENV IRONMENT 属性 また は OPTIONS オプ ショ ン ノ 属性 の 


オプ ショ ン 

ENV I RONMENT 属性 の オプ ショ ン 
形式 項目 

組込み 関数 , 撰 似 変数 
デー タ の 属性 
組込み 関数 , 擬似 変数 

属性 

条件 

組込み 関数 

記憶 域 属 性 

ENVIRONMENT 属性 の オプ ショ ン 
記憶 域 ク ラス 属性 

条件 , 条件 接頭 語 
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キー ルード 


COPY〔 (ファ イル 式 ) 〕 
COS(x) 

COSD(x ) 
COSH(x) 

COUNT ( ファ イル 式 ) 
CTLASA 

CTL360 

D 

DATA 
DATAFTELD 
DATE 

DB 

%DEACTIVATE 
DEC IMAL 


DEC IMAL (x,」 [ , xs [,xs 〕 〕 ) 


DECLARE 
%DECLARE 
DEFAULT 

DEF TINED 
DELAY(n ) 
DELETE 
DESCRIPTORS 
DIM( x」 ) 区 2 ) 
DIRECT 
DISPLAY 


DIVIDE (x」 , xz , xs [xs] ) 


DO 

%DO 

EK(, d[,s〕 ) 

EDIT 

ELSE 

%ELSE 

EMPTY 

END 

%END 
ENDFEILE ( ファ イル 式 ) 
ENDPAGE (ファ イル 式 ) 
ENTRY 

ENV I RONMENT 
ERF(x) 

ERFC(x ) 

ERROR 

EVENT 


EXP ( x ) 
EXTENTNUMBER(n ) 
EXTERNAL 

F(w[ , d〔,s〕 〕) 

F 

FB 

FILE 

FILE (ファ イル 式 ) 
FINISH 

FIXED 
FIXED( x」[ ,xz [ , xs 〕 〕 ) 
FIXEDOVERFLOW 
FLOAT 
FLOAT(x, 〔, x。 ] ) 
FLOOR( x ) 

FORMAT (形式 リス ト ) 
FORTRAN 

FREE 

FROM ( 変数 ) 
FUNCTION 
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%DEACT 

DEC 

DEC(xr」 xs 〔 xs 〕 〕) 
DCL 

%DCL 

DFT 

DEF 


ENV 


EXT 


FOfL 


用 途 


GET ステ ー ト メン ト の オォ オプション 

組込み 関数 

組込み 関数 

組込み 関数 

組込み 関数 

ENVIRONMENT 属性 の オプ ショ ン 
ENVIRONMENT 属性 の オプ ショ ン 
ENV IRONMENT 属性 の オプ ショ ン 
GET ま た は PUT ス テー トメ ント の オプ ショ ン 
組込み 関数 

組込み 関数 

ENVIRONMENT 属性 の オォ オプション 
プリ プロ セッ サー・ ス テー トメ ント 
算術 デー タ 属 性 

組込み 関 数 

スネ ステー トメ シト 

プリ プロ セッ サー・ ス テー トメ ント 
ステ ー ト メン ト 

記憶 域 属 性 

ステ ー ト メン ト 

ステ ー ト メン ト 
DEEFEAULT ス テー トメ ント の オプ ショ ン 
組込み 関数 

ファ イル 本 性 

スジ デー トド トメ ンド 

組込み 関数 

ステ ー ト メン ト , GET また は PUT ス テー トメ ント の 繰 返 し 指定 
プリ プロ セッ サー・ ス テー トメ ント 

形式 項目 

GET ま を た は PUT ス テー トメ ント の オプ ショ ン 
IF ステ ー ト メン ト の クロ ー ズ 

%IF ス テー トメ ント の クロ ー ズ 

組込み 関数 

ステ ー ト メン ト 

グリ プロ セッ サー ホテ デ テー ド ト メ シン シト 

条件 

条件 

属性 また は ステ ー ト メン ト 

ファ イル の 属性 また は CLOSD ステ ー ト メン ト の オプ ショ ン 
組込み 関数 

組 込 信 関数 

条件 

READ, WRITE, REWRTITE, DELETE, DISPLAY 
ステ ー ト メン ト の オォ オプション, 属性 
組込み 関数 

ENVIRONMENT 属性 の オプ ショ ン 
有効 範囲 の 属性 

形式 項目 

ENVIRONMENT 属性 の オプ ショ ン 
ENV IRONMENT 属性 の オプ ショ ン 
属性 

入出 力 ス テー トメ ント の オォ オプション 
条件 

算術 デー タ 属 人 性 

組 込 関 数 

条件 , 条件 接頭 語 

算術 デー タ 属 人 性 

組込み 関数 

組込み 関数 

ステ デ ー ド トメ シド 

OPT IONS ォ プシ ョ ング 属性 の オプ ンション 
ステ ー ト メン ト 

WRITE また は REWRITEE ス テー トメ ント の オプ ショ ン 
ENVIRONMENT 属性 の オプ ショ ン 


キー ワー ド 省略 


GENER ITC 

GENKEY 

GET 

GO TO GOTO 
%GO TO %GOTO 
HBOUND (x,」 , xz ) 

HIGH(x) 

HIGHINDEX 

IF 

%TF 

IGNORE(n ) 

IMAG( x ) 

IN( ェ リア 変数 ) 

%INCLUDE 

INDEX(x」 , x。 ) 
INDEXAREA (索引 域 の サイ ズ ) 
INDEXD 

INDEXMULTI PLE 

TNITIAL TNIT 
INPUT 

INTER 

TINTERNAL [NT 
INTO (変数 ) 

KEY ( ファ イル 式 ) 

KEY(x) 

KEYED 

KEYFROM( x ) 
KEYLENGTH(n ) 
KEYLOC(n ) 

KEYTO (変数 ) 

LABEL 

LENGTH(x ) 
LBOUND( x」 , xz ) 

LEAVE 

LIKE 

LINE(n ) 

LINENO( x) 

LINESTIZE 

LIST 

LOCATE 

LOG( x ) 

LOG2(x) 

LOG10(x) 

LOW(x) 

MAIN 

MAX(x」, xs , ・, xn ) 
MEDTIUM 

MIN( xr, > XX2 > 人 30 

MOD( xx > 区 2 ) 

MULTIPLY (x」,xz, xs【[,x4 〕 ) 
NAME (ファ イメ 式 ) 
NOCHECK ( (名 前 の リス ト ) 〕 


NOCONVERSTION NOCONV 
NOFIXEDOVERFLOW NOFOFL 
NOLABEL 


NOMAP 〔 (引数 リス ト ) 〕 
NOMAPIN 〔 (引数 リス ト ) 〕 
NOMAPOUT 〔 (引数 リス ト ) 〕 


NOOVERFLOW NOOFL 
NORESCAN 

NOSIZ セ E 

NOSTRINGRANGE NOSTRG 
NOSTRINGSTZE NOSTRZ 
NOSUBSCRIPTRANGE NOSUBRG 


用 途 


入口 名 の 属性 

ENV IRONMENT 属性 の オプ ショ ン 

ステ ー ト メン ト 

ステ ー ト メン ト 

プリ プロ セッ サー・ ス テー トメ ント 

組込み 関数 

組込み 関数 

ENV I RONMENT 属性 の オプション 
ステ ー ト メン ト 

プリ プロ セッ サー・ ス テー トメ ント 

READ ス テー トメ ント の オォ オプション 
組込み 関数 擬似 変数 , 

ALLOCATE お よび FREDP ス テー トメ ント の オプ ショ ン 
グリ ジョモ セッ サーッ スズ ステー トメント 
組 込 信 関数 

ENV IRONMENT 属性 の オプ ショ ン 
ENVIRONMENT 属性 の オプ ショ ン 
ENV 1 RONMENT 属性 の オプ ショ ン 
記憶 域 属 性 

ファ イル の 属性 , OPEN ステ ー ト メン ト の オォ オプション 
OPTIONS オプ ショ ン ノ 属性 の オプ ショ ン 


有効 範囲 の 属性 

READ ス テー トメ ント の オプ ショ ン 

条件 

READ, DELETE, REWRTITEE ステ ー ト メン ト の オプ ショ ン 
ファ イル の 属性 


WRITE ステー トメ ント の オプ ショ ン 
ENV1I RONMENT 属性 の オプ ショ ン 
ENV 1I RONMENT 属性 の オプ ショ ン 
READ ス テー トメ ント の オプ ショ ン 


組込み 関数 

ENV IRONMENT 属性 の オプ ショ ン 
構造 の 属性 

形式 項目 , PUT ス テー トメ ント の オプ ショ ン 
組込み 関数 

OPEN ステ ー ト メン ト の オプ ショ ン 
GET また は PUT ス テー トメ ント の オプ ショ ン 
ステ ー ト メン ト 

組込み 関数 

組 込 関 数 

組込み 関数 

組込み 関数 
OPTIONS オプ ショ ン の オプ ショ ン 
組込み 関数 

ENV IRONMENT 属 性 の オプ ショ ン 
組込み 関数 

組込み 関数 

組込み 関数 

条件 

条件 接頭 語 

条件 接頭 語 

条件 接頭 語 

ENV 1 RONMENT 属性 の オプ ショ ン 
OPTIONS ォ オプション 属性 の オプ ショ ン 
OPTIONS ォ プシ ョ ング 属性 の オプ ショ ン 
OPTIONS オプション 属性 の オプ ショ ン 
条件 接頭 諸 

% ACTIVATE ス テー トメ ント の オプ ショ ン 
条件 接頭 語 

条件 接頭 語 

条件 接頭 語 

条件 接頭 語 


C 節 : キー ワー ド と その 省略 形 


> が っ 


キ デ ザ ゲー ドド 


NOTAPEMK 


NOUNDERELOW 
NOWRT TE 
NOZERODIVIDE 
NULL 

OFFSET( (エリ アブ 名) 〕 
OFFSET (x」, xz ) 
OFLTRACKS(n ) 
OMR 

ON 

ONCHAR 
ONCOUNT 
ONCODE 
ONE'TLE 

ONKEY 

ONLOC 
ONSOURCE 
OPEN 


OPTIONS ( オプ ショ ン の リス ト ) 


ORDER 

OUTPUT 
OVEREFLOW 

P ピクチャー 指定 
PAGE 

%PAGE 
PAGESIZE(w ) 
PASSWORD (合言葉 指定 ) 
PICTURE 
POINTER 
POINTER (xi, xs ) 
POLY ( x」 , xz ) 
POSITION ( 式 ) 
PRECISION ( xi 2 XzL Xs ) 
PRINT 
PROCEDURE 
%PROCEDURE 
PROD( x ) 

PUT 

R(x) 

RANGE 

RCE 

READ 

REAL 

REAL(x) 

RBCORD 

RECORD (ファ イル 式 ) 
RECS1ZE (レコ ュー ド の 長 さ ) 
RECURS IVE 
REENTRANT 
REFER 

REGIONAL ( {113)) 
REORDER 
REPBAT( xi ) 文 2 ) 
REPLY(c) 
RESCAN 

RETURN 

RETURNS (属性 の リス ト ) 
REVERT 

REWRITE 

ROUND ( 文 」 ヵ Xz ) 
SCALARVARY ING 
SEQUENT 1 AL 
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省略 形 


NOUFL 


NOZDIV 


OFL 


PTC 
PTR 
PTR( xi, xz ) 


POS ( 式 ) 
PRPC (xr 5 Xz 〔, Xs ] ) 


PROC 
%PROC 


SEQL 


・ 言 語 解 説 書 第 2 部 


用 途 


ENV IRONMENT 属性 の オプ ショ ン 

条件 接頭 語 

ENV 1 RONMENT 属性 の オプション 

条件 接頭 語 

組込み 関数 

ロケ ー タ ー の 属性 

組込み 関数 

ENV IRONMENT 属性 の オプ ショ ン 

ENVI RONMENT 属性 の オプ ショ ン 

ステ ー ト メン ト 

組 込 関 数 , 擬似 変数 

組込み 関数 

組込み 関数 

組 込 関 数 

組込み 関数 

組込み 関数 

組 込 関 数 , 擬似 変数 

ステ ー ト メン ト 

入口 名 の 属性 , PROCEDURE ぉ および ENTRY ス テー トメ ント の 
オプ ション 
PROCEDURE お よび BEGIN ステ ー ト メン ト の オプ ショ ン 
ファ イル 属性 , OPEN ステートメント の オプ ショ ン 
条件 , 条件 接頭 語 

形式 項目 

形式 項目 , PUT ステ ー ト メン ト の オプ ショ ン 
リス ティ ング 制御 ステ ー ト メン ト 

OPEN ステ ー ト メン ト の オプ ショ ン 
ENVIRONMENT 属性 の オプ ショ ン 


グリ テア 豆 ギ キッ サー ニャ ッ ス テー トメ ッ ト 1 
組 込 信 関 数 

ステ ー ト メン ト 

形式 項目 
DEFAULT ス テー トメ ント の オプ ショ ン 
ENVIRONMENT 属性 の オプ ショ ン 

ステ ー ト メン ト 

デー タ の 属性 

組込み 関数 , 擬似 変数 

ファイ ル 属 性 

条件 

ENV IRONMENT 属性 の オプ ショ ン 
PROCEDURE ス テー トメ ント の オプ ショ ン 
OPTIONS オプ ショ ン の オプ ショ ン 
BASED 属性 の オプ ショ ン 

ENVI RONMENT 属性 の オプ ショ ン 
PROCEDURE な よび BEGIN ス テー トメ ント の オプ ショ ン 
組込み 関数 
DISPLAY ス テー トメ ント の オォ オプション 
%ACTIVATE ステ ー ト メン ト の オプ ショ ン 
ステ ー ト メン ト 

入口 名 の 属性 , PROCEDURE ス テー トメ ント の オプ ショ ン 
ステ チー トメント 

ステ ツー ドド メジ ツ T ト 

組込み 関数 

ENV1I RONMENT 属性 の オプ ショ ン 

ファ イル の 属性 


寺 2 ド 省略 形 


SET (ロク ケータ ー 変 数 ) 

SIGN(x) 

SIGNAL 

SIN(x) 

SIND(x) 

SINH(x) 

SIZE 

SKIP[(n)〕 

%SKIP 

SNAP 

SQRT( x) 

STACKER(x) 

STATIC 

STATUS(x) 

STOP 

STRPAM 

STRING( x) 

STRING (スト リン グ 名 ) 

STRTINGRANGE STRG 

STRINGSTZE STR の 

iSUB 

SUBSCRIPTRANGE SUBRG 

SUBSTR(x」, xs[, xs] ) 

SUM( x ) 

SYSIN 

SYSPRINT 

SYSTEM 

TAN(x) 

TAND(x) 

TANH( x ) 

THEN 

%THEN 

TIME 

TITLE ( 要素 式 ) 

TO 

TRANSLATE (x」, xz(, xs]) 

TRANSMIT 

TRUNC(x ) 

U 

UNALIGNED UNAL 

UNBUFF ERED UNBUF' 

UNDEEFINEDE ILE UNDF 
( ファ イル 式 ) ( ファ イル 式 ) 

UNDERFLOW UEFL 

UNLOAD 

UNSPEC(x ) 

UPDATE 

V 

VALUE 

VARIABLE 

VARYING VAR 

VB 

VERTIFEY 

VERIFY(x」, x。 ) 

VS AM 

WAIT 

WHEN (総称 記述 子 の リス ト ) 

WHILE 

WRITE 

メ (w ) 

ZERODIVIDE ZDIV 


用 途 
ALLOCATE, LOCATE, READ ステ ー ト メン ト の オプ ショ ン 


組込み 関 数 

ステ ー ト メン ト 

組 込 関 数 

組込み 関数 

組込み 関数 

条件 , 条件 接頭 語 

形式 項目 , GET お よび PUT ステ ー ト メン ト の オプ ショ ン 
リス ト 和 制御 ス テー トメ ント 

ON ステ ー ト メン ト の オォ オプション 
組込み 関数 

ENV # RONMENT 属性 の オプ ショ ン 
記憶 域 ク ラス の 属性 

組 込 関 数 , 擬 似 変数 

Km ポス ジ ト 

ラファ イル の 属性 
組込み 関数 , 擬似 変数 

GET お よび PUT ス テー トメ ント の オプ ショ ン 
条件 , 条件 接頭 語 
条件 , 条件 接頭 語 

DEFINED 属性 の 見 か け 変 数 
条件 , 条件 接頭 語 
組込み 関数 , 擬似 変数 

組込み 関数 

シス テッ ュ 標 準 入 力 フ ァイル の 名 前 
シス テッ 標準 出力 ファ イル の 名 前 
ON また は DECLARE ステ ー ト メン ト の オプ ショ ン 
組込み 関数 

組込み 関数 

組込み 関数 

TIR ステー トメ ント の クロ ー ズ 
%IF ス テー トメ ント の クロ ー ズ 
組込み 関数 

OPEN ステ ー ト メン ト の オプ ショ ン 
DO ステ ー ト メン ト の オプ ショ ン 


組込み 関数 

ENV IRONMENT 属性 の オォ オプション 
境界 合せ の 属性 

ファ イル 属性 


条件 

条件 , 条件 接頭 語 

ENVIRONMENT 属性 の オプ ショ ン 
組込み 関 数 , 擬似 変数 

ファ イル の 属性 

ENV1IRONMENT 属性 の オプ ショ ン 
DEFAULT ス テー トメ ント の オプ ブ プション 
ファ イル , 入口 , また は ラベ ル ・ 変 数 識別 名 の 属性 
スト リン グ の 属性 

ENV IRONMENT 属性 の オプ ショ ン 
ENV1IRONMENT 属性 の オプ ショ ン 
組込み 関数 

ENVIRONMENT 属性 の オプ ショ ン 
ステ ー ト メン ト 

GENERIC 宣言 の 中 の オプ ショ ン 

DO ステ ー ト メン ト の オプ ショ ン 
ステ ー ト メン ト 

形式 項目 

条件 , 条件 接頭 語 
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D 節 : ピク チャ ー 指 定 用 の 文字 


ピク チャ ー 指 定 用 の 文字 は , PICTURE 属性 また は 編集 指示 人 
出力 の P 形 式 項目 の 中 で 使用 さき れる 。 と の いずれ で 用 い られ て いて 
も , ピク チャ ー 指 定 用 の 個々 の 文字 の 意味 (に 変り は を た い 。 ピク チャ 
ー 指定 の 概念 に つい て は , 「 第 1 3 章 : 編集 な よび スト リン グ の 
取扱 じ 」 を 参照 され た じ 。 


ピク チャ ー 文 字 は , 対応 する デー タ 項 目 の 属 性 に つい て 記述 する 
の 使用 され る ( と の デー タ 項 目 は , ある 変数 の 値 で あっ て も よい 
し , プログ ラム と 外部 記憶 装置 と の 間 で 転送 さん る デー タ 項 目 で あ 
ーー っ て も よい )。 


ピク チャ ー 指 定 は , つね K, 区 字 ス トリ ング ・ デ ー タ 項目 また は 


数 字 デ ー タ 項目 の 文字 表現 に つい て 記述 する の 用 いら れ る 。 区 


字 ス トリ ング ・ ピ クチ ャ ー 項 目 は , 英字 , 1 0 進数 字 , お よび プラ 
ンク か ら 成 る ピク チャ ー 項 目 で あ る 。 数 字 ビ ピクチャー 項目 は , そ 
の デー タ 部 分 が 1 0 進数 字 , 1 0 進 小数 点 , 文字 EE, お よび , 必要 
応じ て 使用 され る 正 ま た は 負 の 符号 か ら 成 る ビク チャ ー 項 目 で あ 
る 。 数 字 ピ クチ ャ ー 項 目 C な いて は , 算術 デー タ と 一 緒 C 使 用 
され る と と の 多い 他 の 文字 ( たとえ ば, 通貨 記号 ) も 指定 する と と 
が で きる 。 と れ ら の 文字 は , 数 字 変 数 の 数 字 と 一 緒 に 貯え られ , 
その 変数 の 文字 スト リン グ と し て の 値 の 一 部 を 成 し て いる と みな さ 
れる けれ ども る も, その 変数 の 算術 デー タ と し て の 値 の 一 部 を 成 し て い 
る と は みな され な いじ 。 文字 スト リン グ ・ ピ ビク チャー 項 目 お ょ よび 数 
字 ビ ピクチャ ー 項 目 の い ずれ 関し て も , 許容 され る 最大 の 文字 数 は 
1 0 2 3 で ある 。 また , 数 字 ビ クチ ャ ー 項目 に お いて 指定 する と 
と の で きる 数 字 の 桁 数 は , 最高 , 1 5 で ある 。 


数 字 変 数 に 割り 当て られ る 算術 デー タ は , 文字 表現 に 変換 され 
る 。 数 字 デ ー タ 項目 に 対 し て は 編集 ( で ロ 消去 や 文字 の 挿入 な ど ) 
を 指定 する と と が で きる が , 文字 スト リン グ ・ ピ クチ ャ ー・ デ ー タ 
対し て 編集 を 指定 する と と は で き な い 。 


数 字 ビ クチ ャ ー 指定 を つけ て 宣言 され て いる 変数 に 割 り 当 て ら 
れる デー タ ( また は , 数 字 ピ クチ ャ ー 形 式 項目 の も と で 書き 出さ 
れる デー タ ) は , 内 部 コー ド 化 算術 デー タ の 形 で ある か , コー ド 化 
算術 デー タ K 変 換 し 得る デー タ で を な けれ ば を た ら な い 。 し た が っ て , 
と の よう な 割当 て の 行 を われ る デー タ に は , 数 字 お ょ よび 必 要 K 応 じ 
て 1 0 進 小数 点 と 符号 し か 含め る と と が で き な い 。 編集 用 の 文字 

( た と えば , 通貨 記号 ) も これ 含め て は を ら な を ない 。 とれ 違反 す 
る と CONVERSION 条件 が 起 と る 。 


P 形 式 項目 を 用 いて 読み 取ら れる 数 字 デ ー タ は , その P 形 
式 項目 の 中 の 指定 ( 編集 用 の 文字 を 含む ) 合致 し て い を けれ ば な 
ら を な い 。P 形 式 項 目 (C な いて 指示 され て いる 文字 が 入力 の 流れ の 
中 (C を いと , CONVERSION 条件 が 起 と る 。 


文字 スト リン グ ・ ピ ビ ピクチャー 指定 を つけ て 宣言 され て いる 変数 に 


割り 当て られ る デー タ ( または, 文字 スト リン グ ・ ビ ピク チャ ー 形 式 
項目 の も と で 書き 出さ れる デー タ ) は , その ピクチャー 指定 と その 
1 字 1 字 が 一 致し て いな けれ ば を ら な い ( または, 各々 の 文字 が そ 
の ピクチャー 指定 に 変換 可能 で を けれ ば ぱ ば ならない ) 。 と れ 違 反 す 
る と , CONVERSION 条件 が 起 と る 。 


P 形 式 項目 を 用 いて 読み 取ら れる 文字 スト リン グ ・ デ ー タ は , 
その P 形式 項目 の 中 の 指定 合致 し て い を けれ ば を ら な を な い 。P 
形式 項目 の 中 で 指定 され て いる 文字 が 入力 の 流れ の 中 に を いと , 
CONVERSION 条件 が 起こ る 。 


と の 節 C 収 録 さ れ て いる いく つか の 図 は , ピク チャ ー 指 定 の 相違 
(て よって, ある ビク チャ ー 変 数 に 値 を 割り 当て る 際 , ある い は P 形 
式 項目 を 使っ て 値 を 印刷 す る 際 に , と れ ら の 値 の 表現 が どう 変っ て 
来る みか を 示す た め の も の で ある 。 各々 の 図 に は , デー タ の 当初 の 値 , 
割当 て 前 ( また は 書 出し 前 ) の 値 を 収容 し て いる 変数 の 属性 , ビク 
チャ ー 指 定 , な ふ よ び 数 字 を いし ビ ピクチャー 文字 スト リン グ 変 数 の 
文字 スト リン グ と し て の 値 が 示さ れ て いる 。 


文字 スト リン グ ・ デ ー タ の た め の ピクチャー 文字 
文字 スト リン グ ・ ピ ビク チャ ー 指 定 C お いて は , 次 の 3 種類 の ビク 
チャ ー 文 字 し か 使用 する と と が で き な い 。 
双 と れ は , 使用 し て いる 計算 機 が 判別 し 得る 内 部 的 を ビッ ト 構 
成 を も つ 任 意 の 文字 が , 対応 する 位置 に 入り 得る と と を 示す 


た め の ビ ピク チャ ー 文 字 で ある 。 


A と れ は , 対応 する 位置 に , 任意 の 英字 また は プラ ンク が 入り 
得る こと を 示す た め の ビ ピクチャ ー 文 字 で ある 。 


9 と れ は , 対応 する 位置 に , 任意 の 1 0 進数 字 ま た は プラ ンク 
が 入り 得る と と を 示す た め の ビ ピクチャ ー 文 字 で ある 。 


ある 1 つの 文字 スト リン グ ・ ピ ビ ピクチャー 指定 に は , A ま た は XX が 
少 を く と も 1 つ 含 まれ て いな けれ ば な ら な い 。 


D. 1 図 は , 文字 スト リン グ ・ ピ ビ ピクチャー 指定 の 例 を 示し た も の 
で ある 。 と の 図 の b と 言 2 文 字 は プラ ンク を 表わし て いる 。 割当 て 
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原 デ ー タ の 属性 


り の 2 
) 9 B/2L ! 
) 「9B グ 2L ! 
) 「ABCDE 
) 「ABCDE 
) 
) 
) 


CHARACTER(5) 
CHARACTER(5 
CHARACTER 
CHARACTER 


「ABCDE' 
ジリ 
02680/2 


CHARACTER 
CHARACTER 


( 
( 
CHARACTER( 
( 
( 
CHARACTER( 


5 
5 
5 
9 
5 
5 


原 デー タ 寺井 婦 字 ネス トリ ンク 値 ! 
( 定数 形式 ) 2 


駐 又 又 駐 2 B グ 2 し 
メメ 2 B グ 
XXXXXX 双 9B/2Lbb 
AAAAA ABCDE 
AAAAAA ABCDEb 
AAA ABC 
99X99 12 グ 3 4 
A99X9 L26. 7 


1 交 字 スト リン グ ・ ピ クチ ャ ー 指 定 に より 宣言 され て いる 変数 は 文字 スト リン グ 値 し か と ら な い 。 


図 D. 1 廊 字 スト リン グ ・ ビ ピクチャ ー 指 定 の 例 


は 左寄せ し て 行 な われ, 必要 MC 応 じ て 右 側 に プラ ンク が 補充 され る 
点 と 注意 され た い 。 


数 字 デ ー タ の た め の ピ クチ ャ ー 文 字 


数 字 デ ー タ は 数 値 を 表わし て いな けれ ば な を な ら な い 。 し た が っ て , 
数 字 デ ー タ と 対応 する ビク チャ ー 指 定 に は , 文字 広 や A が 含ま れ 
て いて は な ら な い 。 数 字 デ ー タ の た め の ピ ビ ピクチャー 文字 を 用 い て, 
その デー タ の 編集 を 詳細 と 指定 する こと と が で きる 。 


ある 1 つの 数 字 変数 は , その 用 途 に 応じ て, 次 の よう な 2 種類 
の 値 を も つと 考え る と と が で きる 。 


1 算術 値 
2. 文字 スト リン グ 値 


算術 値 と は , デー タ 項 目 の 1 0 進数 字 , 仮想 上 の 1 0 進 小数 点 の 
位置 , それ 場合 に よっ て 符号 , 〈 ょ っ て 表わさ れる 値 で ある 。 式 
の 計算 結果 が ュー ド 化 算術 形式 の 値 と を る よう な 式 (数 字 変数 が 
含ま れ て いる 場合 また は コー ド 化 算術 形式 の 変数 , 数 字 変 数 , 
な いし ビッ ト ・ ス トリ ング 変数 数 字 変 数 が 割り 当て られ る 場合 
(C て は , つね C, その 数 字 変 数 の 算術 値 が 使用 され る 。 と の よう な 
場合 に は , 数 字 変 数 の 算術 値 は 内 部 コー ド 化 算 術 形式 の 表現 C 変 
換 さ れる 。 


文字 スト リン グ 値 と は , デー タ 項 目 の 1 0 進数 字 を ら ぴ びに ピク チ 
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ャ ー 指 定 の 中 に ある すべ て の 編集 文字 を な よび 挿 入 文字 に よっ て 表 わ 
され る 値 で ある 。 た だ し , ピクチャー 文字 VC よっ て 指定 され る 仮 
想 上 の 小数 点 の 位置 は 文字 スト リン グ 値 て 何 の 影 響 $ 及 訂 さ を い 。 
文字 スト リン グ 式 の 演算 また は 文字 スト リン グ 変 数 へ の 割当 て と ぉ 
いて 数 文字 変数 が 使用 され て いる 場合 , リス ト 指 示 出 力 な いし デー 
タ 指示 出力 の も と で デー タ が 印刷 され る 場合 , または, 数 字 変 数 
に 重ね て 定義 され て いる 文字 スト リン グ 変 数 へ の 参照 が 行なわ れ る 
場合 に は , つね KC 数 字 変 数 の 文字 スト リン グ 値 が 使用 され る 。 と 
の ょ うな 場合 に は , デー タ の 変換 は 不要 で ある 。 


数 字 指 定 の た め の ビ ピク チャ ー 文 字 は , 次 の ょ うら 分 類する と と 
が で きる 。 


・ 数 字 指 定 文字 と 1 0 進 小数 点 指 定 文字 
・ 。 ぞ ロ 消 去 文 字 

・ 挿入 文字 

・ 符号 ・ 通 貨 記号 

・ 貸方 記号 , 借方 記号 , 上 重ね 宰 也 符号 
・ 指数 指定 文字 

・ スケ グー ル 央 数 


数 字 指定 は 1 つ 以 上 の フィ ー ル トド み か ら 構 成 さ れ て なり, 各々 の フィ ー 
ルド に お いて ある 1 つの 固定 小数 点数 が 表現 され る 。 し た が っ て , 
浮動 小数 点数 を 表わす 場合 に は , 小数 部 を 表わす た め の フ ィ ー ル ド 
と 指数 部 を 表わす た め の フィール ド が 1 つ ず つ 使 用 され る こと (て な る 。 


原 デ ー タ の 属性 


FIXED(5) 12345 
FIXED(5) 12345 
FIXED(5) 12345 
FIXED(5) 12345 
FIXED(7 ) 1234567 
FIXED(3) 123 
FIXED(5,2) 123.45 
FIXED(7 ,2) 12345 .67 
FIXED(5,2) 123.45 


ビク チャ ー 指 定 文字 スト リン タグ 値 


2 の 2 が 9 
292999V 
72799V292 
V9292929 
2929992 
2279992 
299V29 
2V?2 
29999 


算術 値 は 指定 の 中 の 数 字 と , V の 実際 の 位置 な た いし 仮想 位置 と C よ っ て 表わさ れる 値 で ある 。 
2 と の 場合 , PL ルン IT の も と で は 結果 は 不定 で ある ( 左端 の 方 の 有効 数 字 が 切り 捨て られ て いる た め )。 と と 示さ れ て いる 
結果 は シス テム 3 6 0 お よび シス テム ュ ブ 3 7 0 の も と で 得 ら れる も の で ある 。 SIZE 条件 が 解禁 状態 に あれ ば , と の 条件 
が 提起 され る 。 


図 D.2 数 字 ビ ピク チャ ー 指定 の 例 


ピクチャー 指定 文字 V が ある と , フィ ー ル ド は サ プ ブフ ィ ー ル ドド 分 
割 さ れる 。 あ る 指定 の 途中 (CV が ある と き は , と の V の 前 に ある 部 
分 と 後に ある 部 分 は , それ ぞ れ と の 指定 の サ プ フ ィ ー ル ド を 成 し て 
いる 。 


数 字 デ ー タ の ビク チャ ー 指 定 を 行なう に あたっ て 特に 注意 を 要 
する の は , 数 字 桁 を 指定 する た め の ビ ピクチャー 文字 が 各 フ ィ ー ル ド 
に と 少 を な く と も 1 つ は を けれ ば な ら な いと 言 ら 点 で ある 。 た だ し , と 
の ピク チャ ー 文 字 が 数 字 指定 文字 ? で ある 必要 は を い 。 と れ 以 外 の 
ビ ピクチャー 文字 , た と を ば , ゼロ 消去 文字 ( ク 2 また は また は Y ) 
を 使っ て , 数 字 桁 を 指定 する と と も で きる 。 あ る 1 つの 数 字 指定 
を 定義 せる に あたっ て は , と れ ら の 文字 を 少 を く と も 1 つ 使用 し を 
けれ ば な ら な い 。 


数 字 指 定 文字 と 1 〇 進 小数 点 指定 文字 
固定 小数 点 1 0 進数 値 を 表わす た め の 最 も 単純 を 形 の 数 字 指定 で 
は , ピク チャ ー 文 字 ? と V が 使用 され る 。 


2 こと れ は , デー タ 項 目 の 対応 する 格 (C 1 0 進数 字 が 入る と と を 指 
定 す る た め の ピクチャー 文字 で ある 。 


V と れ は , 対応 する デー タ 項 目 の 中 の と の 位置 (C 1 0 進 小数 点 が 


ある と 想定 する よら 指定 する ため の ピ クチ ャ ー 文 字 で ある 。 た 
だ し , と の 文字 は , 実際 の 1 0 進 小数 点 を 挿す る よ 2? 指定 す 
る た め の も の で は を な い 。 割り 当て られ た 値 の 整数 部 と 小数 部 分 
は , Y と いら 文字 に 揃え られ る 。 し た が っ て , 割り 当て られ た 
WP4mc+ い て hfD2 ち Ao ha が 
た りす る と と 恋 あ る 。 (左端 の 有効 数 字 が 切り 捨て られ た 場合 
その 結果 は 予期 し 得 た いも る の と な り , S1ZE が 解禁 状態 に あ 
る と SIZE 割込み が 起こ と る 。 ) 固定 小数 点 1 0 進数 値 の ピ 
クチ ャ ー 指 定 ( または, 消 動 小数 点 1 0 進数 値 の ピク チャ ー 指 
定 の 最初 の フィ ー ル ト ) CV と いら 2 文字 が な い 場 合 C は , その フ 
ィ ー ル ド の 指定 の 右端 CV が ある も の と 想定 され る 。 と の た め , 
必要 応じ て , 割り 当て られ た 値 の 下位 の 桁 が 切り 捨て られ て 
と の 値 が 整数 値 に 上 され る 。 1 つの ピク チャ ー 指 定 の 中 で は , V 
は 1 つ し か 使用 する と と が で き な い 。 


図 DI2 は 数 字 ピ クチ ャ ー 指定 の 例 を 示し た も の で ある 。 


ゼロ 消去 文字 


ゼ ュ 消去 ビク チャ ー 廊 字 は 文字 スト リン ク グ 値 の 数 字 桁 を 条件 付 で 指 
定 す る た め の も の で あり , と の 廊 字 を 使っ て 先行 ぞ ロ を 星 印 また は 
プラ ンク で 置き 換え た り , 先行 ゼロ で な い ゼ ロ を プラ ンク で 置き 換え た り 
する と と が で きる 。 先行 で ロ と は , 固定 小数 点数 の 左端 の 方 の 桁 ま 
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原 、 の で タ 


原 デ ー タ の 
02 ( 定数 形式 ) 


FIXED(5) 
FIXED(5) 
FIXED(5) 
FIXED(5) 
FIXED(5,2 
FIXED(5 
FIXED(5 
FIXED(5 
FIXED(5 


図 D. 3 


文字 スト リン タ 値 


ZZZ99 
ZZZ99 
ング ググ 
アグ Z ク 
ZZZ99 
ZZZV?9 
ZZZV9?9 
グ ク V ク ク 
レイ ルル イノ 
玉 米 玉 玉 玉 
玉 玉 来 来 素 
玉 玉 玉 V ネ 玉 
YYYYY 
?Y?Y9 
YYYVY9 


1 算術 値 は 指定 の 中 の 数 字 と V の 実際 の 位置 た い し 仮想 位置 (よっ て 表わさ れる 値 で ある 。 


2 この 場合 , PL ルン I の も と で は 結果 は 不定 で ある (左端 の 方 の 有効 数 字 が 切り 捨て られ て いる た め ) 。 


と と 示し た 結果 は 


シス テム /36 0 お よび シス テム グ 3 7 0 の も と で 得 ら れる も の で ある 。 S1ZE 条件 が 解禁 状態 に あれ ば , と の 条件 が 提起 


され る 。 


ぞ ゼロ 消去 の 例 


た は 浮動 小数 点数 を 構成 し て いる 2 つの 部 分 の 各々 の 左端 の 方 の 桁 
(と ある ゼロ ョ で, 1 0 進 小数 点 の 仮想 位置 の 左側 に あり , し か も より 
高位 の 桁 た 1 て 9 の 範囲 の 数 字 が な いも の を 言う 。 あ る 数 の 一 番 左 
側 あ る ゼロ 以外 の 数 字 を よび と れ よ ょ りら り 右側 に ある すべ て の 数 字 

(ゼロ と ぞ ロ 以外 の 数 字 ) が 有効 数 字 で ある 。 肖 動 小数 点数 に 関し 
て は , 指数 フィ ー ル ド K 先 行 で ゼロ が ある 場合 も ある と 言う 点 K 注 意 
され た い 。 


Z これ は 数 字 桁 を 条件 付 で 指定 する た め の ピ ビ ピクチャー 文字 で あり , 
と の 文字 を 指定 する と , デー タ の 対応 する 桁 に ある 先行 ゼロ が 
プラ ンク と 置き 抱え られ る 。 デー タ の 対応 する 桁 に 先行 ゼロ が 
な けれ ば , と の 桁 の 数 字 は プラ ンク と 置き 換え られ な い 。 ピク 
チャ ー 文 字 み は , ビク チャ ー 文 字 訂 あるいは 河 動 ピク チャ ー 文 
字 と 同じ フィ ー ル ド に あっ て は な ら な を ない 。 また , 同一 フィ ー ル 
ド の 中 の ビク チャ ー 文 字 ?, T, [I, R, また は Y の 右側 に ビ 
クチ ャ ー 文 字 用 を 記入 する と と も で き な い 。 
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玉 と れ は 数 字 桁 を 条件 付 で 指定 する た め の ビ ピクチャー 文 字 で ある 。 


と の 文字 は ピクチャー 文字 用 と 同様 と し て 使用 され る が , と の 
文字 を 指定 し た 場合 に は 先行 や ロ が 星 印 と 置き 換え られ る 。 ピ 
チャ ー 放 字 玉 は , ビク チャ ー 文 字 み また は 浮動 ビク チャ ー 文 
字 と 同一 の サブ プ フ ィ ー ル ド ( あ っ て は な ら な を な い 。 また, 同一 フ 
ィ ー ル ド の 中 の ピク チャ ー 文 字 ?, T, T, R, また は Y の 右 
側 に ビク チャ ー 女 字 * を 記入 する と と も で き な い 。 


と これ は 数 字 桁 を 条件 付 で 指定 する た め の ビ ピク チャ ー 文 字 で あり , 
と の 文字 を 指定 する と と (て よって, ( 先行 セロ で ある と 否 と を 
問わ ず ) 対応 する 桁 に ある ゼロ が プラ ンク と 置き 換え られ る 。 
対応 する 杵 が だ ぞ ロ で な い 場 合 , この 桁 の 数 字 が プラ ンク と 置き 
換え られ る と と は な い 。 


図 D. 3 は , ゼロ 消去 文字 の 使用 例 を 示し た も の で ある 。 と の 図 


ペン 


の 中 の b と 言 り 文字 は プラ ンク を 表わし て いる 。 


注 : ビク チャ ー 文 字 V の 右側 (C ビク チャ ー 文 字 み また は 玉 を 記入 


する 場合 に は , と の 指定 の 小数 部 分 の すべ て の 桁 だ け で を く , 整数 
部 の すべ て の 桁 た に も それ ぞ れ ピク チャ ー 文 字 用 また は * ネ を 記入 し な 
けれ ば なら を ない 。 ピクチャー 文 字 V の 右側 の すべ て の 桁 に ゼ ョ 消去 
文字 が 記入 され て いて も , と の 値 の 小数 部 分 の ぞ ロ が 消去 され る の 
は , 小数 部 分 の すべ て の 桁 が だ ロ で あり し か も 整数 部 の すべ て の 桁 
が 消去 さん れん て いる 場合 だ なけ で ある 。 と の よう ら な 場合 , と の デー タ 項 
目 の 文字 スト リン グ 値 は プラ ンク また は 星 印 だ け で ある 。 小数 部 分 
と 有効 数 字 が 1 つ で も 含ま れ て いる 場合 に は , 小数 部 分 の 桁 の 数 字 
は プラ ンク や 星 印 で は 置き 換え られ ない 。 


挿入 文字 


ピク チャ ー 文 字 ュ ンマ ( ,), 小数 点 ( ・), スラ ッシュ ( ブ ), 

お ぶよ び プ ラン ク (B ) は , 挿入 文字 と 呼ば れる も の で ある 。 これ ら 
の 文字 を 指定 する と , 指定 され た 文字 が 数 字 デ ー タ また は 文字 デ 
ー タ の 対応 する 位置 に 挿入 さ れる 。 とれ ら の 文字 は , 数 また は 文字 
の 位置 を 指示 する た め の も の で は な く , 数 字 と 数 字 ま た は 文字 と 文 
字 の 間 に 挿 信 さ れる 。 た だ し , 実際 (C は , 各々 の 挿入 文字 は , 消去 
され る と 厨 と を 問わ ず , 文字 スト リン グ 値 の 中 の ある 1 つの 文字 の 
位置 を 表わし て いる 。 コ ンマ, 小数 点 , お よび スラ ッシュ は 条件 付 
き 挿 入 文 字 で ある 。 すなわち, ゼ ュ 消去 文字 の スト リン グ の 中 で と 
れ ら の 文字 が 使用 され て いる 場合 , こ れ ら の 文字 も 消去 され る こと 
が ある 。 プラ ンク (B ) は 無 条 件 挿入 文字 で ある 。 と の 文字 は , つ 
ね (と, 対応 する 位置 に プラ ンク を 挿入 する よう 指定 する も の で ある 。 


注 : 挿入 文字 は 文字 スト リン グ 値 の 場合 に だ け 用 いら れる 。 と れ 
ら の 文字 は デー タ 項 目 の 算 術 値 と 関し て は 何 の 指定 も 行なわ な い 。 


> と の 文字 を 指定 する と , ゼロ 消去 が 行なわ れ を い 場 合 , 数 
字 デ ー タ の 対応 する 位置 た コン マ が 挿入 され る 。 ゼロ 消去 が 行 
を われ る 場合 ,。 コ ンマ が 挿入 され る の は , コン マ て の 入る べき 位 
置 の 左側 に 消去 さん な い 数 字 が ある と き , また を た は, コン マ の 入 
る べき 位置 の すぐ 左 に CV が あり し か も 小数 部 分 に 有効 数 字 が あぁ 
る と き , また を た は, コンマ が スト リン グ の 最初 に ある と き , また 
は , コン マ の 前 と 数 字 桁 を 指定 する の で な い 文 字 が ある と き 。, 
だ け で ある 。 上 の いずれ も 該当 し たい 場合 に ぞ ョ 消去 が 行 を 
われ て いる 場合 は すべ て , コン マ < 光 入 文 字 は , あたかも と の 文 
字 が コン マ の 入る べき 位置 の 直前 に ある ゼロ 消去 文字 で ある か 
の よう 取り 扱わ れる 。 有 


ン 


これ は , コン マ ・ ピ クチ ャ ー 文 字 と 同じ ょ う K 使 用 され る 。 た 


だ し , と の 文字 を 指定 し た 場合 , 対応 する 位置 (は 小数 点 ( .) 
が 入 る 。 と の 文字 を 指定 し て も, 固定 小数 点 1 0 進数 の ピク チ 
ャ ー 指 定 に な いて この 位置 に その 数 の 小数 点 が 合わ され る と と 
は な い 。 と の 文字 は デー タ 項 目 の 算 術 値 の 一 部 を 成 し て いる わ 
け で は な を ない 。 数 の 小数 点 を ある 位置 CK 合わ せる と いう 機能 を も 
っ て いる の は ピク チャ ー 文 字 V だ け で ある 。 実際 に CV が 記入 さ 
れ て いな を い 場 合 C は , フィー ルド 内 の 左端 の 桁 の 右 小 数 点 が 
ある も の と 想定 され , と の 想定 に 人 従っ て 数 の 小数 点 の 位置 が 決 
め られ る 。 小数 点 挿入 文字 が ど と か 他 の 位置 に あっ て も と の 間 
の 事情 に 変り は を な い 。Y を 記入 し て も 小数 点 が 印刷 され る わけ 
で は な いか ら , V と の 関係 を 考え て 小数 点 ( また は コン マ ま た 
は スラ ッシュ ) を 記入 する と , 固定 小数 点数 ( ま た は 浮動 小数 点 
数 ) の 整数 部 が 終り 小数 部 分 が 始ま る 場所 小数点 ( また は ュ 
ンマ また は スラ ッシュ ) を 挿入 する と と が で きる 。 印刷 を する 
と き は , 通常 , と この よら な 措置 が 必要 で ある 。 と の よう な 場合 , 
小数 点 は V の 直前 また は 直後 (C 軸 か を けれ ば な ら な い 。 小数 点 
が V の 直前 (C あ る 場合 , V の 左側 に 消去 され を い 数 字 が ある と 
き を 限っ て 小数 点 が 挿入 され る 。 たとえ, 小数 部 分 の すべ て の 
桁 た 有効 数 字 が あっ て も , と の 点 C 変 り は を い 。 V の 直後 K 小 
数 点 お ある 場合 に は , V の 右側 の 数 字 が すべ て 消去 され る と 小 
数 点 も 消去 され る 。 ただし, 小数 部 分 に 有効 数 字 が 1 つ で も あ 
る と, 小数 点 が (小数 点 と 有効 数 字 と の 間 介 在 す る ゼロ と 共 
C ) 挿入 され る 。 


ノ これ は , コン マ ・ ビ クチ ャ ー 文 字 と 同じ よう 使用 され る 。 た 
だ し , と の 文字 を 指定 し た 場合 , 対応 する 位置 に スラ ッシュ 
( / ) が 挿入 され る 。 


B これ は , 数 字 デ ー タ の 文字 スト リン グ 値 の 対応 する 位置 に つ 
ね に プラ ンク を 挿入 する よら 指定 する を ため の ピク チャ ー 文 字 で 
ある 。 


図 D.4 は , 挿入 文字 の 使用 例 を 示し た も の で ある 。 と の 図 の 中 
の b と いら 文字 は プラ ンク を 表わし て いる 。 


定 す る た め の も の で ある 。 ピク チャ ー 文 字 $ は 数 字 デ ー タ の 文字 
スネ ストリ ング 値 の 中 の 通貨 記号 を 指定 する た め ぬ め の も の で ある 。 


と れ ら の ピク チャ ー 文 字 を 使用 する に あたっ て は , と れ を 固定 的 
用 いる と と も で きる し 浮動 的 に 用 いる と と も で きる 。 固定 的 を 使 
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8 原 デ ー タ 
RS (定数 形式 ) 
FIXED(4) 1234 
FIXED(6,2) 1234 .56 
FIXED(4,2) 伯 の an: 4 
FIXED(4 ,2) 00.03 
FIXED(4,2) 00.03 
FIXED(4,2) 12 .34 
FIXED(4,2) 00.00 
FIXED(9?,2) 1234567.89 
も 欧 BC の の 9 12345 .67 
FIXED(7,2) 00123.45 
FIXED(?,2) 1234567 .89 
FIXED 123456 
FI XED 123456 


字 ネト リン グ 値 


2 999 1.234 

2 999V.99 1,234 . 

ク グ .V グ の 12.34 

ク ググ .V グ グ bbb03 

ク グ V ググ bb.03 

クノ ク V ググ 12.3 4 

ク ググ ク V ググ bbbbb 

2 29299 .999 .V99 1.234.567.89 
水玉 ,299V.99 12.345.67 

洲 玉 , の 999V.99 米 米 米 123.45 

2 .999.999V,9 の 9 1.234.567,89 
の タバ チタ ググ.3 4 だ 5 る 
ダリア タグ クタ の ん か.5a6 


FIXED 
F TXED 
F TXED 
FITXED 
F TXED 
FTXED 
FIXED 


001234 
000012 
000000 
000000 
000000 
123456 
本 2) 


メメ ク クン ク ク 
クン クノ ク 
の の パク クン ググ 
玉 玉 ポン 玉 玉 
米 玉 B 玉 氷 B 玉 
99B99B99 
9BB?2BB9? 


bbb12 グ 3 4 
bbbbbb12 
bbbbbbbb 
玉 米 米 米 米 北 米 米 
六 米 b 半 六 b 玉 米 
12b34b56 
1bb2bb3 


) 
) 
) 
) 
) 
) 
) 
) 
) 
) 


( 6 
( 6 
( 6 
( 6 
( 6 
( 6 
( 6 
( 6 
( 3 
( 2 


F [XXED 


2BB ン 9?BB 1bb プ 2bb 


1 算術 値 は 指定 の 中 の 数 字 と V の 実際 の 位置 た いし 仮想 位置 た よっ て 表わさ れる 値 で ある 。 


図 D.4 揮 入 文字 の 使用 例 


用 法 と は , 対応 する 桁 符 号 , 通貨 記号 , ま た は プラ ンク を 必ず 挿 
和信 す る よう 指定 する も の で ある 。 浮動 的 使用 法 と は , 先行 セロ を 消 
去 す る よう 指定 する も る の で ある 。 と の 場合 , と の 種 の ピクチャー 文 
字 と 対応 する 桁 で 消去 され て いる も の の 右端 の 桁 K 符 号 , プラ ンク , 
また は 通貨 記号 が 挿入 され る 。 ( た だ し , すべ て の 桁 KC 浮動 ピク チ 
ャ ー 文 字 が 記入 され て いて も , と の デー タ 項 目 の 値 が で ぞ ロ で ある 場 
合 に は , 肖 動 ビク チャ ー 文 字 は 挿入 され を な い 。 ) 


浮動 ビ ピクチャー 文字 を 指定 する (に は , 1 つの ピク チャ ー・ ラ フィー 
ルド の 中 に と の 文字 を 2 つ 以 上 記入 すれ ば よい 。 すなわち, ある 1 
つの フィ ー ル ド の 中 通貨 記号 ($ ) が 1 つ 記 入 さ れ て いる 場合 
は , と れ は 固定 的 使用 法 で ある と 解釈 され , ある 1 つの フィ ー ル ド 
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の 中 通貨 記号 が 2 つ 以 上 記入 され て いる 場合 に は , と れ は 浮動 的 
使用 法 で ある と 解釈 され る 。 河 動 ビ ピクチャー 文字 を 指定 する と き は , 
と の 文字 が 挿入 され る 可能 性 の ある すべ て の 桁 た と の 文字 を 記入 し 
を けれ ば なら な いじ い 。 


浮動 ピク チャ ー 委 字 は , スト リン グ の 形式 C を っ て いな け れ ば な 
ら た い 。 ス トリ ング と は 同一 の 浮動 ピク チャ ー 文 字 の 列 で ある 。 
さと 人 必要 に 応じ て , スト リン グ の 中 CV と 挿入 区 字 コ ンー , 小数 
点 ,。 スラ ッシュ , B の 中 の いずれ か 1 つと を 記入 する と と が で きる 。 
スト リン グ の 中 また は 直後 に ある 挿入 文字 スラ ッシュ , コン マ , ま 
た 小数点 は 浮動 ビク チャ ー 廊 字 ス トリ ング の 一 部 で ある と みな さ 
れ <。 文字 B を 記入 する と , と の 文字 が どの 位置 に あっ て も , 必ず 


その 位 罰 に プラ ンク が 挿入 され る 。 デー タ 項 目 の 算 術 値 が で 
ロ の 場合 を 除き , V が 記入 され て いる と と ろ で 浮動 ビク チャ 
ーー 文字 ス トリ ング が 終了 する 。 デー タ 項 目 の 算 術 値 が で ぞ ロ の 
場合 に は , V は 無視 され る 。 1 つの ピク チャ ー 指 定 フ ィ ー ル 
ド の 中 で は , 浮動 ビ ピクチャー 文字 スト リン グ は 1 つ し か 記入 
する と と が で き な い 。 浮動 ピク チャ ー 文 字 ス トリ ング の 左側 
て 数 字 桁 よ か あっ て は を な ら な い 。 また, ピク チャ ー 文 字 * あ る 
い は 乙 と 浮動 ビク チャ ー 文 字 ス トリ ング と を 同一 の フィ ー ル 
ド C と 記入 し て は を ら な い 。 


浮動 ピク チャ ー 文 字 ス トリ ング の 中 の 文字 スラ ッシュ , コン マ , 
ぉ ぶよ び 小 数 点 と 対応 する デー タ 内 の 位置 に は , 次 の いずれ か 1 つが 
挿入 され る 。 


・ 左側 (有効 数 字 が ある 場合 (は , スラ ッシュ , コン マ , また は 小数 点 。 


。 右 隣り の 桁 に と の フィ ー ル ド の 最高 位 の 有効 数 字 が ある 場合 
は , 浮動 記号 。 


。 と の フィ ー ル ド の 最高 位 の 有効 数 字 が 右 《C 2 桁 以 上 離れ た と と 
ろ に ある 場合 に は , プラ ンク 。 


浮動 ピク チャ ー 文 字 ス トリ ング の 中 浮動 ビク チャ ー 文 字 が n 個 
含ま れ て いる と する と , と の スト リン グ は nー 1 個 の 条件 付き 数 字 
桁 と 対応 す る 。 左端 の 浮動 ビ ピクチャー 文字 と 対応 する 桁 に は 浮動 ビ 
クチ ャ ー 文 字 を い レ プラ ンク が 挿入 され る だ け で あり , と の 桁 数 
字 が 挿入 され る と と は な を い 。 同一 の フィ ー ル ド の 中 で 2 種類 の ビク 
チャ ー 文 字 を いっ し ょ 浮動 的 に 使用 する と と は で き な い 。 


浮動 ビ ピクチャー 文字 スト リン グ の 中 CV と いう 文字 が 含ま れ て い 
る 場合 と の V は その 先行 部 分 を 1 つの サ プ フ ィ ー ル ド と し て 区 切 
る 働き を し , V の 右側 の サ プ フ ィ ー ル ド C あ る すべ て の 桁 も また , 
と の 2 番目 の サブ プ フ ィ ー ル ド を 開始 する 肖 動 ピク チャ ー 文 字 ス トリ 
ング の 一 部 に を っ て いな けれ ば な ら な じい 。 


それ ぞ れ の フィ ー ル ド C は , 1 種類 の 符号 文字 し か 記入 する と と 
が で き な い 。 固定 文字 と し て S, 十 , また は ー を 使用 する 場合 に は , 
浮動 小数 点数 指定 で は 小数 部 フィ ー ル ド を ら び 指数 フィ ー ル ド の 
中 の 全数 字 桁 の 左側 と と の 文字 を 記入 する と と が で きる し, また 固定 小 
数 点数 指定 では, 全数 字 桁 の 右 を な いし 左 に と の 文字 を 記入 する と と 
が で きる 。 


V の 右 (C あ る 数 字 桁 す べ て 《 簿 動 ビ ピク チャ ー 文 字 が 記入 され て い 
る 場合 , この サ プ フ ィ ー ル ド の 中 で 消去 が 行なわ れる の は 整数 部 お 
と び 小 数 部 分 の 桁 が すべ て ゼロ の と きだ け で ある 。 と の よう な 場合 
編集 され た 後 の デ ー タ 項目 は 全体 が アラ ンク に を る (を ただし, と の 
フィ ー ル ド の 最初 の と と ろ 搬 入 文字 が 入る と と は ある )。 小数 部 
分 C 1 つ で も 有効 数 字 が ある 場合 に は , 小数 部 分 全体 が 何 の 消去 $ 
受け ず K 残 され る 。 


$ と これ は 通貨 記号 を 指定 す る た め の ビ ピクチャー 文字 で ある 。 と の 


文字 が 2 つ 以 上 記入 され て いる 場合 は と れ は 肖 動 ビク チャ ー 
文字 で ある 。 そ れ 以 外 の 場合 は , これ は 固定 文字 で ある 。 固定 
文字 と は , 対応 する 桁 た ここ と の 文字 を 挿入 する よう 指定 する た め 
の も の で ある 。 固定 文字 と し て $ を 指定 する 場合 に は , 指定 の 
ラフ ラ ィ ー ル ド の 中 に ある 全数 字 桁 の 左側 (と と の 女 字 を 記入 す る か , 
指定 の 全数 字 桁 の 右側 に こと の 文字 を 記入 する か し を けれ ば なら 
を い 。 と の 文字 の 浮動 的 使用 法 に つい て の 詳細 は , 上 記 の 説明 
を 参照 され た い 。 


S これ は , デー タ の 値 が > 0 の 場合 C は 正 符号 ( 十 ) を 指定 し , 
と れ 以 外 の 場合 に は 負 符 号 ( 一 ) を 指定 する た め の ビ クチ ャ ー 
文字 で ある 。 と の 文字 を 固定 的 に 使用 する と と も で きる し , 湖 
動 的 使用 する こと も で きる 。 と の 際 適 用 され る 規則 は , 通貨 
記号 と 適用 され る 規則 と 同じ で ある 。 


二 と れ は , デー タ の 値 が > 0 の 場合 に は 正 符号 ( 十 ) を 指定 し , 
と ね れ 以外 の 場合 た は ブラ ンク を 指定 する ため の ピ クチ ャ ー 文 字 
で ある 。 こと の 文字 を 浮動 的 に 使用 する と と も で きる し , 固定 的 
(使用 する と と も で きる 。 と の 際 適 用 され る 規則 は , 通貨 記号 
適用 され る 規則 と 同じ で ある 。 


ー とれ は , デー タ の 値 が く 0 の 場合 に は 負 符号 (一 ) を 指定 し , 
と われ 以外 の 場合 に は プラ ンク を 指定 する た め の ピクチャー 文字 
で ある 。 と の 文字 を 浮動 的 C 使 用 する と と も で きる し , 固定 的 
て 使用 する と と も で きる 。 と の 際 適 用 され る 規則 は , 通貨 記号 
と 適用 され る 規則 と 同じ で ある 。 


ピク チャ ー へ の 割当 て が 行なわ れる 前 , また は ピクチャー へ の 割当 て が 
行なわ れ て いる 間 ( 1 0 進数 の 小数 部 分 が 切 り 捨 て られ , と の た め 
KC 最終 的 を 値 が ぞ ロ に を っ た 場合 , 切捨て 前 の と の 1 0 進数 の 値 の 
符号 が ビ ピクチャー 挿入 され る 。 し た が っ て , と の ピク チャ ー の 中 
の 符号 は この 1 0 進数 値 の 算出 過程 に よっ て 左 太 さ れる とこ と も ある 。 


図 D.5 は , 肖 動 ピク チャ ー 文 字 の 使用 例 を 示し た も の で ある 。 
と の 図 の 中 の b と 言 女 字 は プラ ンク を 表わし て いる 。 


貸方 記号 , 借方 記号 , 上 重ね 窟 孔 符号 


一 対 の 文字 か ら を る CR (貸方 ) と DB (借方 ) は , 実数 の 数 字 テ ー タ 項 
目 の 特 号 を 指定 する た め の も の で あり , 通 常 , 商業 分 野 の 報告 書 で 使用 され る 。 


ビク チャ ー 文 字 T , 1 , R は , いずれ も る , 数 字 デ ー タ の 中 の 対応 する 
数 字 桁 (C 上 重ね 空 孔 符号 を つけ る よう 指定 する た め の も の で ある 。 
上 重ね 守 孔 符号 と は , ある 数 字 と 同じ カー ド 桁 (c 容 電 され た 12- 容 孔 
( 正 ) ま た は 11- 容 乾 ( 負 ) の と と で ある 。 と れ は と の 算術 デー タ 
項目 の 符号 を 表わす た め の も の で ある 。 固定 小数 点数 の 指定 に な い 
て は , 上 重ね 空 也 符号 を 1 つ 使用 する と と が で きる だ け で ある 。 滞 
動 小数 点数 の 指定 に な いて は , 小数 部 フィ ー ル ド お と よび 指数 フィ ー 
ルド 各々 1 つ ず つ , 合計 2 つの 上 重ね 守 孔 符号 を 使用 する と と が 
で きる 。 な お ち お, 上 重ね 容 孔 文字 は フィ ー ル ド の 中 の どの 数 字 桁 に で 
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原 デ ー タ の 属性 


FIXED(5, 
FIXED(5, 
FIXED(5 
FIXED(5 
FIXED (1 
FIXED(5 
FIXED(5 
FIXED(2 
FIXED (4 
FIXED(5 
FIXED(5 
FIXED(5 
FIXED(5 
FIXED(5 
FIXED(5 
FIXED(5 
FIXED(5 
FIXED(5 


$29292V.99 
79?$ 

$ グ ググ ZV .29 
$ ググ ク グ V .ZZ 
$$$ .$$ 
$$$?2V.929 
$$$92V.99 
$$$3 ,.29292 
$$$ 2992 
S ク ク ZV .?9 
SS,SS? 
SS,SS? 
ググ CM 8 プッ 
ー タ 992V.99 
999V.99S 
十 十 B 十 9V .99 
ee ac 衣 
SSS2V.99 


算術 値 は 指定 の 中 の 数 字 と V の 実際 の 位置 を た いし 仮想 位置 に よっ て 表わさ れる 値 で ある 。 


図 D.5 浮動 ビク チャ ー 文 字 の 使用 例 


も 指定 する と と が で きる 。 と の 指定 が ある と , 指定 され て いる 
数 字 桁 の 数 に 上 重ね 窪 孔 符号 が つく 。 


CR 


と れ は , デー タ の 値 が ぞ ロ より 小さ ゆい 場合 (C, 対応 する 位置 
(CCR と いう 文字 を 挿入 する よう 指定 する た め の ピクチャー 
文字 で ある 。 と れ 以 外 の 場合 に は , 対応 する 位置 (と 2 つの プ 
ラン ク が 入る 。 CR と いう 文字 の 指定 は , フィ ー ル ド の 中 の 


全数 字 桁 の 右側 に し か 記入 する と と が で き な い 。 


DB 
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と これ は , CR と 同様 に し て 使用 され る 。 た だ し , と の 場合 
は , 対応 する 位置 (CDB と いら 文字 が 挿入 され る 。 


と の 文字 は , 入力 の と き , 対応 する 桁 の 数 字 に , デー タ の 値 
が 0 な ら ば 1 2 一 密 が 上 重ね 究 也 され て むり, デー タ の 
値 が へ 0 な ら ば 1 1 - 窪 乾 が 上 重ね 空 也 され て いる と いう と 
と を 指定 する る の で ある 。 ま た, と れ は と の 上 重ね 裕也 が 文 
字 ス トリ ング 値 で 表示 され る と と ゃ も 表わし て いる 。 
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文字 スト リン タ 値 


$123.45 
12$ 
$bb1 .23 
bbbbbbb 
bbbbbb 
$123 .45 
bb$1.23 
bbb$012 
b$1,234 
十 bb2.45 
十 2 14 

ー 4 
b123.45 
ー123 .45 
123 .45 土 
bbb 十 123 
bbb1.23 
お お 二 和 る の る 


と の 文字 は , 入力 の と き , 対応 する 桁 の 数 字 (に , デー タ の 値 が 
>0 の 場合 1 2 一 宛 乾 が 上 重ね 宛 孔 され て おぉ お り , と れ 以 外 の 
場合 , と の 桁 ( と は 何 の 上 重ね 光 孔 も され て いい と と を 指定 
する も の で ある 。 ま た, と の 文字 は , デー タ の 値 が か >0 な ら 
ば 文字 スト リン グ 値 で 上 重ね 窪 孔 が 表示 され る と と を 指定 す 
る 働き る も る もつ 。 


と の 文字 は , 入力 の と き , 対応 する 桁 の 数 字 (<, デー タ の 値 
が ぐ 0 の 場合 1 1 一 也 が 上 重ね 宰 孔 され る と と を 指定 する 
$ も の で ある 。 と れ 以 外 の 場合 , と の 桁 に は 上 重ね 補 孔 は 何 も 
行 を われ を い 。 ま た , と の 文字 は , デー タ の 値 が く こ D を ら ば 文 
字 ス トリ ング 値 で 上 重ね 空 孔 が 表示 され る と と を 指定 する 働 
きも も つ 。 


原 デ ー タ の 属性 


FIXED(3) 
FIXED(4 ,2) 
FIXED(4,2) 


FIXED(4,2) 
FIXED(4) 
FIXED(4 ) 
FIXED(4) 


ビ ピクチャー 指定 


文字 ネト リン クタ 値 ! 


$1.23CR 
$12.34bb 


$2Z.?29CR 

$3 の の V の 2 の も R 
$ZZV .92DB $12.34DB 
$ZZV.?29DB $12.34bb 
9991 102A 
Z?9R 102J 

シン 人 MM 10B1 


1 算術 値 は 指定 の 中 の 数 字 と V の 実際 の 位置 た いし 仮想 位置 に よっ て 表わさ れる 値 で ある 。 


図 D.6 ビク チャ ー 文 字 CR, DB, T, 1I,R の 使用 例 


原 デ ー タ の 属性 


-12345E06 
る 45 選 0U6 
-12345E 十 06 
を を きこ 條 還 ドサ ジグ 
001.23 世 一 01 
001 .23E 十 04 
001 .23E 十 04 
001.23E 十 04 


ビク チャ ー 指 定 廊 字 スト リン グ 値 ! 


に の タク の Y 

ザー ワタ クタ クツ ES7 7 
V.99999KS292 
S999V.9292ES?22 
SSS9 .V22ESS2 
Z ク ZZV.29KS292 

SZ99V.99ES?29 
SSSSV.99Eー% タ 9 


・12345E0O6 
・12345Eー06 
。 94 5 ボ @ 
2 の ぶす SR 圭 1 タ 2 
半 123-. は DEb 一 う 
2 の 3.2 0U キ 02 
土 123.00 世 十 0 2 
士 123.00Eb02 


1 算術 値 は , 小数 部 で 表わさ れる 値 (C 10" を 掛け た 積 で ある (た だ し , n は 指数 フィ ー ル ド で 示さ れ て いる 値 )。 


図 D.7 浮動 小数 点数 ビク チャ ー 指 定 の 例 


図 D.6 は CR, DB, ぉ ぶよ び 上 重ね 宰 孔 文字 の 使用 例 を 示し た 
も の で ある 。 


注 : 同一 フィ ー ル ド 内 で , ビク チャ ー 文 字 CR, DB, T, 1, 
R と と れ ら 以外 の 符号 文字 と を 一 緒 (C 使 用 する と と は で き な い 。 


指数 指定 文字 


ビ ピクチャー 文字 KK お よび EE は, ある 浮動 小数 点 1 0 進数 に つい て 記 


述 し て いる 数 字 指 定 の 指数 フィ ー ル ド の 境 を 指定 する た め の も の 
で ある 。 指数 フラ フィー ルド は , つね し , 数 字 浮 動 小数 点 ビ クチ ャ ー 
指定 の 最後 の フィ ー ル ド で ある 。 同一 の フィ ー ル ド の 中 で ピク チャ 
ーー 区 字 人 KK と EE を 共に 使用 する と と は で き ない 。 


K と れ は , 対応 する 桁 の 右側 が 指数 フィ ー ル ド で ある と と を 指定 
する た め の ピ ビ ピクチャー 文字 で ある 。 と れ は , 数 字 デ ー タ 項目 
の 中 の 文字 を 指定 する た め の も の で は な い 。 


E と れ は , 対応 する 桁 CE と いう 文字 が 入り , と の 世 が 指数 フィ 


ー ル トド の 始ま り を 表わし て いる と と を 指定 する た め の ピ クチ ャ ー 
文字 で ある 。 
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rome 


FIXED(4,0) 
F TED (7 ,0) 
FIXED(5,5 
FIXED(6,6 


1200 
ー1234500 
・00012 

・D12345 


) 
) 


図 D.8 スケ ー ル 因数 ピク チャ ー 文 字 の 使用 例 


文字 スト リン グ 値 の 場合 は , 最初 の フィ ー ル ド ( 小数 部 ) の 最高 

位 の 有効 数 字 が , 数 字 浮動 小数 点 ピ ビク チャ ー 指 定 の 最初 の 数 字 桁 
指定 文字 と 対応 する 桁 C 来 る よう ( それ が セロ 消去 文字 で あっ て も ) 
指数 の 値 が 調整 され る 。 


図 D.7 は 指数 指定 文字 の 使用 例 を 示し た も の で ある 。 と の 図 の 中 
の b と いう 文字 は プラ ンク を 表わし て いる 。 


スケ ー ル 因数 


ビ ピクチャー 文 字 F は 固定 小数 点 1 0 進数 の スケ ー ル 因数 を 指定 する 
た め の も の で ある 。 こ と の 文字 を 指定 する と き は , ビク チャ ー 指 定 の 
右端 に 次 の よう ら な 形式 で 記入 する 。 
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1 算術 値 は 文字 スト リン グ 値 CK10" を か けた 積 で ある (ただし, n は スクール 因数 )。 


文字 スト リン タ 値 ! 
1 2 


ー12345 
1 2 


が の に の 2) 
S7929V99F(4) 
の (一 8) 
2292V99F(-4) 


選 。 ME2 ま | 


1 0 進 整 数 定数 ) 


F と れ は , 括弧 で くく られ て いる 1 0 進 整数 定数 ( 必要 に 応じ て 
符号 が つけ られ て いる ) が スケ ー ル 因数 で ある と と を 指定 する 
た め の ピ ビク チャ ー 文 字 で ある 。 ス ケー ル 因 数 と は , と の 変数 の 
算術 値 の 1 0 進 小数 点 が , 文字 スト リン ク 値 あけ る 10 進 小 
数 点 の 仮想 位置 上 りゃ る スケ ー ル 因数 の 値 に 相当 する 桁 数 分 だ け 
右 ( ス ケー ル 因 数 が 正 の 場合 ) また は 左 ( スケ ー ル 因数 が 負 の 
場合 ) C あ る と と を 指定 する た め の も の で ある 。 


スケール 因数 が ー 1 2 8 て 1 2 7 の 範囲 を 越え る 位 取 り を 暗示 し 
て いて は を ら な い 。 


図 D. 8 は , スケ ー ル 因数 ピク チャ ー 廊 字 の 使用 例 を 示し た も の 
で ある 。 
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と の 節 で は , GET ま た は PUT ス テー トメ ント の 形式 リス ト の 中 
と 記入 する と と の で きる 編集 指示 形式 項目 の 各々 C つ いて 説明 する 。 


形式 項目 に は, デー タ 形 式 項目 , 制御 形式 項目 , お よび 遠隔 形式 
項目 の 3 種類 が ある 。 


と の 節 に お いて は , と の 3 種類 に つい て 別々 説明 し , 各々 の 説 
明 が 済ん だ と と ろ で 各種 類 に 属す る 形式 項目 を 列挙 する 。 さ ら に そ 
の 後 で , アン ファ ベッ ト 順 と 各 形 式 項目 に つい て 詳し く 説 明 す る 。 


デー タ 形 式 項目 


デー タ 形 式 項目 と は , ある 1 つの デー タ 項 目 が 外部 媒体 上 で と る 形 
式 選 つい て 記述 する た め の も の で ある 。 


入力 の 際 ( に は , 流れ の 中 の デー タ は 連続 し た 1 つの 文字 の スト リ 
ング と みな され る 。 流れ の 中 (C あ っ て は , プラ ンク お よび 引用 符 は 
すべ て 文字 と し て 取り 扱わ れる 。 GET ステ ー ト メン ト の 各々 の デ 
ー タ 形式 項目 C よ っ て , 流れ か ら 読み 取る べき 文字 の 桁 数 が 指定 さ 
れ , と これ ら の 文字 の 解釈 方 法 を 指示 され る 。 と の 際 , スト リン グ を 
引用 符 で 囲ん で は を な ら を い 。 また , ビッ ト ・ ス トリ ング を 謙 別 する 
の に B と いう 文字 を 使っ て は を ら を い 。 指示 され て いる 解釈 方 法 で 
流れ の 中 の 文字 を 解 羽 す る と と が で き な い 場合 に は , 
CONVERS1ION 条 件 が 起 と る 。 


出力 の 際 (は , 流れ の 中 の デー タ は 形式 リス ト に よっ て 指定 され 
て いる 形式 を と る 。 PUT ステ ー ト メン ト の 中 の 各々 の デー タ 形 式 
項目 C ょ よって, 対応 する デー タ 項 目 が 文字 形式 で 入れ られ る フィ ー 
ルド の 幅 が 指定 され , また と の 値 が と る べき 形式 が 指示 され る 。 ス 
トリ ング を 囲む な た め の 引 用 符 も 挿入 され を いし , ビッ ト ・ ス トリ ン 
ク を 識別 する た め の B と いら 文字 も 挿入 され を ない 。 


出力 の 流れ の 中 の デー タ 項 目 を 1 つ 1 つ 区 切る た め KC 先 行 ア ラン 
ク が 自動 的 に 挿入 され る わけ で は な い 。 ス トリ ング ・ デ ー タ は , 指 
定 さ れ た 幅 を も つ フ ィ ー ル ド の 中 で 左寄せ され る が , 算術 デー タ は 
右寄せ され る 。 算術 デー タ を 文字 タイ プ ほ 変換 す る 場合 の 規則 で は , 
( 先行 で ロ と 置き 換わる プラ ンク の ほか KC ) 最高 3 つ の 先行 プラン 
ク が 揮 入 され る 可能 性 が ある た め , 交換 され た フィ ー ル ド の 算術 項 
目 C は 通常 少な た く と も 1 つの 先行 アテ ラテ ンク が で きる と と し に な る 。 た 
だ し , 指定 され て いる フィ ー ル ド 幅 と 先行 アラ ンク を 収容 する 余裕 
が な を けれ ば , 流れ の 中 先行 アテ ンク は 現われ な い 。 指定 され て い 
る フィ ー ル ド 幅 が 充分 で を いた め 起 と る 切捨て は , 算術 項目 の 場 
合 C は 左端 で 行 た われ, スト リン ク グ 項目 の 場合 に は 右端 で 行なわ れ 


る 。 


編集 指示 転送 に な いて は , 入力 の 際 に も 出力 の 際 に も 2 進 デ ー タ 
の 値 は つね 1 0 進数 形式 で 表示 され る 点 C 注 意 さ れ た い 。 


以下 に デー タ 形 式 項目 を 列挙 す る 。 


固定 小数 点 形式 項目 F 
浮動 小数 点 形式 項目 E 
複素 数 形式 項目 C 
ビ ピクチャー 形式 項目 P 


ビッ ト ・ ス トリ ング 


形式 項目 B 


文字 スト リン グ 形 式 項目 A 


制御 形式 項目 


制御 形式 項目 は , ある ファ イル と 結び つけ られ て いる デー タ ・ セ ッ 
ト の レイ アプ アット を 指定 する た め の も の で ある 。 以上 制御 形式 項目 
を 列 泡 する 。 

ペー ジ 形 式 項目 PAGE 


印刷 行 ス キッ プ 形 式 項 目 SKIP 


印刷 行 位置 形式 項目 LINE 
印刷 桁 位置 形式 項目 COLUMN 
ス ペー ス 形 式 項目 ズ 


制御 形式 項目 は 。 デー タ ・ リ スト の 処理 が 終了 する 前 (と 出 て 来 を 
けれ ば 何 の 効 果 も も た を ない 。 


PAGE お よび LINE 両 形式 項目 は , 出力 だ け K 関 係 す る も の 
で あり 出力 の 中 で も PRINT 属性 を も つ フ ァイル と だ け 適 用 され 
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る 。 と れ を 対し て , 形式 項目 SKIP, COLUMN, ぉ よび 又は , 
入力 と 出力 の 双方 適用 され る 。 


形式 項目 PAGE, SKIP, おぉ お よび LINE は , PUT ステ ー ト 
メン ト ( SKIP 関し て は , さら (CGET ス テー トメ ント ) の ォ オォ 
プシ ョ ン と し て と れ ら を 指定 し た の と 同じ 効果 を も つ 。 た だ し , 形 
式 項目 と し て と これら を 指定 し た 場合 に は , と の 形式 項目 が 形式 リス 
ト の 中 現われ た と き 初 め て その 効果 が 現われ る の 対し て , オプ 
ショ ン と し て と れ ら を 指定 する と , デー タ の 転送 が 行 を われ る 前 
その 効果 が 現われ る 。 


COLUMN 形式 項目 は , 現在 の 印刷 行 ほ また は 次 の 印刷 行 の 指定 
され た 文字 位置 に ファ イル の 位置 設定 を 行なう た め の も の で ある 。 
GET STRING ま た は PUT STRING ステ ー ト メン ト で 
は COLUMN 形式 項目 を 使用 する と と が で き な い 場合 も ある 点 K 
注意 され た い 。 


スペ ー ス 形式 項目 は 水平 方 向 の 相対 的 を スベ ペース を 指定 する た め 
の も の で ある 。 入力 の 際 に は , と の 形式 項目 で , 流れ の 中 の スキ ッ 
プ す べき また は 無視 すべ き 文 字 の 数 を 指定 する 。 出力 の 際 に は , と 
の 形式 項目 で , 流れ の 中 KC 挿 人 すべ き プ ラン ク の 数 を 指定 する 。 


ある ファ イル を 開い た 人 後 と の ファ イル 対し て 出さ れる 最初 の 
GET ま た は PU 和 T ステ ー ト メン ト の 中 で 制御 形式 項目 を 指定 し た 
場合 の 効果 に つい て は , 「J 節 : ステ ー ト メン ト 」 の OPEN ス 
テー トメ ント の 項 を 参照 され た い 。 


遠隔 形式 項目 


遠隔 形式 項目 は , と の 遠隔 形式 項目 と 置き 換え られ る 形式 リス ト 
を 含ん で いる FORMAT ステ ー ト メン ト の ラズ ベル を 指定 す る た め 
の も の で ある 。 遠隔 形式 項目 は 次 の よう な 形 を と る 。 


R (ステ ー ト メン ト ・ ラ ベル 標識 ) 


「 ス テー トメ ント ・ ラ ベル 標識 1] は, ラベ ル ん 定数 また は スカ ラー・ 
ラベ ル 変 数 で ある 。 


形式 項目 の 用 法 


以下 の リス ト K 挙 げ ら れ て いる 形式 項目 は , 大 部 分 , その 人 後 K 指 定 
が 続く よう に な っ て いる 。 ビ ピクチャー 形式 項目 な よび 遠隔 形式 項目 
を 除く すべ て の 形式 項目 に 関し て は , と の 指定 の 中 に 含ま れ て いる 
式 は , 1 0 進 整数 定数 , 要素 変数 , また は 他 の 要素 式 と し て 与え る 
と と が で きる 。 後 の 方 の ある デー タ 項 目 (に 結び つけ られ る 形式 項目 
の 式 の 中 で , 入力 操作 中 に 変数 に 割り 当て られ る 値 を 使用 する と と 
が で きる 。 形式 項目 が 使用 され る た び , その 式 の 値 が 計算 され , 
整数 に 変換 され る 。 
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形式 項目 の リス ト (アル ファ ベッ ト 順 ) 


AA 形式 項目 
A 形 式 項目 は 次 の よう みな 形式 を と る 。 
A[ (フィー ルド の 幅 ) ] 


文字 スト リン グ 形 式 項目 は , ある 文字 スト リン グ が 外部 媒体 上 で 
と る 表現 形式 に つい て 記述 する ため の も の で ある 。 


一 般 規 則 : 


1 「 フ ィ ー ル ド の 幅 | は , と の 形式 項目 が 使用 され る を び KK, そ 
の 値 が 計算 され , 整数 変換 され る 式 で ある (変換 され た 後 
の 整数 が 負 で あっ て は な ら な い ) 。 と の 式 で , デー タ の 流れ の 
中 に あっ て と の スト リン グ を 収容 し て いる ( また は 収容 する と 
と (て を っ て いる ) フィ ー ル ド の 女池 の 桁 数 を 指定 す る 。 


2. 入力 の 際 , こと で 指定 され て いる 桁 数 分 の 文字 が , デー タ 
の 流れ か ら 読 み 取 られ , 必要 (応じ て 変換 , 切捨て , また 
は バディ ング を 経た 後 デ ー タ ・ リ スト の 中 の 対応 す る 要素 
割り 当て られ る 。 入力 の 際 に は , 必ず フィ ー ル ド の 幅 を 
指定 し を な けれ ば を ら ず , と の 値 が で ぞ ロ の と き (C て は と の スト 
リン グ は ナル ・ ス トリ ング で ある と みな され る 。 デー タ の 
流れ の 中 (C 引 用 符 が あっ た 場合 、 と これ は スト リン グ の 中 の 
文字 で ある も の と し て 取り 扱わ れる 。 


3. 出力 の 際 , デー タ ・ リ スト 内 の 対応 する 要素 が , 必要 KC 応 
じ て , 廊 字 スト リン グ K 変 換 さ れ , 指定 され て いる フィ ー 
ルド の 幅 (に 合わ せ て 切捨て を いし 右端 へ の プラ ンク の 追加 
が 行なわ れ た あと で デー タ の 流れ の 中 に 入れ られ る 。 フィ 
ー ル ド の 幅 が ゼロ の 場合 (C は , こと の 形式 項目 な よび デー タ ・ 
リス ト 内 の と れ と 対応 する 要素 は スキ ッ プ され , デー タ の 流れ 
と 文字 が 入れ られ る と と は あい 。 な お お, スト リン グ の 両端 を 
囲 な た め の 引 | 用 符 は デー タ の 流れ に は 出さ れ を い 。 と と で 
フィ ー ル ド の 幅 が 指定 され て い を い 場 合 C は , データ ・ リ スト 
内 の 指名 され て いる 要素 の 文字 スト リン グ と し て の 長 さ が フィ 
ー ル ト の 幅 で ある も の と み を され る ( た だ し , と の 要素 は , 必 要 
に 応じ し て , 「EF 節 : デー タ の 変換 と 式 の 値 の 計算 | < 示 され 
て いる 規則 に 進 じ た 変換 を 行なっ た 後 の ゃ の で ある )。 


B 形式 項目 


B 形式 項目 は 次 の よう を 形式 を と る 。 


B[ (フィ ー ル ド の 幅 ) ] 


ビッ ト ・ ス トリ ング 形式 項目 は , ある ビッ ト ・ ス トリ ング が 外部 
媒体 上 で と る 表現 形式 に つい て 記述 する た め の も の で ある 。 


ペー 


各 ビ ッ ト は 文字 の 0 か 1 で 表わさ れる 。 


一 般 規 則 : 


「 フ ィ ー ル ド の 幅 」 は , この 形式 項目 が 使用 され る た びに を 
その 値 が 計算 され , 整数 に 変換 され る 式 で ある ( 変換 され 
た 後 の 値 が 負 で あっ て は な ら な い ) 。 と の 式 で , と の ビッ 
ト ・ ス トリ ング を 収容 し て いる ( また は 収容 する と と KC な 
っ て いる ) デー タ の 流れ の 文字 の 桁 数 を 指定 する 。 


入力 の 際 に は , と の ビッ ト ・ ス トリ ング の 文字 表現 は , と 
と で 指定 され て いる フィ ー ル ド 内 の 不 特定 の 場所 に 入っ て 
いる 。 フィ ー ル ド 内 の ビッ ト ・ ス トリ ング の 前 後に プラ ン 
ク が ある と と が 多い が , プラ ンク は 無視 され る 。 デ ー タ ・ 
リス ト の 中 の 対応 する 要素 に こと この ビッ ト ・ ス トリ ング が 割 
り 当 て られ る と き , 必要 (応じ し て , 変換 が 行なわ れる 。 入 
力 の 際 に は , 必ず , フィ ー ル ド の 幅 を 指定 し を けれ ば を た ら 
を い 。 フィ ー ル ド の 幅 の 値 が な で ロ の 場合 , と の ビッ ト ・ ス 
トリ ング は ナル ・ ス トリ ング で ある も の と みな され る 。 ス 
トリ ング の 中 CC 0 ああ よび 1 以外 の 文字 (た と を ば , スト リ 
ング 内 部 の プラ ンク , 引用 符 , ある い は B ) が 含ま れ て い 
る 場合 , CONVER SI ON 条件 が 起 と る 。 


出力 の 際 (C て は , と の ビッ ト ・ ス トリ ング の 文字 表現 は , と 
と で 指定 され て いる フィ ー ル ド 左 寄せ され , 必要 応じ 
て 右端 で 切捨て な いし プラ ンク の 追加 が 行なわ れる 。 必要 
な ら ば , さら (C, ビッ ト ・ ス トリ ング へ の 変換 も 行なわ れ 
る 。 引 用 符 も 識別 用 文字 B も 挿入 され な い 。 フ ィ ー ル ド の 
幅 が ゼロ の 場合 , と の 形式 項目 と デー タ ・ リ スト 内 の と れ 
と 対応 する 要素 は スキ ッ プ され , デー タ の 流れ C は 文字 は 
何 $ 置 か れ を い 。 フィー ルド の 幅 が 指定 され て いな いり 場合 
デー タ ・ リ スト 内 の 指名 され て いる 要素 の ビッ ト ・ ス トリ 
ング と し て の 長 さ が フィ ー ル ド の 幅 で ある と みな され る 
(ただし, と の 要素 は , 必要 に 応じ て , 「EF 節 : デー タ 
の 変換 と 式 の 値 の 計算 」 (と 示 され て いる 規則 準じ し た 変換 
を 行なっ た 後 の も の で ある ) 。 


C 形式 項目 


C 形 式 項目 は 次 の よう な 形式 を と る 。 


C (実数 形式 項目 [ , 実 数 形式 項目 ] ) 


複素 数 形式 項目 は , ある 複素 数 デー タ 項 目 が 外部 媒体 上 で と る 表 
現 形式 に つい て 記述 する た め の も の で ある 。 


一 般 規 則 : 


1 


各 「 実 数 形式 項目 】 の と と ろ で , 形式 項目 , E 形 式 項目 , 
また は P 形 式 項目 の い ぃ ずれ か 1 つ を 指定 する 。P 形 式 項目 
は , 数 字 デ ー タ に つい て 記述 し て いる も の で を な けれ ば な ら 


な い 。 P 形 式 項目 で 文字 ス トリ ング ・ デー タ て つい て 記述 
し て は な ら な いじ 。 


2. 入力 の 場合 に は , 複素 数 形式 項目 は , デー タ の 流れ 内 の 隣 
接する 2 つの フィ ー ル ド と ある 複素 数 形式 項目 の 実 部 と 虚 
部 (に つい て 記述 す る 。 2 番目 の 実数 形式 項目 を 省略 し た 場 
合 , 2 番目 の 実数 形式 項目 は 最初 の 実数 形式 項目 と 同じ で 
ある も の と みな され る 。 文字 1 を 記入 する と , 
CONVERSTION 条 件 が 起 と る 。 


3 出力 の 場合 に は , 実数 形式 項目 は , 複素 数 デー タ 項 目 の 実 
部 と 虚 部 が デー タ の 流れ の 中 で と る 形 に つい て 記述 す る 。 
2 番目 の 実数 形式 項目 を 省略 し た 場合 , 2 番目 の 実数 形式 
項目 は 最初 の 実数 形式 項目 と 同じ で ある と みな され る 。 複 
素数 の 虚 部 (と 1 と いら 5 文字 が 挿入 され る わけ で は な いら 。 2 
番目 の 実数 形式 項目 ( 1 つ だ け 指 定 さ れ て いる と き は , 最 
初 の 実数 形式 項目 ) が F 形式 項目 か E 形 式 項目 の 場合 は , 
虚 部 の 値 が ゼロ より 小さ いと きじ だ け 内 部 符号 が 印刷 され 
る 。 実 数 形式 項目 が P 形 式 項目 の 場合 は , S ま た は ー ま た 
は 十 と いう ピク チャ ー 文 字 が 指定 され て いる と き K 限 り , 
符号 が 印刷 され る 。 虚 部 (C 1 と いら 文字 を 挿入 し た いと き 
は , デー タ ・ リ スト の 中 で と の 複素 数 デー タ 項 目 を 指定 し 
て いる 変数 の 直後 に 別個 の デー タ 項 目 と し て , [と いら の 文 
字 を 指定 し を な けれ ば を ら な い 。 と の 場合 , この 1 対応 す 
る 形式 項目 ( A 形 式 項目 か P 形 式 項目 ) を 指定 し な けれ ば 
な ら な い 。 


COLUMN 形式 項目 


COLUMN 形 式 項 目 は 次 の ょ うな 形式 を と る 。 


COLUMN (文字 の 位置 ) 


印刷 桁 位置 形式 項目 は , 現在 の 印刷 行 ほ また は 次 の 印刷 行 上 の 指定 
の 文字 位置 に た , ファ イル の 位置 設定 を 行なう た め の も の で ある 。 入 
力 , 出力 の どちら の ファ イル 対し て も と の 形式 項目 を 使用 する と 
と が で きる 。 


一 般 規則 : 


1 「 女 字 の 位置 ] は , こと の 形式 項目 が 使用 さん れる た びに その 
値 か 計算 され , 整数 に 変換 され る 式 で ある ( 変換 され た 後 
の 整数 が 負 で あっ て は な ら な い )。 


2. 現在 の 行 の 上 で , と と で 指定 され て いる 文字 位置 を まだ 過 
ぎ て いな い 場 合 C に は, ファ イル は , 現在 の 行 上 の と の 文字 
位置 に 位置 設定 され る 。 入力 の と き は , と の 文字 位置 ま で 
の 間 に あ る 文字 位置 は 無視 され る 。 出力 の と き は , と と で 
指定 され て いる 文字 位置 まで の 間 に あ る 文字 位置 は ブラン 
ク に な る 。 ファ イル が すでに と と で 指定 され て いる 文字 位 
置 の 後 (位置 設定 され て いる 場合 は , 現在 の 行 の 終り まで 
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行き , 新しい 行 が 開始 され る 。 し た が っ て , と の エ 
うな 場合 に は , と の 形式 項目 は 次 の 行 C 適 用 され る 
と と に て な る 。 


と と で 指定 され て いる 文字 位置 が 現在 の 行 の 右端 の 文字 位 
買 よ りゃ も 右 C あ る 場合 , また は , 文字 位置 と し て 指定 され 
て いる 式 の 値 が ぞ ロ の 場合 に は , 文字 位置 は 1 で ある も の 
と みな され る 。 


年 : 右端 の 交 字 位置 は , 下記 の 要因 に ょ っ て 決ま る 。 


a. 出力 ファ イル 関し て は , 右端 の 文字 位置 は 印刷 行 
の 桁 数 に よっ て 決ま る 。 


b. 入力 ファ イル 関し て は , コン ペイ ラー が 現在 の 論 
理 レ ュー ド の 長 さ を も と に し て 行 の 長 さ , し た が っ 
て , 右端 の 文字 位置 を 決め る 。V 形 式 の レコ ュー ド の 
場合 に は , と うし て 決定 され る 行 の 長 さ は 論理 レ ュ 
ー ド 長 か ら 制御 情報 を 収容 し て いる バイ ト の 数 を 引 
いて 得 ら れ た 値 で ある 。 


デー タ ・ リ スト の 処理 が 終了 する 前 CCOLUMN 形式 項 
目 が 出 て 来 を な いと , と の 形式 項目 は 何 の 効力 も も た な い 。 


GET STRING ま た は PUT STRING ステ ー ト 
メン ト で は , COLUMN 形式 項目 を 使用 し て は を ら な い 。 


E 形式 項目 


E 形 式 項目 は 次 の ょ うな 形式 を と る 。 


EE( フ ィ ー ル ド の 幅 , 小数 部 分 の 桁 数 , 


[ , 有効 数 字 の 桁 数 ] ) 


浮動 小数 点 形式 項目 は , 浮動 小 数 点 形式 の 1 0 進 算術 デ ー タ が 外 
部 媒体 上 で と る 表現 形式 に つい て 記述 する を ため の も の で ある 。 


一 般 規 則 : 
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「 フ ラ ィ ー ル ド の 幅 」 , 「 小 数 部 分 の 桁 数 | , な よび 「 有 効 
数 字 の 桁 数 」 と し て 式 を 指定 し て も と い 。 こと の 形式 項目 が 
使用 され る た び (C, と の 式 の 値 が 計算 され と の 値 が 整数 
変換 され る 。 


「 ラ ィ ー ル ド の 幅 」 と 記さ れ て いる と と ろ で , と の フィー 
ルド の 中 の 文字 の 総数 を 指定 する 。 


「 小 数 部 分 の 桁 数 ] と 記さ れ て いる と と ろ で , 小数 部 の 中 
の 1 0 進 小数 点 より 右側 に ある 桁 数 を 指定 する 。 「 有 効 数 
字 の 桁 数 」 と 記さ ん れ て いる と と ろ で , 小数 部 と し て 必要 な 
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桁 数 を 指定 する 。 


人 入力 の と き に は , デー タ の 流れ の 中 の デー タ 項 目 は , と と 
で 指定 され て いる フィ ー ル ド の 中 の 任意 の 場所 に ある , 特 
号 付 の (任意 選択 ) 10 進 浮動 小数 点 定数 また は 1 0 進 
固定 小数 点 定 数 の 文字 表現 で ある 。 と の デー タ 項 目 が 固定 
小数 点数 の 場合 , 指数 は セロ で ある と 想定 され る 。 


光 動 小数 点数 は 外部 媒体 上 で 次 の よら な 形 を と る 。 


[ キ |- ] 小数 部 0 指数 
民 下 洲 二 1 


小数 部 は 1 0 進 固定 小数 点 定 数 で を けれ ば な を ら な じい 。 


a. 数 は , 指定 され て いる フィ ー ル ド の 中 の どの 場所 に 
あっ て も よい 。 フィー ルド 内 の 数 の 前 後に は プラ ン 
ク が ある の が 普通 で ある が , と の プラ ンク は 無視 さ 
れる 。 た だ し , フィ ー ル ド 全 体 が アラ ンク で ある 場 
合 C に は, CONVERS1ION 条 件 が 起こ と る 。 1 0 進 
小数 点 を 使用 し な い 場 合 (C は , 小数 部 分 の 桁 数 を 表 
わす 式 で , 小数 部 内 の 仮想 上 の 小数 点 の 右側 (だ ある 
文字 位置 の 数 を 指定 す る 。 数 の 中 で 1 0 進 小数 点 が 
使用 され て いる 場合 に は , と の 小数 点 の 方 が 有効 で 
あぁ あり, 形式 項目 で 指定 され て いる 小数 部 分 の 桁 数 は 
無効 と を る 。 


「 フ ィ ー ル ド の 幅 」 で 指定 する 値 と は, 数 の 後 置 

か れる ブラ ンク , 指数 部 の 桁 , ( 正 ま た は 負 の 符号 
を 指定 し て いる 場合 に は ) 符 号 の 桁 , ( 選 と いら 2 文 
字 を 指定 し て いる 場合 に は ) の た め の 桁 , ( 小数 
部 で 1 0 進 小数 点 を 使用 し て いる 場合 に は ) 1 0 進 
小数 点 の 杵 を ども 含ま れる 。 


b. 指数 は 1 0 進 整 数 定数 で ある 。 指数 と 指数 の 前 の 符 
号 を た いし E と いう 文字 を 省略 し た 場合 (C は , 指数 は 
ゼロ で ある と 想定 され る 。 


出力 の 際 に は , 内 部 デー タ が 浮動 小数 点数 の 形 (変換 され , 


外部 媒体 上 の こと と で 指定 され て いる フィ ー ル ド 人 は 次 の よ 上 
う な 一 般 形 式 を と る デー タ 項 目 が 入る 。 


[一 ] 人 s-d の 桁 数 }・{ d の 桁 数 } 
E{ 二 | 一 ) 指数 


と と で , S は 有効 数 字 の 桁 数 で あり , d は 小数 部 分 の 桁 数 
で ある 。 値 は 必要 に 応 じ し て まる め ら れる 。 


a. 指数 は 2 桁 の 1 0 進 整数 定数 で あり , 2 桁 と も ゼロ 


で あっ て も よい 。 小数 部 の 最初 の 桁 が で ロ 以外 の 
数 字 (C に な る よう , 指数 は 自動 的 (C 調 整 さ れる 。 値 が 
ぞ ゼロ の 場合 に は , 1 0 進 小数 点 の 左側 に ある すべ て 
の 数 字 桁 (た だ し , 1 0 進 小数 点 の すぐ 左 の 桁 を 除 
く ) 対 し て ゼ ョ 消去 が 行なわ れ る 。 と れ 以 外 の す 
べ て の 数 字 桁 は ぞ ロ が 入る 。 


b. 上 (示し た 形式 の 数 を 収容 し て も 出力 と し て 指定 さ 
れ て いる フィ ー ル ド K 余 裕 が ある 場合 に は , と の 数 
は 右寄せ され , 数 の 左側 に プラ ンク を つけ て 拡張 さ 
れる 。 有効 数 字 の 桁 数 が 指定 され て いな い 場 合 , 小 
数 部 分 の 桁 数 に 1 を 加え た 数 が その 桁 数 で ある と み 
を され る 。 デー タ 項 目 の 値 が 負 で を い 場 合 は , その 
フラ フィー ルド の 幅 は 有効 数 字 の 桁 数 に 5 を 加え た 数 ま 
た は それ 以上 で な けれ ば を ら な い 。 デー タ 項 目 の 値 
が 負 の 場合 , その フィ ー ル ド の 幅 は 有効 数 字 の 桁 数 
に 6 を 加え た 数 また は それ 以上 で を けれ ば な ら な いじ 。 
ただし, 小数 部 分 の 桁 数 が セロ の 場合 に は , 1 0 進 
小数 点 は 書き 出さ れず , し た が っ て フィ ー ル ド の 幅 
と し て 上 示し た 数 字 が 各々 1 だ け 小 さく を る 。 


c. 計算 機内 部 の デー タ の まる め は 次 の よう に し て 行 を 
われ る 。 切符 て の 結果 右端 の 桁 が 1 つ 失 を な われ, さ 
ら て と の 桁 の 数 字 が 5 以上 の と き は , 切捨て の 行 な 
われ た 桁 の 左 の 桁 た 1 が 加え られ る 。 


b. フィ ー ル ド の 幅 と し て 指定 され て いる 値 が 不適 当 で 
ある た め K 有 効 数 字 が 失 を われ た り , 符号 が 失 な た わ 
れ た りす る と , SIZE 条 件 が 起 と る 。 


F 形式 項目 
F 形式 項目 は 次 の よう な 形式 を と る 。 


F (フィ ー ル ド の 幅 [ , 小数 部 分 の 桁 数 


[っ スネ スケール 因 数 ] 」) 


固定 小数 点 形式 項目 は , 固定 小数 点数 形式 の 1 0 進 算術 デー タ 項 
日 が 外部 媒体 上 で と る 表現 形式 に つい て 記述 する た め の も の で ある 。 


一 般 規 則 : 


「 フ ィ ー ル ド の 幅 , 」 「 小 数 部 分 の 桁 数 , 」 な よび 「 ス 
ケー ル 因 数 ] と し て 要素 式 を 指定 し て も よい 。 要素 式 を 指 
定 し た 場合 , と の 形式 項目 が 使用 さん る と き 要 素 式 の 値 が 
計算 され , 計算 され た 値 が 整数 に 変換 され る 。 と うし て 計 
算 さ れ た フィ ー ル ド の 幅 お よび 小数 部 分 の 桁 数 は , どちら 
$ 負 で あっ て は を ら な い 。 


入力 の 際 に は , デー タ の 流れ の 中 の デー タ 項 目 は , と と で 


指定 され て いる フィ ー ル ド の 中 の 任意 の 場所 C あ る 10 進 
固定 小数 点 定数 ( 必要 (c 応 し て, 符号 が つけ られ て いる ) 
の 文字 表現 と を っ て いる 。 フィ ー ル ド 内 の 数 の 前 後に は ブ 
ラン ク が ある の が 普通 で ある が , と の プラ ンク は 無視 され 
る 。 フィ ー ル ド 全 体 が プラ ンク で ある 場合 に C に は, ゼロ で あ 
る と 解釈 され る 。 


小数 部 分 の 桁 数 を 指定 し な い 場 合 は , ゼロ で ある と みな さ 
れる 。 


スケ ー ル 因数 が 指定 され て お ら ず , し か も フィ ー ル ド 内 
1 0 進 小数 点 が な い 場 合 に は , 小数 部 分 の 桁 数 と し て 指定 
され て いる 式 は , フィー ルド 内 の 仮想 1 0 進 小数 点 よ り 右 
側 に ある 桁 数 を 示す と と に な を る 。 デー タ の 中 実際 10 
進 小数 点 が ある 場合 に は , と の 1 0 進 小数 点 が 有効 で あり , 
小数 部 分 の 桁 数 と し て 指定 さん て いる 式 は 無効 に な る 。 


スケ グール 因数 が 指定 され て いる 場合 デー タ の 流れ の 中 の 
デー タ 項 目 の 値 は , 事実 上 1 0 の p 乗 倍 さ れん た も の (て な る 
( P は スケ ー ル 因数 の 整数 値 )。 し た が っ て , P が 正 で あ 
れ ば , 1 0 進 小数 点 が 右 < p 桁 ず れ を た と とろ (て ある も の と 
し て と の 数 が 取り 扱わ れる 。 P が 負 で あれ ば , 1 0 進 小数 
点 が 左 (< P 桁 ぎ れ た と と ろ に ある も の と し て こと の 数 が 取り 
扱わ れる 。 た だ し , と と で 基 準 と し て いる 1 0 進 小数 点 の 
位置 は 。 フィ ー ル ド 内 (C 1 0 進 小数 点 が ある 場合 に は と れ 
が 置か れ て いる 場所 で あり , フィ ー ル ド 内 1 0 進 小数 点 
が を いら 場 合 に は 小数 部 分 の 桁 数 と し て 指定 され て いる 式 
よ っ て 指示 され る 場所 で ある 。 


出力 の 際 に は , 計算 機内 部 の デー タ が , 必要 応じ て , 固 
定 小数 点数 に 変換 され る 。 外部 媒体 上 の デー タ は , 必要 
応 し て ま る め ら れ , 指定 の フィ ー ル ド K 右 寄せ され て 入れ 
られ て いる 文字 表現 の 1 0 進 固定 小数 点数 で ある 。 


と の 形式 項目 の 中 で フィ ー ル ド の 幅 だ けが 指定 され て いる 
場合 に は , と の 数 の 整数 部 分 し か 書き 出さ れ な を い 。 1 0 進 
小数 点 も 書き 出さ れ を じ 。 


フィ ー ル ド の 幅 ゃ 小数 部 分 の 桁 数 も 指定 され て いる が , ス 
ケー ル 因 数 は 指定 され て い を いと いう 9 場合 に は, と の 数 の 
整数 部 分 も 小数 部 分 も 共 < 書 き 出 され る 。 と の よう な 場合 , 
小数 部 分 の 桁 数 と し て 指定 され た 値 ( d ) が ぞ ロ より 大 き 
けれ ば 右端 か ら d 桁 目 の 左 (< 1 0 進 小数 点 が 挿 信 され る 。 
また , 小数 部 分 の 桁 数 が d より 小さ い 場 合 に は , 数 字 桁 の 
後に ぞ ロ が つけ 加え られ る (dd は フィ ー ル ド の 幅 よ り 小 さ 
く を けれ ば を ならない )。 
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1 0 進 小数 点 の 左側 に ある すべ て の 数 字 桁 ( ただし, 10 
進 小数 点 の すぐ 左 の 桁 を 除く ) 対し て は , 先行 ギ ロ の 消 
去 が 行なわ れる 。 


計算 機内 部 の デー タ の まる め は , 次 の よう に し て 行なわ れ 
る 。 切捨て の 結果 右端 の 桁 よ 1 つ 失 を われ , さら に と の 桁 
の 数 字 が 5 以上 の 場合 , 切り 捨て られ た 桁 の 左 の 桁 に 1 が 
加 を られ る 。 


スケ ー ル 因数 が 指定 され て いる 場合 ( スケ ー ル 因数 の 整数 
値 を D と する ), デー タ ・ リ スト の 中 の 対応 す る 要素 の 値 
は , 事実 上 , 1 0 の p 乗 倍 さ れ て か ら 外 部 媒体 上 で と る ベ 
き 文 字 表 現に 編 集 さ れる 。 また , 小数 部 分 の 桁 数 が ぞ ロ の 
場合 に は , と の 数 の 整数 部 分 だ けが 書き 出さ れる 。 


出力 の 際 。 と と で 指定 され て いる 固定 小数 点数 の 値 が ゼロ 
より 小さ い 場 合 に は , 外部 媒体 上 の と の 数 の 文字 表現 の 左 
KC 負 符号 が つく 。 固定 小数 点数 が セロ 以上 の 場合 に は , 待 
号 は つか を い 。 し た が っ て , 固定 小数 点数 の 値 が 負 の 場合 
(て は , フィ ー ル ド の 幅 と し て 指定 され た 値 は 符号 な よび 10 
進 小 数 点 の た め の 文 字 位置 を 含ん で い を けれ ば を ら な じ 。 


フィ ー ル ド の 幅 が 充分 で を いた め K 文 字 が 失わ れる よう な 
と と が ある と , STZE 条件 が 起 と る 。 


LINE 形式 項目 
LINE 形 式 項目 は 次 の ょ うな 形式 を と る 。 
LINE (印刷 行 番号 ) 


印刷 行 位置 形式 項目 は , PR INT ファ イル の 現在 の ベ ページ また 
は 次 の ペー ジ に お いて 次 の デー タ 項 目 を 印刷 すべ き 印 刷 行 を 指定 す 
る た め の も の で ある 。 


一 般 規 則 : 


1 「 印 刷 行 番号 ) と し て 式 を 指定 する と と が で きる 。 式 を 指 
定 し た 場合 , この 形式 項目 が 使用 され る た びに と の 式 の 値 
が 計算 され , 計算 され た 値 が 整数 (C 変 換 さ れる (変換 さ 
れ た 人 後 の 整 数 が 負 で あっ て は な ら な い )。 


2. 必要 応じ て, プラ ンク 行 が 挿入 され る 。 


う . と と で 指定 され て いる 印刷 行 番号 が 現在 の 印刷 行 番号 以下 
で ある 場合 . また は , OPEN ステー トメント の PAGESTIZE 
オプ ショ ン (を いし 省略 時 オプ ショ ン ) で 定め られ 
て いる 限界 を 越え を る も の で ある 場合 は , ENDPAGE 
条件 が 起こ と る 。 た だ し , と と で 指定 され て いる 印刷 行 番号 
が 現在 の 印刷 行 番号 C 等 し く , その 1 桁 目 の 文字 が まだ 転 
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送 さ ん れ てい ない 場 合 に は , SKIP (0 ) 項目 と 同様 の 措 
置 が と られ る (すなわち, 行 送り を せ ず K 紙 送り 機構 が 戻 
5: 


4. 「 印 刷 行 番号 |」 が ゼロ の と き は , と の 番号 が 1 で ある と み 
を され る 。 


5. デー タ ・ リ スト の 処理 が 終了 する 前 に L INE 形式 項目 が 
出 て 来 を いと, と の 形式 項目 は 何 の 効 力も も た な い 。 


P 形式 項目 
P 形 式 項目 は 次 の ょ うな 形式 を と る 。 
P ( ビク チャ ー 指 定 ) 


ビク チャ ー 形 式 項目 は , 数 字 デ ー タ お よび 廊 字 スト リン グ ・ デ 
ー タ が 外部 媒体 上 で と る 表現 形式 に つい て 記述 する た め の も の で あ 
る 。 


「 ビ ピクチャ ー 指 定 ] に つい て 詳し く は , 「D 節 : ビク チャ ー 指 
定 用 の 文字 ] 到 よ び 「1 節 : 属性 ] の PICTURE 属性 の 項 を 
参照 され た い 。 


入力 の 際 に は , ピク チャ ー 指 定 は , デー タ の 流れ の 中 の デー タ 項 
目 の 形 (に つい て 記述 する 働き を し , さら , 数 字 指 定 C 関 し て は 
デー タ 項 目 の 算 術 値 の 解釈 方 法 に つい て 指示 する 働き を する 。 ビク 
チャ ー 指 定 で は , 入力 の 流れ の 中 の デー タ に つい て , 編集 文字 に よ 
っ て 表現 され て いる 文字 も 含め て 正確 CK 記述 し な けれ ば な を ら な を いと 
いう 点 と 注意 され た い 。 ビク チャ ー 指 定 で 指示 され て いる 文字 が 入 
力 の 流れ の 中 現われ を いと , CONVERSION 条件 が 起 と る 。 


出力 の 際 C に は, デー タ ・ リ スト の 中 の 対応 す る 要素 の 値 は , ピク 
チャ ー 指 定 で 指定 され て いる 形 K 変 換 さ れ て か ら , デー タ の 流れ 
書き 出さ れる 。 


PAGE 形式 項目 


PAGE 形式 項目 は 次 の よう な 形式 を と る 。 

PAGE 
ペー ジ 形 式 項目 は , 新しい ペー ジ を 且 始 す る よら 指定 する た め の 
も の で ある 。 と の 形式 項目 は , PRINT ファ イル 対し て だ け 使 


用 する と と が で きる 。 


一 般 規 則 : 


新しい ペー ジ を 開始 する と いう と と は , 次 の ペー ジ の 最初 
の 印刷 行 K ファ イル を 位置 設定 する と と を 意味 する 。 


デー タ ・ リ スト の 処理 が 終了 する 前 に P AGE 形 式 項目 が 
出 て 来 を いと , と の 形式 項目 は 何 の 効 力も も た な い 。 


R 形式 項目 
R 形 式 項目 は 次 の よう な 形式 を と る 。 
R ( ステ ー ト メン ト ・ ラ ベル 標識 ) 


遠隔 形式 項目 を 使用 する と , FORMAT ステ ー ト メン ト の 形式 
項目 (と よって, と の 遠隔 形式 項目 を 買 き 換え る と と が で きる 。 


一 般 規 則 : 


「 ス テー トメ ント ・ ラ ベル 標識 」 は , FORMAT ス テー トメ ント の 
ステ ー ト メン ト ・ ラ ベル を その 値 と する ラベ ル を 表 わす ラベ ル 定 
数 , 要素 ラベ ル 変 数 , また は 関数 参照 で も る 。 な おぉ , と の 


FORMAT ス テー トメ ント は 形式 リス ト が 含ま れ て な り . 


と れ が 形式 項目 と 思 き 換え られ る 。 


R 形 式 項 目 と R 形 式 項目 で 指定 され て いる FORMAT ステ ー 
トメ ント と は , 同じ ブロ ッ ク の 内 部 (な けれ ば な ら を い 。 ( さら 
(CC, とれ ら が 回 帰 的 に 実行 され る プロ シー ジャ ー の 中 ある 場 
合 に は , と れ ら は 同一 の 呼出 し で 実行 さん な けれ ば な ら な じい 。 ) 


FORMAT ステ ー ト メン ト の 内 部 回帰 が あっ て は を ならない 。 
すなわち , 遠隔 FORMAT ス テー トメ ント の 中 (C, ステ ー ト メン 
ト ・ ラ ベル 標識 と し て その ステ ー ト メン ト 自体 を 指名 し て いる 
R 形 式 項目 が あっ て は を な ら な いし, と の R 形 式 項 目 が , 当初 の 
FORMAT ステ ー ト メン ト の 指名 に つ を が る よう な 別 の 遠隔 
FORMAT ステ ー ト メン ト を 指名 し て は な ら を な い 。 と の よう な 
回 帰 を 半 け る C は , 遠隔 形式 項目 の 中 で 参照 され て いる 
FORMAT ステ ー ト メン ト て さら K 別 の 遠隔 形式 項目 を 書 
き 入 れる と と の な い + ら 注意 すれ ば ょ よい 。 


GET ま た は PUT ス テー トメ ント を 実行 する と き 解 禁 状態 
て あ る 条件 は , R 形 式 項目 で 参照 され る 遠隔 FORMAT ステ 
ー ト メン ト の 実行 時 に ゃ 解禁 状態 た な けれ ば な を ならない 。 


オン ジン ・ ユ ニッ ト が GEET ス テー トメ ント また は PUT ステ 
ー ト メン ト だ け で 構成 され て いる と き (C て は, と の ステ ー ト 
メン ト の 中 で 遠隔 形式 項目 を 使う と と は で き な い 。 


SKIP 形式 項目 


SK TIP 形式 項目 は 次 の よう な 形式 を と る 。 


SKIP [ (次 の 行 の 相対 的 を 位置 ) ] 


行 ス キッ プ 形 式 項目 は 新しい 行 を 開始 する よう 指定 する た め の も の で ある 。 


一 般 規 則 : 


中 


「 次 の 行 の 相対 的 な 位置 | と し て 要素 式 を 指定 する と と が で 
きる 。 妥 素 式 を 指定 し た 場合 . この 形式 項目 が 使用 され る た 
びと 要素 式 の 値 が 計算 され , 計算 され た 値 が 整数 に 変換 され 
る ( 変換 され た 後 の 整 数 が 負 で あっ て は を ならない )。PRINT 
ファ イル 以外 の ファ イル を 対象 と し て いる 場合 は , と の 値 は ゼ 
ロ よ り 大 きく な けれ ば を ら な い 。 と れ が ゼロ 以下 で あっ た り , と 
れ を 省略 し た り し た 場合 (C は , この 値 が 1 で ある と みな され る 。 


現在 の 行か ら こ と と で 指定 され て いる 行 数 だ け 先 の 行 が 新しい 
行 と を る 。 


「 次 の 行 の 相対 的 な 位置 」 の 値 が 1 より 大 きい 場合 , 入力 
の と き は 1 行 以上 の 行 が 無視 され , 出力 の と き は 1 行 以上 
の プラ ンク タク 行 が 挿入 され る 。 


PR INT ファ イル を 対象 と し て いる 場合 に 限 り ,「 次 の 行 の 相 
装 向 位置 」 の 値 が で ぞ で ロ g で も よい 。 値 が ぞ ロ の 場合 は , 行 
送り を せ ず (KC 紙 送 り 機 構 が 最初 の 印刷 桁 こ 戻る 。 し た が っ 
て , す で を 文字 が 印刷 さん て いる と , その 部 分 に は 文字 が 
重複 し て 印刷 さん る と と し な る 。 


PR INT ファ イル の 場合 に は , と と で 指定 され て いる 次 の 行 の 
相対 的 を 位置 が OPEN ステ ー ト メン ト の PAGESTZB オ プシ 
ョ ン (また は , 省略 時 オプ ショ ン ) (て よっ て 定め られ て いる 
限界 を 越 を て いる と , ENDPAGE 条 件 が 起こ と る 。 


デー タ ・ リ スト の 処理 が 完了 する 前 に SKIP 形式 項目 が 
出 て 来 を いと , この 形式 項目 は 何 の 効 力も も た な い 。 


形式 項目 


形式 項目 は 次 の よう な 形式 を と る 。 


文 ( フ ィ ー ル ド の 幅 ) 


ス ペー ス 形 式 項 目 は ,。 デー タ の 流れ の 中 の デー タ 項 目 と デー タ 項 
目 と の 間隔 を 指示 す る た め の も の で ある 。 PRINTT ファ イル 以外 
の ファ イル 対し て も と の 形式 項目 を 使用 する と と が で きる 。 


一 般 規 則 : 


上 


「 フ ィ ー ル ド の 幅 」 は , と の 形式 項目 が 使用 さん る た び 
その 値 が 計算 され , 計算 され た 値 が 整数 に 変換 され る 式 で 
ある (変換 され た 後 の 整 数 が 負 で あっ て は な ら な ひい ) 。 と 
の 整数 は , デー タ の 流れ の 中 の 現在 位置 か ら 次 の フィ ー ル 
ド ま で の プラ ンク の 数 を 指定 する る の で ある 。 
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入力 の と き は , デー タ の 流れ の 中 で , 指定 の 桁 数 分 の 文字 
が 飛び 越 さ れ , これ ら の 文字 は プロ グラ ょ 転送 され を い 。 


出力 の と き は , 指定 の 桁 数 分 の プラ ンク 文字 が デー タ の 流 
れ し 挿 入 さ れる 。 


デー タ ・ リ スト の 処理 が 終了 する 前 に スペ ー ス 形式 項目 が 
出 て 来 を いと , と の 形式 項目 は 何 の 効 も も る た な い 。 


DOS PL ノ 1 最適 化 フ セン バイ ラー : 言語 解説 書 第 2 部 


人 先 大 位 ーー ニーーーーーーーーーーーーーーーーーーーー 


オペ ラン ド が コー ド 化 算術 形式 の 
場合 変換 は 不要 
オォ ベラ ンド が 固定 小数 点 1 0 進数 の 
目標 フィ ー ル ド : CHARACTER ス トリ ング 表現 な いし 
FIXED DEC IMAL | 数 字 (PICTURE) 表 現 を と っ て いる 場合 
接頭 演算 子 十 , 一 オペ ラン ド は FIXED DECIMAL 変換 され る 
オペ ラン ド が 治 動 小数 点 1 0 進数 の 
*・ 数 字 (PICTURE ) 表現 を と っ て いる 場合 
FLOAT DECIMAL | オペ ラン ド は FLOAT DEC IMAL 
変換 され る 。 
目標 フィー ルド ・ オペ ラン ド が BIT ス トリ ング の 場合 オペ ラン ド 
FIXED BINARY | は FIXED BINARY に 変換 され る 


双方 の オペ ベラ ンド が BINARY の 場合 ,。 BIT 


一 方 の オペ ラン ド ま た は 双方 の オペ ラン ド が 

CHARACTER な いし DEC IMAL の 場合 , 

CHARACTER で を い オ ペラ ンド が CHARACTER 

て 変換 され る 

で な い オ ペラ ンド が BITK 変 換 さ れる 
区 IEOZ2FZcs BIT | prTMt の テー クロ すべ て BIT 疲れ る 


PE すべ て の 形 の 割当 て の 目標 フィ ー ル ド の 属性 を 


図 愉 1 演算 の 優先 順位 と 変換 規則 の 手引 

演算 子 は , 優先 順位 に 従っ て あげ て ある 。 し た が っ て , 第 1 グル ー プ が 優先 大 位 の 一 番 上 の も の で あり , 第 7 グル ー プ が 一 番 下 の 
も の で ある 。 同 一 の 優先 原 位 の 欄 【C あ げ られ て いる 演算 子 は すべ て 同じ 優先 原 位 の も の で ある 。 た と えば , 指数 演算 子 キネ の 優先 順 
位 は , 接頭 演算 子 二 な よび ー や 「not」 演算 子 の 優先 怖 位 と 同じ で ある 。 

1 つの 式 の 中 優先 順位 1 の 演算 子 が 2 つ 以 上 ある 場合 は , 式 の 中 で の これ ら の 演算 子 の 位置 が 右側 の も の ほど , その 優先 原 位 が 
上 で ある 。 し た が っ て , 一 番 右 側 C あ る 指数 演算 子 ま た は 接頭 演算 子 二 を ない レー* た は 一 演 算 子 が 一 番 上 の 優先 順位 を も つと と C な 
る 。 以 下 , 順 (C, 左 行 く 人 ほど 優先 原 位 は 下 (C な る 。 とれ ら の 演算 子 以外 の すべ て の 演算 子 (と 関し て は , 1 つの 式 の 中 同じ 優先 順 
位 の 注 算 子 が 2 つ 以 上 ある 場合 , その 相互 の 優先 順位 は 式 の 中 の 演算 子 の 位置 が 左側 に ある 儲 ど その 演算 子 の 優先 原 位 は 上 に を る 。 


目標 フィ ー ル ド : 
CHARACTER 


オペラ ンド が BIT と BINARY の 場合 また は 


目標 フィ ー ル ド : BITT 


CEIL 値 の 表 


1 0 進数 と 2 進数 の 間 で 変換 が 行 を われ る 場合 に は , 精度 属性 の 値 を 
3 .32 で 除算 ふい し 乗算 し , この 結果 を 整数 に まる め る 必要 が ある 。 
右 の 表 は こと の 除算 な いし 乗算 と まる め の 後 の 結果 を 示し た も の で ある 。 

原 フ ィ ー ル ド の 精度 属性 が 正 で あ る 場合 に は , 乗算 の あと 積 の 小数 点 
以下 の 端数 を 切り 上 げ て 得 ら れる 整数 ( PL ノ 1 の 用 語 で は , CEIL 
値 ) が と られ る 。 た と えば, 

5 キネ ぅ 3.32=16.6 

CEIL(16.6 ) =17 

し た が っ て , 新しい 精度 属性 は 1 7 で ある 。 
と の 最終 結果 は 右 の 表 か ら 直 接 読み 取る と と も で きる 。 
すなわち , CEIL(n キ 53.32 ) の 欄 の nー5 の と と ろ を 見 る と , 1 7 
と 記さ れ て いる 。 

原 フ ィ ー ル ド の 精度 属性 が 負 の 場合 ( 精度 属性 の スケ ー ル 因数 は ぉ お そ 
らく 負 ) は , 結果 の 絶対 値 の 小数 点 以下 の 端数 を 切り 上 げ , と れ し 本 来 
の 符号 を つけ て 得 ら れる 整数 ( PL ン TI の 用 語 で は , FLOOR 値 ) が と 
られ る 。 た と えば げ , 

(-5) ネ 3 る.32= ニ (一 16 .6) 

FLOOR (-16.6 ) = (一 17 ) 

し た が っ て , 新しい スケ ー ル 因数 は ーー 1 7 で ある 。 
と の 例 か ら 正 の 値 の み を ら ず 負 の 値 の 場合 に も 右 の 表 を 利用 で きる と と 
が わか る で あろ ら うら 。 すなわち, 

FLOOR(-n)=ーCEIL(n) 


図 F. 2 


CEIL(n ン 5.32) 


1 一 3 

4 一 6 

アー 
10 一 13 
14 一 16 
17ー19 
20 一 23 
24 一 26 
27 一 29 
30 一 33 
34 一 36 
37 一 39 
40--43 
44 一 46 
47 一 49 
由 王 る 
お る 
いく 人 
60 一 63 
64 一 66 
67 一 69 
/ 二 の る 
74 一 76 
りー の ん 
80 一 82 
83ー86 
67 一 89》 
7?0 一 2 
9?3 一 %6 
?7ー?9 
100-102 
103-106 
107ー109 
3 2 
113 一 116 


ーー 7 2 半 ーー 、2 こ 
So の 6 や ひひ の ょ の いつ らら SS oo aa は ょ ob ユ 


IDO IO DD いい DO いい いい 
の の R Q いい っ の 


ト O 
OO 


ov QO OO トト OS 
FOO ー 〇 ^ ヽ SO 


の OO! ( 〇 
の 忌 の 


CEIL(n ネ 3.32) と CEIL (n ン 3.32 ) の 値 


以下 の 事例 は いずれ か の 属性 へ の 変換 を 引き 起 と す : 
事例 

割当 て 

式 の オペ ラン ド 

流れ 入力 ( GET ス テー トメ ント ) 

流れ 出力 ( PUT ス テー トメ ント ) 


PROCEDURE ま た は ENTRY へ の 引数 
組込み 関数 ま た は 擬似 変数 へ の 引数 

INITI AL 属性 
RETURN ステ ー ト メン ト の 式 

DO ステー トメ ント , BY また は TO オプション 


以下 の ステ ー ト メン ト は 文字 スト リン グ へ の 変換 を 引き 起 と す : 
ステ ー ト メン ト オプ ショ ン 
DISPLAY 
レコ ー ド 入出 力 KEYFROM 
KEY 


OPEN TITLE 


以下 の ステ ー ト メン ト は 2 進 整 数 へ の 変換 を 引き 起 と す : 
ステ ー ト メン ト 
DECLARE プ ALLOCATE ノ DEFAULT 


DELAY 


FORMAT 
( お よび GET と PUT の 
形式 項目 ) 


WAIT ステ ー ト メン ト 
ステ ー ト メン トト 一般 


図 T.3 変換 を 引き 起 と す 条 件 


目標 フィ ー ル ド の 属 性 

割当 て 記号 の 左側 に ある 変数 の 属性 

式 の 値 を 計算 する 規則 従っ て 決め られ る 

受取 り 側 フィ ー ル ド の 属性 

編集 指示 の 流れ で ある 場合 形式 リス ト に よっ て 決め られ る 
と れ 以 外 の 場合 は 文字 スト リン グ 

対応 する バラ メー ター の 属性 

関数 また は 擬似 変数 CK ょ っ て 決ま る 

初期 値 化 され る 変数 の 他 の 属性 

PROCEDURE ま た は ENTRY ス テー トメ ント で 指定 され て いる 属性 
制御 変数 の 属性 


スト リン グ の 長 さ の 最大 値 

原 フ ィ ー ル ド , 最大 7 2 文字 

指定 され て いる キー の 長 さ 十 8 

指定 され て いる キー の 長 さ 十 8 

変換 規則 に 従っ て 決め られ る 。 最大 8 文字 


オプ ブシ ョ ング 属性 ノ 参 
長 さ , 大 き さ 
欧 元 , 限界 , 
繰返し 因数 
ミリ セカ ンド 
反復 因数 

W 

d 

S 

p 
LINESTIZE 
PAGESTZE 
SKIP 
LINE 
IGNORE 
式 の オプ ショ ン 
義 字 


ュー ュー 一 
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と の 節 の 目的 は , ユー ザー が , 混成 式 (問題 処理 デー タ も 含め て ) 
を 分 析 し て , 個々 の 混成 式 に な いて どの よう な 変換 が 行 を われ る か 
を 判断 し , と の ょ うな 変換 が 式 の 最終 結果 に どの よう な 影響 を 及ぼ 
すか を 見 る 上 で の 便宜 を 提供 する と と で ある 。 と と で は , 割当 て を 
混成 式 の 特別 の 例 で ある と みな を す と と に する 。 ある 式 が 次 の いずれ 
か (該当 する と き , と の 式 は 「 混 成 ] 式 と 呼ば れる 。 


上 オペ ラン ド の 属性 が 同一 で を い 。 
たとえば, 


DCL A CHAR(6), B FIXED BINARY(31): 
A= テ B 


と の 場合 , B は , AKC 割 り 当 て られ る 前 に , 文字 スト リン 
グ の 形 に 変換 され る 。 


2. 行なわ れる 演算 に 適合 し な い 属 性 を も る つ オ ペラ ンド が ある 。 
た と を ぇ ぴ ば, 


DCL C BIT(10) VARYING : 
C=C 十 Ci 


と の 場合 , 加算 が 行なわ れる 前 に C は 人 算術 値 に 変換 され る 。 
さら と, と の 加算 の 和 (算術 値 ) は , CK 再び 割り 当て ら 
れる 前 (C,。 ビッ ト ・ ス トリ ング の 形 (変換 され る 。 


と の 節 で は , と の よう な 変換 を 引き 起 と こす 条件 を ら び 変換 規則 
を すべ て 取り 上 げ る 。 


割当 て や 式 の 値 の 計算 以外 の 場合 に も , 変換 が 行なわ れる と と が 
ある 。 と の よ ょ うな 場合 に も , と の 節 (C 示 す 規 則 を 直接 適用 する と と 
が で きる 。 図 F.3 は 変換 を 引き 起こ と す よ うな 条件 を すべ て 列挙 し た 
る も の で ある 。 


説明 の 順序 


変換 規則 に つい て は , 図 選 1 , 図 民 4 , 図 選 5, お よび 原 フ ィ ー 
ルド ・ 目 標 フ ィ ー ル ド 変 換 規 則 の 項 で 説明 され て いる 。 


図 選 1 は, 実施 され る 演算 を 列挙 し て , 式 の 値 を 計算 する に あ た 
っ て の 演算 の 優先 順位 を 示し た も の で ある 。 と の 図 に た は , さら に , 
図 愉 4 な よび 図 民 5 を 参照 する 際 の 指針 が 載っ て お り , どの 原 フ ィ 
ー ル ド ・ 目 標 ラ フィ ー ル ドド 変換 規則 を 見 れ ば ょ より 詳細 を 説明 が 得 られ 


る か も 示さ れ て いる 。 


図 選 4 は 。 すべ て の 算術 演算 C つ いて 各々 どの よう な 変換 が 行 な 
われ る か を 示し た も の で ある 。 


図 選 5 は , 問題 処理 デー タ の 比較 の すべ て に つい て , 各々 どの よ 
う な 変換 が 行なわ れる か を 示し た も の で ある 。 


以下 に あげ る デー タ ・ タ イプ の 各々 (ついて, 原 フ ィ ー ル ド ・ 目 
標 ラ フィ ー ル ド 変 換 規 則 を 示す 。 


ュー ド 化 算術 形式 : 


FIXED BINARY 
FIXED DECIMAL 
FLOAT BINARY 
FLOAT DECIMAL 


PICTURE (数 字 ) 


CHARACTER 


BIT 


以下 の ペー ジ で は , 上 記 の デー タ ・ タ イプ を それ ぞ わ 目標 フィー 
ルド の デー タ と し て 取り 上 げ , 他 の デー タ ・ タ イプ の デー タ が 原 フ 
ィ ー ル ド C あ る 場合 の 変換 規則 を すべ て 示し て ある 。 演算 子 が 含ま 
れ て いな いし 変換 で あっ て も , つね (と, 以下 (と 示す 原 フ ィ ー ル ド ・ 有 目 
標 フ ラフィ ー ル 変換 規則 を 直接 適用 する と と が で きる 。 と の 点 に つい 
て は , 図 F.3 を 参照 され た い 。 


次 の 図 は , 図 選 1 , 図 4 , 図 選 5 , お よび 原 フ ィ ー ル ド ・ 目 標 
フラ フィー ルド 変換 規則 の 相互 関係 を 示し た も の で ある 。 


[ET サ ーーーーーーー-- 
as | 
し 華 % 丁  」 
F 
エーーー ュ 
| F.5 図 
| 「 
V V V 
(83 2 
「 原 フ ィ ー ル ド ・ 目 標 フ ィ ー ル ド 変換 規則 
(デー ンー ニュ ーー ニニ ーー ニー ニー ニー ニー ココ 


と れ ら の 外 K 図 愉 2 が ある が , これ は 変換 後 の 精 度 を 新た (計算 
する 際 の 手助け を し ょ うと する も の で ある 。 


と の 節 の 図 の 配置 は , ある 特定 の ペー ジ を 読み を が ら , 関係 する 
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情報 の 大 部 分 に 目 を 通す こと が で きる よう 工夫 され て いる 。 つま 
り , 図 選 1 と 図 F.2 は 一 緒 に 本 文 と は 別 の 折込 み ペ ー ジ KC 収録 され 
て お り , 図 F4 と 図 選 5 は それ ぞ れ と の 節 の 末尾 の 折込 み ペ ー ジ に 
収録 され て いる 。 し た が っ て , 図 選 1 , 図 選 2, 図 .4 また は 図 F. 
5, それ 特定 の 原 フ ィ ー ル ド ・ 目 標 フ ィ ー ル ドド 変換 規則 の 四 者 に 
同時 に 目 を 通す こと が で きる 。 


変換 規則 の 使用 例 


次 の 例 は , 図 お よび 原 フ ィ ー ル ド ・ 目 標 ラ フィ ー ル ド 変 換 規 則 の 使 
用 方 法 を 示す た め の も の で ある 。 


DCL FB FIXED BINARY(5 ), 
FD FIXED DECIMAL(5,2 ), 
CH CHARACTER(12 ): 

CH= 4 . 2 ド FB 十 FD : 


図 F. 1 に 示さ れ て いる 優先 順位 か ら , と の 割当 て ステ ー ト メン ト 
は 次 の 3 ステッ プ を 分 け て 実行 され る と と が わか る 。 


1 結果 1 = 4 .2EB 
2. 結果 2 = 結果 1+FD 
3. CH = 結果 2 


各 ス テッ プ の 結果 の 属性 を 求め る 方 法 を 次 に 説明 する 。 
ステ ッ プ 1 


定数 4.2 に 対し て , FIXED DECIMAL ( 2 , 1 ) と いう 属 
性 が 暗示 され る 。 


図 F.4 a を 見 て , と の 定数 の 属性 を 第 1 オペ ラン ド の 属性 と し , 
FB の 属性 を 第 2 オペ ラン ド の 属性 と する 欄 を 探す 。 す る と , 5 と 
いう 参照 コー ド が 得 ら れる 。 図 .4 c の 参照 コー ド 5 の 欄 を 見 る と , 
と の 結果 の 属性 が FIXED BINARY ( p , q ) で ある と と が 
わか る 。 と の 乗算 の 精度 は 次 の よう 計算 する 。 
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pf 二 (1 十 2 キ 3 .32) 圭 51 4 
q ニ =( 1* ネ 3 .32 ) 十 0=4 


・ 結果 1 の 属性 は FIXED BINARY( 1 4 , 4 ) で ある 。 


ステ ッ プ 2 


まず , 図 F.4 a を 使 5。 結 果 1 の 属性 を 第 1 オペ ラン ド の 属性 と 
し , FD の 属性 を 第 2 オペ ラン ド の 属性 と する 欄 を 探す と 7 と いう 
参照 コー ド が 得 ら れる 。 図 F.4 c の 参照 コー ド 7 の 欄 を 見 る と , 結 
果 の 属性 が FITXED BINARY(p , q ) で ある と と が わか る 。 
と の 加算 の 精度 は 次 の よら とし て 求め る 。 


p デ 1TMAX (14-4,((1 十 5 3.32)-2 3.32 ) ) 十 7 = 19 
q MAX ( 4 , ( 23 .32 ) )=7 


・ 結果 2 の 属性 は FIXED BINARY(19,7 ) で ある 。 


ステ ッ プ 3 


原 フ ィ ー ル ド ・ 目標 ラ フィ ー ル ドド 変換 規則 の 中 の F 1 XED 
BINARY か ら CHARACTER へ の 変換 規則 を 見 る 。 原 フィ ー ル ド の 
デー タ は , まず , FIXED DECIMAL( p , q ) KC 変換 され る 。 
で 


p 三 1 十 19 プ 3.32 =7 
d す デア ジン 3 32='5 


原 フ ィ ー ル ド が FIXED DEC IMAL で あり , 日 標 ラ フィール 

ド が CHARACTER で ある 場合 の 変換 規則 を 調べ る 。 す る と , 
と の 1 0 進 定数 な ひと まず 長 さ 1 0 の スト リン グ 割 り 当 て られ る 
と と が わか る 。 


と の スト リン グ が CH 割り 当て られ, C H の 右端 に プラ ンタ ク 文 
字 が 2 つ 補 充 さ れる 。 


ペー 


原 フ ィ ー ル ド : 目標 フィー ルド : コー ド 化 人 算術 形式 


コー ドド 化 人 算術 形式 


FIXED BINARY, FTIXED DECIMAL, FLOAT BINARY, FLOAT DECIMAL の 4 つの デー タ 
・ タ イプ は すべ て , コー ド 化 算術 デー タ で ある 。 とれ ら の デー タ ・ タ イブ の 間 で 行 を われ る 変換 の 規則 は , 目標 フィ ー ル ド 
と し て 各々 の デー タ ・ タ イプ を 取り 上げ て ある と と ろ (C 示 され て いる 。 し か し , 次 の 一 般 的 を 注意 事項 を 心 に 留め て お いて 
いた だ きた い 。 


・ 1 0 進数 を 2 進数 に 変換 する 場合 , な ふ ょ び , 固定 小数 点 1 0 進数 と 浮動 小数 点 1 0 進 散 と の 間 で 変換 を 行う 場合 
は , 右端 の 桁 の 切捨て の た め 値 に 小さ を 差 が お 生ずる と と が ある 。 


・ 複素 数 値 を 実数 値 と 変換 する 場合 に は , 虚数 部 が 無視 され る 。 実 数 値 を 複素 数 値 C 変 換 する 場合 に は , 虚数 部 は ゼロ 
(て を る 。 


ヽ PICTURE (数 字 ) 


デー タ は , まず , 1 0 進数 で ある と 解釈 され , 対応 する PICTURE 指定 を も $ と (と し て スケ ー ル と 精度 が 決定 され る 。 と 
の 後 , と の デー タ 項 目 は 目標 フィ ー ル ド の 基数 , スケ ー ル , モー ド , お よび 精度 (変換 され る 。 目標 フィ ー ル ド と し て コー 
ド 化 算術 デー タ を 取り 上 げ て いる ペー ジ で , 原 フ ィ ー ル ド と し て FIXED DECIMAL ま た は FLOAT DECIMAL 
を 使用 する 項目 を 参照 の と と 。 


CHARACTER 


On 原 フ ィ ー ル ド の スト リン グ は 有効 を 算術 定数 また は 複素 数 式 を 表わし て いな けれ ば を ら な を ない 。 と れ 反 すると, 
CONVERSTON 条 件 が 起こ る ( た だ し , と の 条件 が 解禁 状態 に ある 場合 に 限る ) 。 定 数 に は 符号 が つい て いて も よい 。 
また , 定数 の 前 後に プラ ンク が あっ て も よい 。 し か し , 符号 と 値 の 間 に デ プラ ンク が あっ て は な ら な い 。 ま た, 複素 数 式 の 実 
数 部 の 末尾 と 虚数 部 の 直前 に ある 符号 と の 間 C に プラ ンク が あっ て は な ら な を な い 。 


ナル ・ ス トリ ング の 値 は ゼロ (C な る 。 


定数 は , 基数 , スケ ー ル , モー ド , 精度 の 属性 を も っ て いる は ず で ある 。 日 標 フ ラフ ィ ー ル ドド の 属性 が ( た と えば, 割当 て の 場 
合 の よう ) 原 フ ィ ー ル ド の 属性 か ら 独 立 し て いる 場合 に は , 定数 は 目標 ラフ ィ ー ル ド の 属性 (変換 さ れる 。 目標 フィー ルド 

\ の デー タ と し て コー ド 化 算術 デー タ を 取り 上 げ て いる ペー ジ で , 原 フ ィ ー ル ド と し て 定数 の 属性 を 使用 する 項目 を 参照 の と 
ia 


た だ し , 中 間 目 標 フ ィ ー ル ドド が 必要 を 場合 ( たとえ ば, 演算 式 の 値 を 計算 する 場合 ) は , と の 中 間 目 標 ラ フィ ー ル ド の 属性 は , 
スト リン グ の 代り 精度 が ( 1 5 , 0 ) の 1 0 進 固定 小数 点 整数 が あっ た と き (C と られ る よう な 属性 と を る 。 ( し た が っ て , 
コン バイ ラー は , スト リン グ 《 含 まれ て いる 定数 の 属性 に か か わり を く , すべ て の 事例 を 処理 する ため の コー ド を 生成 する 
と と が で きる 。 ) し た が っ て , 定数 小数 部 分 が か ある と と この 小数 部 分 は 失わ れる 。 目標 フィー ルド の デー タ ・ タ イブ と し て 
ュー ド 化 算術 デー タ を 取り 上 げ て いる ペー ジ で , 原 フ ィ ー ル ド と し て FIXED DECIMAL を 使用 する 項目 を 参照 の こ 
と 。 


原 フ ィ ー ル ド の スト リン グ は , 演算 式 の 値 の 計算 中 に 変換 が 行なわ れる 場合 に は 精度 が ( 3 1 , 0 ) の 無 符号 の 2 進 整 数 で 
ある と 解釈 され , 割当 て の と き 変 換 が 行 を われ る 場合 に は 精度 が ( 5 6 , 0 ) の 無 符号 の 2 進 整 数 で ある と 解釈 され る 。 
割当 て の と き C 他 の も の より 大 きい 精度 が 許さ れる の は , コン バイ ラー が , 最終 的 な 目標 フィ ー ル ド を 容易 と 判 断 す る と と 

KA が で きる か ら で あ る 。 目標 フィ ー ル ド の デー タ ・ タ イプ と し て コー ドド 化 人 算術 デー タ を 取り 上 げ て いる ペー ジ で , 原 フ ィ ー ル 
ド と し て FIXED BINARY を 使用 する 項目 を 参照 の と と 。 
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原 フ ィ ー ル ド : 


目標 フィー ルド : コー ド 化 算術 形式 


原 フ ィ ー ル ド の スト リン グ が 許容 精度 で 許さ れる 長 さ より る ゃ 長い 場合 は , 左端 の ビッ ト が 無視 され る 。 と の と まき, ゼロ 
ビッ ト で な を ない ビ ピット が 失わ れる と , 結果 は どう を な る か わか ら ず , と の 条件 が 解禁 状態 に な っ て いれ ば , 条件 が 起こ る 。 


ナル ・ ス トリ ング の 値 は ぞ ロ と な る 。 


DOS PL ンプ 1 最適 化 コ ン バ ベイラー: 言語 解説 書 第 2 部 


目標 フィ ー ル ド : FIXED BINARY 


原 フ ィ ー ル ド : 


FIXED BINARY 
精度 変換 の 際 (C も 2 進 小数 点 の 位置 合せ が 行なわ れる の で , 左端 また は 右端 で で ディ ング や 切捨て が 行なわ れる と と が ある 。 
左端 の ぞ ロ 以外 の ビッ ト が 失わ れ た 場合 , 結果 は どう な る か わか ら な い 。 と の 場合 , S 1ZE 条件 が 解禁 状態 と あれ ば と の 


SIZE 条件 が 起こ と る 。 


FIXED DECIMAL 


原 フ ィ ー ル ド の 精度 が ( pi, gi ) で ある と する と , 結果 の 精度 は ( pz , q。 ) で ある (た だ し , ps = ニ 1 填 CBIL(mp 
* ネ 3.3 2 ), q。 =CEIL(qi* ネ 332 ) )。 pz の 計算 結果 が 3 1 を 越え る 場合 は , 左端 の 有効 数 字 が 失わ れる と と が あ 


り , その 結果 SIZE 条 件 が 解禁 状態 に あれ ば S 1ZE 条 件 が 起こ と り , 結果 は どう を る か わか ら な を い 。 


FLOAT BINARY 


N、 ン 
この 変換 は , デー タ を 割り 当て る 場合 に だ け 起 と り 得 る 。 精度 変換 は よ , FIXED BINARY か ら FIXED BINARY 
へ の 変換 の 場合 と 同 じ で ある ( 宮 言 また は 指示 され て いる pi と , 1 0 進 小数 点 の 位置 と よっ て 示さ れ , 指数 の 値 に + 


っ て 調整 され た q」 が 用 いら れる )。 


FLOAT DECIMAL 


この 変換 は , デー タ を 割り 当て る 場合 に だ け 起 と り 得 る 。 精度 変換 は FTXED DECIMAL か ら FIXED BINARY 
へ の 変換 の 場合 と 同じ で ある (宣言 また は 指示 され て いる pi と , 1 0 進 小数 点 の 位置 で 示さ れ , 指数 の 値 に よっ て 調整 さ 


れ た qi が 用 いら れる )。 


ae 
| PICTURE (数 字 ) 
| CHARACTER 
BIT 
目標 フィ ー ル ド と し て コード 化 算術 デー タ を 取り 上 げ て いる ペー ジ を 参照 の と と 。 
No 
AS 
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原 フ ィ ー ル ド : 目標 フィ ー ル ド : FIXED DECIMAL 


FTXED BINARY 


原 フ ィ ー ル ド の 精度 が ( p」, q』 ) で ある と する と , 結果 の 精度 は ( p。 , qz ) で ある (た だ し , pz。 =1 十 CEIL(pi ン 
332), qz。 テニ CEIL(q ロ 5332 ) )。 


FIXED DECTIMAL 
精度 変換 の 際 に ゃ も 1 0 進 小数 点 の 位置 合せ が 行なわ れる の で , 左端 また は 右端 で バディ ング や 切捨て が 行なわ れる と と が あぁ 
る 。 左端 の ぞ ロ 以外 の ビッ ト が 失わ れ た と き は , 結果 は どう な る か わか ら な い 。 と の 場合 , SIZE 条件 が 解禁 状態 【C あれ 
ば STZE 条 件 が 起こ る 。 

FLOAT BINARY 
と の 変換 は , デー タ を 割り 当て る 場合 C だ け 起 と り 得 る 。 精度 変換 は , TXPD BINARY か ら FIXED DECIMAL 
へ の 変換 の 場合 と 同じ で ある ( 宣言 また は 指示 され た pi と , 2 進 小数 点 の 位置 に ょ っ て 示さ れ , 指数 の 値 〈 ょ っ て 
調整 され た q」 が 用 いら れる )。 

FLOAT DECIMAL 
と の 変換 は , デー タ を 割り 当て る 場合 に だ け 起 と り 得 る 。 精度 変換 は , IXED DECTIMAL か ら FIXED DECIMAL 
へ の 変換 の 場合 と 同じ で ある ( 宮 言 また は 指示 され た p, と , 10 進 小数 点 の 位置 で 示さ れ , 指数 の 値 C ょ っ て 調整 され 
た qi が 用 いら れる 語 

PICTURE (数 字 ) 

CHARACTER 


BIT 


目標 フィ ー ル ド と し て コー ド 化 算術 デー タ を 取り 上 げ て いる ペー ジ を 参照 の と と 。 
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原 フ ィ ー ル ド : 目標 フィ ー ル ド : FLOAT BINARY 


FIXED BINAKRY 


原 フ ィ ー ル ド の 精度 が ( pi , qi ) で ある と する と , 結果 の 精度 は p。 で ある ( を ただし, pz ご pi ) 。 値 に 小数 部 分 が あれ 
ば , 指数 に よっ て 示さ れる 。 


FIXED DECIMAL 


原 フ ィ ー ル ド の 精度 が ( pi の で ある と する と , 結果 の 精度 は p。 で ある ( た だ し , Ds =CEIL(p」 ネ 332 ) )。 
値 に 小数 部 分 が あれ ば , 指数 に よっ て 示さ れる 。 


FLOAT BINARY 


話 端 (C セ ロ を ペデ ィング する と と より 結果 の 精度 が 短 精度 か ら 長 精度 変換 され た り , 右端 を 切り 捨て る と と に よっ て 。 結果 
の 精度 が 長 精度 か ら 短 精 度 C 変 換 さ れる と こと が ある 。 


FIOAT DECIMAL 

原 フ ィ ー ル ド の 精度 が ( pi , qi) で ある と する と , 結果 の 精度 は p。 で ある (ただし, ps ニ CEIL(pi332))。 
PICTURE (数 字 ) 
CHARACTER 


BIT 


目標 フィ ー ル ド と し て コー ド 化 算術 デー タ を 取り 上 げ て いる ペー ジ を 参照 の と と 。 
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原 フ ィ ー ル ド : 目標 フィ ー ル ド : FLOAT DECIMAL 


FIXED BINARY 


原 フ ィ ー ル ド の 精度 が ( p, , q』) で ある と する と , 結果 の 精度 は p。 で ある ( ただし, p>=CEIL( p」 ノ 3.3 2))。 値 
小数 部 分 が あれ ば 指数 に よっ て と れ が 示さ れる 。 


FIXED DECTIMAL 


原 フ イィ ー ン ル ド の 精度 が ( Di ) で ある と する と , 結果 の 精度 は p。 で ある ( た だ 陸 : D2 三 Di 上 値 C 小 数 部 分 が あれ ば 
指数 に よっ て と れ が 示さ れる 。 


FLOAT BINARY 
原 フ ィ ー ル ド の 精度 が ( pi ) で ある と する と , 結果 の 精度 は p。 で ある (た だ し , p。=CEIL (p プ 3.32 ) )。 
FLOAT DECIMAL 


右端 に ぞ ロ を ペデ ィング する と と (と よ り 結果 の 精度 が 短 精 度 か ら 長 精度 (て 変換 され た り , ある い は , 右端 を 切り 捨て る と と 
より 結果 の 精度 が 長 精度 か ら 短 精 度 (< 変換 され る と と が ある 。 


PICTURE (数 字 ) 
CHARACTER 
BIT 


目標 フィ ー ル ド と し て コー ド 化 算術 デー タ を 取り 上 げ て いる ペー ジ を 参照 の と と 。 
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原 フ ィ ー ル ド : 目標 フィ ー ル ド : PICTURE (数 字 ) 


原 フ ィ ー ル ド の デー タ は , 数 字 の 形 (変換 され る と , 目標 フィ ー ル ド の 変数 の も つづ 既知 の 属性 (に よっ て 全面 的 に 決め られ 
る 属性 を と る 。 PICTURE 指定 は , すべ て , コー ド 化 算術 デー タ を 暗示 し て お り , し た が っ て , FIXED DECTMAL 


また は FLOAT DECIMAL を 暗示 し て いる 。 数 字 を 目標 フラ フィー ルド と する 場合 の 以下 の 変換 規則 は , エラ ー の な い 
ょ うら 割当 て を 行なう の 必要 目標 フィー ルド の 属性 を 示し た も の で ある 。 


FIXED BINARY 


原 フ ィ ー ル ド の 精度 が ( pi , qa,) で ある と する と , 目標 フィ ー ル ド の 変数 は 次 の よう な 属性 を 暗示 し て い を けれ ば を ら な い 。 


FIXED DECIMAL (1 十 x 十 q- 了 ,q ) また は 
FLOAT DECIMAL (x) 


と と で 。 x* ジ =CETIL(p ノ 3 .32),y テ CETL(q/ ノ 3 .32 ) , q=y 


FIXED DECIMAL 
N ヘ ンー 


原 フ ィ ー ル ド の 精度 が ( p」 , q」 ) で ある と する と , 目標 フラ フィー ルド の 変数 は 次 の ょ うな 属性 を 暗示 し て いな けれ ば な ら な い 。 


FIXED DECIMAL (x 十 q-p1,q) また は 
FLOAT DECIMAL (x) 
ど ご で 7 で 5 メンテ p 5 q ン デュ 


FLOAT BINAKY 


Ne 
原 フ ィ ー ル ド の 精度 が ( p」 ) で ある と する と , 目標 フィ ー ル ド の 変数 は 次 の ょ うな 属性 を 暗示 し て いな けれ ば な ら な い 。 
FIXED DECIMAL (p , q ) また は 
FLOAT DECIMAL (p) 
と と で , p= ニ CEIL( p」 ノ 3 .32 ) で あり , p お よび q の 値 は 原 フ ィ ー ル ド の 指数 が 表わし 得る 値 の 範囲 を 考慮 に 
入れ た も の で ある 。 
FLOAT DECIMAL 
へ 原 フ ィ ー ル ド の 精度 が (pi ) で ある と する と , 目標 フィ ー ル ド の 変数 は 次 の ょ うな 属性 を 暗示 し て いな けれ ば な ら な い 。 


FIXED DECIMAL ( p , q ) また は 
FLOAT DECIMAL (p) 
と こと で , p ジ シー pi で あり , p お よび q の 値 は 原 フ ィ ー ル ド の 指数 が 表わし 得る 値 の 範囲 を 考慮 に 人 人 れ た も の で ある 。 


PICTURE (数 字 ) 


暗示 され る 属性 は FIXED DECIMAL か FLOAT DECIMAL で ある 。 と の よう な 目標 フラ フィー ルド を 取り 上 げ て 
いる ペー ジ の 該当 する 項目 を 参照 の と と 。 


CHARACTER 


目標 フィ ー ル ド の 変数 は , 1 次 字 対 1 文字 の 対応 関係 で (ただし, 挿入 文字 を 除く ) 原 フ ィ ー ル ド の スト リン グ を 収容 する 


文字 ネト リン グ を 暗示 し て いな を なけれ ば な ら ず , 変換 は 必要 で を い 。 挿入 文字 は , 目標 フィ ー ル ド へ の 割当 て の と き K 取 り 除 
、 れ る 。 
か れ 
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原 フ ィ ー ル ド : 目標 ラ フィ ー ル ド : PICTURE (数 字 ) 


BIT 


原 フ ィ ー ル ド の スト リン グ の 長 さ が ( n ) で ある も の と する と , 


目標 フィ ー ル ド の 変数 は 次 の ょ うな 属性 を 暗示 し て いな け 
れ ば な ならない 。 


FIXED DECIMAL (1 十 x 填 q , q ) また は 
FLOAT DECIMAL (x) 
定 志 もじ 。 ェ メグ ジーC ビ EBT 上 (nm ログ 53.32) 。 q> ョ 0 
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一 


て 


原 フ ィ ー ル ド : 


ュー ド 化 算術 形式 


目標 フィー ルド : CHARACTER 


算術 値 は 1 0 進 定数 に 変換 され る 。 と の 定数 は , 原 フ ィ ー ル ド の 属性 を も と (て し て 決め られ た 長 さ を も つ 中 間 文 字 ス トリ 
ング MC 収容 され る 。 と の 中 間 文字 スト リン グ は , CHARACTER か ら CHARACTER へ の 変換 の 項 で 示さ れ て いる 
規則 に し た が っ て , 目標 フィ ー ル ド K 割 り 当て られ る 。 


ュー ドド 化 算 術 形 式 か ら 文 字 ス トリ ング へ の 変換 規則 は , リス ト 指 示 出 力 , デー タ 指 示 出 力 , お よび キー の 値 の 計算 (さら 
REGTIONAL ファ イル ) に も 適用 され る と と 注意 され た い 。 


FTIXED BINARY 


2 進数 の 精度 ( p」, q」) が , まず , 1 0 進数 の 等 値 の 精度 (p , q ) (C 変 換 さ れる (た だ し , ゎぉ =1 十 CETL (pi/3.32 ), 
q=CETIL(q」 ノ 3.32) )。 と の 後 は , FIXED DECIMAL か ら CHARACTER へ の 変換 規則 が 適用 され る 。 


FIXED DECIMAL 


原 フ ィ ー ル ド に ある, 精度 (p,q ) の 10 進 固定 小数 点数 は , 次 の よう に し て 変換 され る 。 


p ン = ニ q ン =0 で あれ ば ぱ ば , 

・ 幅 が p 十 3 の フィ ー ル ド 定 数 が 右寄せ し て 置か れる 。 

・ 先行 で ロ は プラ ンク と 置き 換え られ る 。 た だ し , 小数 の 1 0 進 小数 点 の 直前 に ある ゼロ は 1 つ だ け 残 され る 。 

・ 負 の 数 の 場合 に は , その 最初 の 桁 の 直前 に 負 符号 が つけ られ る 。 値 が 正 で あれ ば 符号 は つか な い 。 

・ 原 フ ィ ー ル ド の デー タ が 整数 で ある 場合 を 除き , 定数 の 小数 部 分 の 桁 数 は q で ある 。 

p く q ま た は q ぐ 0 で あれ ば ぱ ば, 定数 の 右 に スク ケール 因数 が つく 。 こと この スケ ー ル 因数 は 次 の よう な 形 を し て いる 。 
F【[ 二 | -}nnn, (た だ し , { 十 | - ) nnn は q の 値 で ある )。 


中 間 文字 スト リン グ の 長 さ は p 十 k 十 3 で ある 。 た だ し , k は q の 値 を 収容 する (CC 必要 な 桁 数 で ある (符号 や F 
と いう 文字 の た め の 桁 は 含ま たい )。 


算術 値 が 複素 数 値 の 場合 に は , 中 間 文 字 ス トリ ング は 虚数 部 と 実数 部 か ら 成っ て なり 両 者 は つ を が っ て いる 。 左側 が 実数 
部 で ある が , と の 左側 の 部 分 は 原 フ ィ ー ル ド の 実数 部 と 全く 同じ 形 を と る 。 右側 の 部 分 は 虚数 部 で あり , と の 部 分 に は つね 
(< 符号 が つき {1 と いい 9 文字 も る つけ られ る 。 と の よう な 形 で 生成 され た スト リン グ は , 複素 数 式 で あり , と の 式 の 要素 の 間 
プラ ンク は 挿入 され な い 。 中 間 文 字 ス トリ ング の 長 さ は 次 の 通り で ある 。 


p ン = ニーq ン = ニー0 を な ら ば 2 キネ p 十 7 
p く q ま を た は q ぐ 0 な ら ば 2 ネネ (p 十 k ) 十 7 


次 に 示す の は 固定 小数 点 1 0 進数 値 (実数 値 を よび 複素 数 値 ) か ら 生成 され る 中 間 文 字 ス トリ ング の 例 で ある 。 


精度 (5,0) (4 1) (4 -3 ) (2,1) 
値 29 47 -121.7 -3279000 1 .2 十 0 31 
スネ ストリング : 「bbbb2947 「b-121.7! 「-327 9?F 十 5! 「bbb1 .2 十 0 .31 
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FLOAT BINARY 


浮動 小数 点 2 進数 の 精度 ( p, ) が 。 まず , 等 値 の 浮動 小数 点 1 0 進数 の 精度 (p ) 変換 され る (ただし, p=CEIL(pi 
グ 3 .32 ) )。 と の 人 後 は , FLOAT DECIMAL か ら CHARACTER へ の 変換 規則 が 適用 され る 。 


FLOAT DECIMAL 


原 フ ィ ー ル ド と ある , 精度 (p ) の 10 進 浮動 小数 点数 は , (w,d, s ) と い 2 形 の E 形 式 項目 に よっ て 転送 され る 場 
合 と 全く 同様 (と 変換 され る 。 と と で , 


w ( 中 間 文 字 ス トリ ング の 長 さ ) =p 十 6 
d (小数 部 分 の 桁 数 ) = p - 1 
s (有効 数 字 の 桁 数 )=p 


E 形 式 項目 で 転送 さん た デー タ は , 符号 の つい た 2 桁 の 指数 を も つ 淫 動 小 数 点 1 0 進 定 数 と を る ( 「E 節 : 編集 指示 の 形 
式 項目 ] を 参照 の と と )。 


算術 値 が 複素 数 値 の 場合 に は , 中 間 文 字 ス トリ ング は け は 虚数 部 と 実数 部 か ら 成っ て お り , 両者 は つ を が っ て いる 。 左側 が 実 
数 部 で ある が , と の 左側 の 部 分 は 原 フ ィ ー ル ド の 実数 部 と 全く 同じ 形 を と る 。 右側 の 部 分 は 虚数 部 で あり , と の 部 分 に は つ 
ね 符号 が つき I と いら 文字 も つけ られ る 。 と の よう みな か な 形 で 生成 され た スト リン グ は 複素 数 式 で ちり , と の 式 の 要素 の 間 (c 
プラ ンク は 挿入 され な い 。 中 間 文 字 ス トリ ング の 長 さ は 次 の 通り で ある 。 


2**p 十 13 


次 (示す の は 浮動 小数 点 1 0 進数 値 (実数 値 な よび 複素 数 値 ) か ら 生成 され る 中 間 文 字 ス トリ ング の 例 で ある 。 


精度 ・ ES ( 5 ) (3 ) 

値 6 1735 玉 10 ホ 玉 5 - .001663 1 

スネ ストリング : 「b1.7350E 十 08' 「-1.6630E-03 ! 「b1.00E 十 00 
精度 (5 ) 

値 5 7 か hy5H 

スネ ストリング: 'b1 .7300E 十 01 十 1 .5000E 十 00I' 


PICTURE (数 字 ) 


実数 の 数 字 フ ィ ー ル ド は , 文字 スト リン グ と し て 解 息 さ れ , CHARACTER か ら CHARACTER へ の 変換 規則 従 
っ て 目標 フィ ー ル ド の スト リン グ K 割 り 当 て られ る 。 数 字 フ ラフィ ー ル ド の 中 複素 数 が 入っ て いる 場合 に は , 目標 フィ ー ル 
ド の スト リン グ K 割 当て が 行なわ れる 前 実数 部 と 虚数 部 が 連結 され る 。 


挿入 文字 も 目標 フィ ー ル ド の スト リン グ K 挿 入 さ れる 。 


CHARACTERK 


288 


原 フ ィ ー ル ド の スト リン グ は , 左端 か ら 順 に , 目標 フィー ルド の スト リン グ 婚 割り 当て られ る 。 原 フィ ー ル ド の スト リン グ 
が 目標 フィ ー ル ド の スト リン グ よ り も ゃ 長い 場合 は , 右端 の 収容 し きれ な い ゆい 文 字 は 無視 され る 。 と の 際 , STRINGSIZE 
条件 が 解禁 状態 に あれ ば と の 条件 が 起 と る 。 目標 フィール ド の スト リン グ が 原 フ ィ ー ル ド の スト リン グ よ り 長 ひい 場合 に は , 
目標 フィ ー ル ド の 右側 に プラ ンク が 補充 され る 。 


ビッ ト 0 が 文字 0(C な り , ピッ ト 1 が 文字 1(C な る 。 ナ ル ・ ビ ッ ト ・ ス トリ ング は ナル 文字 スト リン グ に な る 。 と の よう に し て 生成 さ 
れ た 廊 字 スト リン グ は , CHARACTER か ら CHARACTER へ の 変換 規則 に 従っ て , 目標 フィ ー ル ド の スト リン グ 割 り 当 て られ る 。 
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原 フ ィ ー ル ド : 目標 フィ ー ル ド : BI 


ュー ド 化 算術 形式 


必要 (と 応じ て , 算術 値 が 2 進数 値 に 変換 され る 。 と の 際 , 符号 や 小数 部 分 は 無視 され る 。 (算術 値 が 複素 数 値 の 場合 は , 
虚数 部 も 無視 され る 。 ) と うし て 得 ら れ た 2 進 整数 は , ビッ ト ・ ス トリ ング と し て 取り 扱 か われ る 。 と の ビッ ト ・ ス トリ ング 
は , BIT か ら BIT へ の 変換 規則 (従っ て , 目標 ラフ ィ ー ル ド 割 り 当 て られ る 。 


FIXED BINARY 


原 フ ィ ー ル ド の 精度 が ( p , q ) で ある と する と , 中 間 ビ ッ ト ・ ス トリ ング の 長 さ は 次 の 式 で 与え られ る 。 


(pq ) が 負 か ぞ せ ロ の 場合 , 中 間 ビ ッ ト ・ ス トリ ング は ナル ・ ビ ピット ・ ス トリ ング で ある 。 


次 に 示す の は 固定 小数 点 2 進数 値 か ら 得 られ る 中 間 ビ ッ ト ・ ス トリ ング の 例 で ある 。 


精度 も: に あり (4 2 ) 
値 8 1 -3 (あっ 1 
スト リン グ : も 和 T 還 「011'B 「01'B 


FIXED DECIMAL 


原 フ ィ ー ル ド の 精度 が ( p , q ) で ある と する と , 中 間 ビ ッ ト ・ ス トリ ング の 長 さ は 次 の 式 で 与え られ る 。 


MIN(31,CEIL((p-q) 玉 3.32 ) ) 
(pq ) が 負 か ぞ ロ の 場合 , 中 間 ビ ッ ト ・ ス トリ ング は ナル ・ ビ ピット ・ ス トリ ング で ある 。 


次 に と 示す の は 固定 小数 点 1 0 進数 値 か ら 得 られ る 中 間 ビ ッ ト ・ ス トリ ング の 例 を 示し た も の で ある 。 


精度 8 (1) (2 ょ 1) 
値 8 1 | 
区 ドリ シグ 3 !「0001'B '「0001'B 


FLOAT BINARY 
原 フ ィ ー ル ド の 精度 が ( p ) で ある と する と , 中 間 ビ ッ ト ・ ス トリ ング の 長 さ は 次 の 式 で 与え られ る 。 
MIN(31,p) 
FLOAT DECIMAL 
原 フ ィ ー ル ド の 精度 が ( p ) で ある と する と , 中 間 ビ ッ ト ・ ス トリ ング の 長 さ は 次 の 式 で 与え られ る 。 
MIN(31 , CEIL (p ネ 3.32 ) ) 
PICTURE (数 字 ) 


デー タ は , まず , 対応 する PICTURE 指定 に よっ て 決ま る スケ ー ル と 精度 を も ゃ つ 1 0 進数 で ある と 解釈 され る 。 と の 人 後 , 
と の デー タ 項 目 は , FIXED DECIMAL# た は FLOAT DECIMAL か ら BIT へ の 変換 規則 に 従っ て , 変換 さ 


れる 。 
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原 フ ィ ー ル ド : 目標 フィ ー ル ド : BIF 


CHARACTER 


文字 0 が ビッ ト 0(C な り , 文字 1 が ビッ ト 1 て な る 。 CONVERS ION 条 件 が 解禁 状態 に ある 場合 , 0 また は 1 以外 の 文 
字 が 出 て 来る と と の 条件 が 起 と る 。 ナ ル ・ ス トリ ング は ナル ・ ビ ッ ト ・ ス トリ ング に を る 。 と の よう に し て 生成 され た ビッ 
ト ・ ス トリ ング は , 原 フ ィ ー ル ド の 文字 スト リン グ と 同じ 長 さ に を る 。 と の ビッ ト ・ ス トリ ング は , BIT か ら BIT へ の 
変換 規則 に 従っ て , 目標 フィ ー ル ド 割 り 当 て られ る 。 


BI 
原 フ ィ ー ル ド の スト リン グ は , 左端 か ら 用 (CK, 目標 ラフ ィ ー ル ド の スト リン グ 人 割り 当て られ る 。 原 フィ ー ル ド の スト リン グ 
が 目標 フィ ー ル ド の スト リン グ よ り 長 じ 場 合 , 右側 の 余分 の ビッ ト は 無視 され る 。 と の 際 , STRINGS1IZE 条件 が 解禁 


状態 に た あれ ば と の 条件 が 起 と る 。 目標 フィール ド の スト リン グ が 原 フ ィ ー ル ド の スト リン グ よ り 長 し 場合 に は , 目標 フィ ー 
ルド の スト リン グ の 右側 に プラ ンク が 補充 され る 。 
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算術 演算 の た め の 話 表 


右 < 掲 ぴた 諸 表 は , 2 つつ の オペランド を も $ も つ 算 術 式 の 値 を 計算 する と , 結果 が など の よう な 属性 を も る つと と (て な る か を 示し た も の で ある 。 式 の 値 
を 計算 する 間 C 一 時 的 を 属性 へ の 変換 が 行わ れる 場合 に は その 変換 $ ゃ 示し て ある 。 結果 の 属性 を 求め た り , どの よう な 中 間 変 換 が 行 を われ る 
か を 調べ た りす る は , 次 の 順序 (に 従え ば よい 。 
1 図 F. 4a を 見 る 。 値 を 計算 すべ き 式 の オペ ベラ ンド C 対 応 する 欄 を 探し 出す 。 と の 欄 (C は , 1 つの 数 字 , また は 1 つ あ る い は 2 つの 文字 , * 
た は , 数 字 と その 後に 括弧 で くく られ た 1 つま た は 2 つの 文字 , の いずれ か が 入っ て いる 。 数 字 は 結果 の 属性 を 求め る の KC 使 われ , 文字 は 
中 間 変 換 を 調べ る の に 使わ れる 。 文字 が 入っ て い を けれ ぱ , 中 間 変 換 が 行なわ れ を た いと と を 示し て いる 。 文字 と 数 字 が 入っ て いる 場合 。 中 
間 変 換 を 調べ ず 結 果 の 属性 を 求め て も よい し , 各 中 間 変 換 を 順次 追っ て 行っ て も よい 。 
2. a. 図 F.4a の 欄 C 数 字 だ けが 入っ て いた た 場合 は , 図 F.4c また は 図 F.4d を 見 る 。 どちら の 図 を 見 る か は , 行 を うべ き 演 算 (と 妥 し て 決め 
れ ば ょ よい 。 と も か く , と の いずれ か の 表 か ら , 図 FK 4a で 求め を 数 C 対 応 する 属性 を 読み 取る 。 これ が 結果 の 属性 で ある 。 
b. 図 F 4a の 欄 に 文字 だ けが 入っ て いる 場合 は , 読者 の 側 で 各 中 間 オ ベラ ンド の 属性 を 求め な いと 結果 の 属性 を 出す と と は で き な い 。 中 
間 オ ベラ ンド の 属性 を 求め る と は, 図 K 4b か ら , 図 F.4a で 得 ら れ た 文字 KC 対応 する 記入 事項 ( 原 フ ィ ー ル ド ・ 目 標 フ ィ ー ル ド 変 換 
規則 ) を 読み 取り , こと C 示 され て いる 変換 規則 の 説明 ( 本 文 ) を 読む 。 と の 説明 か ら , 中 間 オ ペラ ンド の 属性 が わか る で あろ 2。 
と の 人 後 , 中 間 オ ベラ ンド の 属性 を 使っ て , 上 の 第 1 ステ ッ プ と 第 2 ステ ッ プ を 繰り 返す 。 図 F.4a の 欄 文 字 が 2 つ 入 っ て ぉ ふり, と れ 
が コン マ で 区 切ら れ て いる 場合 は , 最初 の 文字 は 第 1 オペ ラン ド の 中 間 属 性 に 関す る る の で あり , 2 番目 の 文字 は 第 2 オォ オペランド の 中 
間 属 性 に 関す る る の で ある 。 
e. 図 F 4a の 柚 MC 数 字 が あり , その 後 C 括 弧 で くく られ た 文字 が 入っ て いる 場合 は , 数 字 を 使っ て 直接 結果 の 悦 性 を 求め て も る よい し , 中 
間 変 換 を 順次 追っ て 行っ て も よい 。 直接 結果 の 属性 を 求め る に は , ステ ッ プ 2 (a ) の 指示 に 従い , 中 間 変 換 を 順次 追っ て 行く (て は ス 
テッ プ 2 (b ) の 指示 (と 従 り 。 デ ベッ ギン グ の 際 C は , 後者 の 方 法 が 効果 が ある で あろ うし , プロ グラ ム を 書く 際 に は 前 者 の 方 法 の 方 
が 便利 で あろ う 。 
注 : 指数 演算 を 行なう 場合 に は 中 間 オ ペラ ンド 関す る 文字 を 使用 する と と は で き な い 。 指数 演算 の 中 間 オ ベラ ンド を 求め る の に と の 表 を 使 
用 する と と は で き な い 。 


算術 デー タ の 最大 精度 


図 F.4c お よび 図 T. 4 d C は 精度 計算 式 が 載っ て いる 。 当 コン バイ ラー おぶ い て は , 実際 の 精度 の 値 は 次 の 最大 値 を 越 を ん る と と が で き を い 。 
FIXED BINARY 3:1 
FIXED DECIMAL 15 
FLOAT BINARY 5 3 
FLOAT DECIMAL 16 


ん だ 


F EXED 


コー ド 化 算術 形式 


DECIMAL |BINARY DR 人 PE 
( ps, dz ) ( pz, qs) ( ps) (ps ) 


DEC IMAL 

1 
(pn mi ) 際 定 30 
BINARY み ( 2 
(pi q ) 


DEC IMAL 
( p ) 


BINARY 
( pi ) 


以下 CK 示す の は , 結果 の モー ド が REAL で ある か , COMPLEX で ある か を 調べ る 方 法 で ある 。 
双方 の オペ ラン ド が REAL で ある 場合 , モー ド の 変換 は な く 結 果 は REAL で ある 。 
双方 の オペ ラン ド が COMPLEX で ある 場合 , モー ド の 変換 は な を く 結 果 は COMPLEX で ある 。 

一 方 の オペ ベラ ンド が REAL で 他 の オペ ラン ド が COMPLEX で ある 場合 , REAL の オペ ラン ド が COMPLEX 変換 され , 結果 は 
COMPLEX で ある 。 た だ し , と れ と は 次 の 2 つの 例外 が ある 。 例外 は 指数 演算 (C 関 する も る ので, 第 2 オォ ペラ ンド ( 指数 ) が FIXED 
(p, 0 ) 変数 また は 固定 小数 点 1 0 進 束 数 定数 の 場合 で ある 。 と の 場合 , 式 の 値 を 計算 する 前 に モー ド の 変換 が 行なわ れる と と は な い 
が , 結果 は COMPLEX で ある 。 


図 玉 4a 算術 演算 の た め の 基 本 表 


コー ト コー ト 


FIXED DECIMAL 
FIXED BINARY 
FLOAT DECIMAL 
FLOAT BINARY 


F.4b 参照 すべ き 変 換 規則 


ド 


数 


(PICTURE ) 


ーー 


- 


固定 小数 点 


肖 動 小数 点 


結 果 の 精 度 
p デ 15 
FIXED DECIMAL (p, q ) XRD2SBBDPP DIDPD2 議 83EGBEGS リ 
q 三 MAX ( qi, ds ) q ニ q 十 dz p デ 31 
q デ 31 一 ( (pi-qi) 十 dz ) 


FIXED BINARY (p,q) 


FLOAT DECIMAL (p ) 
FLOAT BINARY(p) 


p ニ MAX(pi,pz ) 


p デ 1 十 MAX(r-s,pz-gs) 十 q 三 p 三 31 
FIXED BINARY(p, qa ) q MAX (s, gs ) q 三 p デ 31 一 ((r-s) 十 q) 


と と で ,r テ 1 十 p」 3.32 , s =q」 六 3.32 
FLOAT BINARY (p) p ニ MAX(p, 3.32, p。 ) 


p デ 1 十 MAX(p」-qi,r-s) 十 q | p p デ 31 

FIXED BINARY (p,q) q デ MAX(qr,s) ー p 三 31 一 ( (pi- qi) 十 s ) 
と と で , +ー1 十 p。 六 5.32 。 ョ ーq。 3.32 

FLOAT BINARY(p) p MAX (pi, p。 3.32) 


図 F.4c 加算 減算 , 乗算 , 除算 の 結果 の 表 


特殊 ケー ス ( 下 の 注 を 参照 の と と ) 


コー ト ロ 
prOAT DBCTMAL(p) ンー | 条 オペ ラン ド | 第 2 チ バラ ンド | 精 果 の 属性 


[ た だ し , 特殊 ケー ス A ま を た は CK 該当 し を い 場 合 」 
p ニーMAX (pi , ps) FIXED DEC 1IMAL | 無 符号 の 整数 定数 | FIXED DECIMAL (p,q) 


[を た だ し , p く =15」 

FLOAT BINARY (p ) p=( 十 1 ) ネ n-1 

[ た だ し 。 特殊 ケー ス B また は CC 該当 し な り 場 合 ] 2 
p デ MAX (pi , qs ) qd デ の “1 


FLOAT BINARY (p) FIXED BINARY | 無 符号 の 整数 定数 ]FIXED BINARY(p,q) 


[ た だ し , 特殊 ケー ス A ま た は CK 該当 し を 場合 ] (pm 7 貞 ニ [ を だ し , p く =31 ] 
p MAX(pi キ 3.32 ps ) p= ニ (pi 十 1) *nー1 
明り | mn 


FLOAT BINARY (p) 
[ た だ し , 特殊 ケー ス B ま た は CK 該当 し を い 場 合 」 FLO AT 0 FLOAT ( 
p MAX (pi,(pz ネ 3.32) ) (px) ( pz , 0 ) RT の を) 


次 に 示す よう (C, さら Cx キキ マッ の 特殊 ケー ス が ある 。 


REAL モー ド ・ COMPLEX モ ー ド : 

x デ 0 y ン 0 を ら ば , 結果 は ゼロ xー0 , y の 実数 部 0 ,y の 虚数 部 = 0 な ら ば , 結果 は ゼロ 
x デ 0  y く =0 な ら ば , ERROR 条 件 が 起こ と る xー0 , y の 実数 部 = 0 また は y の 虚数 部 =0 な を なら ぱ ば , 
x く 0 ,y が FIXED (p, 0 ) で を いな を ら ぱ ぴ ば, ERROR 条件 が 起 と る 。 

ERROR 条 件 が 起こる 。 x コー0, y の 実数 部 = y の 虚数 部 = 0 を ら ば , 結果 は 1 


図 F.4d 指数 演算 の 結果 の 表 
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ア ご 


比較 演算 の た め の 褒 表 


右 K 掲 げた 諸表 は , 比較 演算 の 2 つの オペ ラン ド が 比較 の 前 に どの よう な 属性 に 変換 され る か を 示し た も の で ある 。 表 (C は , 行なう べき 
比較 の タイ プ も 示さ れ て いる 。 

まず , 図 FF.5a を 見 る 。 値 を 計算 すべ き 式 の 2 つの オォ ペラ ンド 対応 する 欄 を と の 表 の 中 か ら 見 つけ 出す 。 と の 欄 の 中 に は コン マ で 区 
切ら れ た 2 つの 数 字 が 入っ て いる は ず で ある 。 と の 数 字 が 図 F.5b を 見 る 際 の 鍵 (C に を な っ て いる 。 図 F.5b の 右側 の 柚 に は 各々 の オペ ラン 
ド が 変換 され る 属性 が 示さ れ て いる 。 図 F. 5a の 各々 の 欄 の 最初 の 数 字 は , 第 1 オペ ラン ド が どの よう な 属性 (て 変 換 さ れる か を 調べ る 
鍵 (C を っ て ちり , 2 番 日 の 数 字 は , 第 2 オペ ベラ ンド が どの よう な 属性 (C 変 換 さ れる か を 調べ る 鍵 C に な っ て いる 。 た と えば げ , 変数 が 次 CC 示 
す よ よう K 宣 言 さ れ て いる 比較 に つい て 考え て 見 よう 。 


DECLARE ITEM CHARACTER(5 ), 
STANDARD FIXED BINARY (15,0): 


IF ITEM コ = モーSTANDARD THEN DO: 


図 F. 5a を 見 る と , 第 1 オペ ラン ド の 属性 が CHARACTER で 第 2 オペ ラン ド の 属性 が FIXED BINARY で ある 欄 に は , 1 3, 
1 と 記さ れ て いる 。 図 忌 5b の 13 と いう 所 を 見 る と , FIXED BINARY(31 , 0 ) と 記さ れ て いる 。 したがって, ITEM は と 
の よう な 属性 を も る つ コ ー ド 化 算術 形式 (C 変 換 さ れる と と に な る 。 図 5b の 1 と いう 所 を 見 る と 「 変 換 は 行なわ れ を い 」| と 記さ れ て いる 。 
し た が っ て , STANDARD は 変換 され な いわ け で ある 。 図 F.5b の 13 の 所 も 1 の 所 も 代数 的 を 比較 が 行なわ れる と 指示 され て いる 
( 図 F.5b IC な いて 2 つの オペ ラン ド K 対 応 する 数 字 は , つね 同じ 比較 の タイ プ を 示す は ず で ある )。 以上 見 て 来 を よう, 1TEM 
は , FIXED BINARY (3 1 , 0 ) 変換 され , 次 いで , 属性 が 初め あみ ら FIXED BINARY(15 , 0 ) で ある STANDARD 
と 代数 的 に 比較 され る 。 


算術 デー タ の 最大 精度 


図 F.5b K は , 精度 計算 式 が 示さ れ て いる 。 当 コ ン バ イ ラー の も と で は , 実際 の 精度 の 値 は 次 (C 示 す 最 大 値 を 越 を る と と が で き な い 。 
FIXED BINARY 3 1 
FIXED DECIMAL 15 
FLOAT BINARY 5 3 
FLOAT DECIMAL 16 


第 2 オ ペ 


コー ドド 化 算術 形式 字 


2 2 0 SN 固定 小数 点 | 浮動 小数 点 
( pz )d > ) ( pz,qdz ( ps ) ( pz ) 


ぶり 6 , 1 
1,8 1 , 1 
10, 1 4 , 1 8 , 1 障 馬 し 軸 10,12 
13 , 4 5 9,6 9 , 1 13, 4 9 ,6 9,2 3, 3 


る る ク 2 
一 方 の オペ ラン ド が COMPLEX で 他方 の オペ ラン ド が REAL で ある 場 人 比較 の 前 fc REAL の オォ ベ ラン ド が COMPL EX 変換 され る 。 


DECIMAL 
( pr qi ) 


FIXED 


BINARY 
( pr, qi) 


DECIMAL 


< 
< 
ー ス 
ーー 
ご トコ 
ー ふ 
こう 


ーー 1 

nd て J 
と ここ 
ご 
に 】 
ュー ン 


固定 小数 点 
に 


CHARACTER(n」 ) 


うい 3 1 


図 F.5a 比較 演算 の た め の 基 本 表 > w。 プ ノ 


変換 は 行なわ れ を な い 


CHARACTER (MA 双 (n」,n。)), た だ し , ( n」 ),( n。) は それ ぞ れ 第 1, 第 2 オペ ラン ド の 長 さ 
BIT (MAX(n,」 , nz)), た だ し , (mn) , (nm。) は それ ぞ れ 第 1 , 第 2 オペ ラン ド の 長 さ 
FIXED BINARY (1 十 p ギ 3.32,q キ 3.32), を だし, (pq) は 変換 され る オペ ラン ド の 精度 (オペランド が 


数 字 (PICTURE ) の 形 で ある 場合 に は , 注 1 を 見 ょ ) 


FLOAT DECIMAL(p ), た だ し , (p,q ) は 変換 され る オペラ ンド の 精度 (オペ ラン ド が 数字 


(PICTURE ) の 形 で ある 場合 C は , 注 1 を 見 よ ) 


FLOAT BINARY ( p ギ 3.32), を た だし, (p) は 変換 され る オペ ラン ド の 精度 (オペ ラン ド が 数字 


(PICTURE ) の 形 で ある 場合 に は , 注 1 を 見 ょ ) 


FLOAT BINARY (p), た だ し , (p , q ) は 変換 され る オペ ラン ド の 精度 (オペ ラン ド が 数 字 


(PICTURE ) の 場合 に は , 注 1 を 見 ょ ) 


問 


( PICTURE ) の 形 で ある 場合 に は , 注 1 を 見 ょ ) 
FLOAT BINARY(31) 


FIXED DECIMAL (15,0) 
FIXED BINARY (31.,0 ) 
FLOAT DECIMAL (15) 

FLOAT BINARY (50) 
FLOAT DECIMAL (10) 


ささ オオ オメ オォ 
問 問 敵 敵 敵 算 敵 幣 


FLOAT BINARY (p ギ 3.32), た だ し , (p , q ) は 変換 され る オペ ラン ド の 精度 (オペ ラン ド が 数 字 


FIXED DECIMAL (精度 は , 変換 され る オペ ラン ド の PICTURE 指定 で 暗示 され て いる 精度 ) 
FLOAT DECIMAL ( 精度 は , 変換 され る オペ ラン ド の PICTURE 指定 で 暗示 され て いる 精度 ) 


注 1 : 変換 され る オペ ベラ ンド が 数 字 の 形 を と っ て いる 場合 に は , その 精度 は PICTURE 指定 で 暗示 され て いる 精度 で ある 。 


図 F.5b 比較 演算 の タイ ブ と 日 標 フ ィ ー ル ド 
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PP 


G 節 : 組込み 関数 と 擬似 変数 


と の 節 に は , プロ グラ マー が 使用 する と と の で きる 組込み 関数 が 
すべ て の 収録 され て お なり, アル ファ ベッ ト 順 に 並べ て ある 。 擬似 変 
数 と し て 使用 する と と の で きる 組込み 関数 に 関し て は , その 擬似 変 
数 の 機能 に つい て 説明 する 項 を 設け て ある 。 


組込み 関数 参照 の 一 般 的 を 形式 は , 次 に 示す 通り で ある 。 
関数 名 ト も 玉 | 丈 』。。 テ 2 。・・ 。 キョ リコ 


と と で , xx また は xi」 , xx , xn は , 所 要 の 引数 を 表 わ 
し て いる 。 ある 種 の 関数 CK な いて は , 必要 KK 応じ し て 指定 し て も 指定 
し を く て も よい 引数 が 1 つ 以 上 ある 。 た と えば , 


SUBSTR( 文 1 。 婦 2 し , 文 3 ] ) 


以下 アル ファ ベッ ト 順 に 各々 の 関数 に つい て 説明 する わけ で ある 
が , 各々 の 関数 の 見 出し と し て その 関数 参照 の 一 般 的 た 形式 を 掲 び 
て ある (擬似 変数 参照 は つね (C そ の 関数 参照 と 同じ 形 で ある ) 。 一 
般 c, 各 関 数 の 説明 で は 次 の よう な 点 C 触 れ て ある 。 


1. 返さ れる 値 C つ いて の 説明 。 
2. 引数 に つい て の 詳し い 説 明 。 
3 関数 使用 上 の 他 の 制約 。 


4. 該当 する 関数 (C 関 し て は , 擬似 変数 と し て の 機能 の 説明 。 


組込み 関数 の 分 類 


組込み 関数 を 分 類する C あ た っ て は , 組込み 関数 の 使用 目的 が 
PL/I の どの 機能 (関係 し て いる か と いう 観点 か ら 分 類する こと と 
が で きる 。 と の 分 類 方 法 に し た が っ て , 組込み 関数 を 次 の ょ う K 分 
類する と と が で きる 。 


スト リン グ 取 扱い 組込み 関数 
算術 組込み 関数 

数 学 組込み 関数 

配列 取扱 い 組込み 関数 

条件 取扱 い 組 込み 関数 

記憶 域 制御 組込み 関数 
非同期 入出 力 組 込み 関数 
STREAM 入 出力 組込み 関数 
日 付 ・ 時 間 機 能 組 込み 関数 


最初 の 4 つが 計算 関係 の 組込み 関数 で ある 。 


スト リン グ 取 扱い 組込み 関数 


と れ ら の 関数 は , ビッ ト ・ ス トリ ング お ぉ お ょ よび 文字 スト リン グ の 処理 
を 簡易 化す る た め の も の で あり , 次 の よう な も の が ある 。 


BIT REPEAT 
BOOL STRING 
CHAR SUBSTR 
H1GH TRANSLATE 
INDE UNSPEC 
LENGTH VERIFY 
LOW 
算術 組込み 関数 


と れ ら の 関数 は , プロ グラ マー の 側 で , 基数 , スケ ー ル , モー ド " 
お よび 精度 の 変換 を 直接 的 (た , また 基本 的 な 算術 演算 を 行なっ て い 
る 間 (c, 制御 する と と が で きる よら (て C す る た め の も の で ある 。 と の 
人 ほか, 算術 値 の 個々 の 性 質 を 調べ る た め の 組 込み 関数 も ある 。 た 
と を えば, SIGN 関数 は 算術 値 の 符号 を 調べ る の 使用 され る 。 と 
の よ ょ うな 組込み 関数 と し て は 次 の よう な も の が ある 。 


ABS 1MAG 
ADD MAX 
BINARY MIN 
CEIL MOD 
COMPLEX MULTIPLY 
CONJG PRECISION 
DECIMAL REAL 
DIVIDE ROUND 
F 1 XED SIGN 
FLOAT TKRUNC 
FLOOR 

数 学 組込み 関数 


こと これら の 関数 は , 標準 的 な 算術 演算 を 行なう た め の も の で あり , 次 
の よら な も の が ある 。 


ACOS LOG 
ASIN LOG 2 
ATAN LOG10 
ATAND STN 
ATANH S TI ND 
COS ST NH 
COSD SQRT 
COSH TAN 
ERF TAND 
ERFC TANH 
EXP 


G 節 : 組込み 関数 と 擬似 変数 295 


配列 取扱 い 組込み 関数 


.。 と れ ら の 関数 は すべ て , 配列 引数 を 対象 と し て おり, ある 配列 の 1 
つの 特性 値 を 返す も る の で ある 。 と これら の 関数 に は , 次 の も ゃ の が ある 。 


ALL LBOUND 

ANY POLY 

DIM PROD 

HBOUND SUM 
条件 取扱 い 組込み 関数 


と れ ら の 関数 は , プロ グラ ャ ー の 側 で , 解禁 状態 に ある 例外 条件 (< 
起因 する 割込み に つい て 調べ る こと が で きる ょ よう ら ( て する た め の も の 
で ある 。 各々 の 関数 は , 当該 関数 が 対象 と し て いる 特定 の 例外 条件 
が 起 っ た と きだ け 入 る と と の で きる オン ・ ユ ニッ ト の 範囲 内 ある 
い は , シス テム の 標準 処罰 と し て ERROR な いし FINISH 条 
件 が 起 っ た 場合 に は と れ ら の 条件 の た め の オ ン ・ ユ ニッ ト の 範囲 内 
で だ け , 定義 され て いる 値 を 返す 。 と の ょ うな 組込み 関数 は , 次 の 
通り で ある 。 


DATAF TELD ONEFILE 
ONCHAR ONKEY 
ONCODE ONLOC 
ONCOUNT ONSOURCE 


記憶 域 制御 組込み 関数 


と これら の 関数 は , 基底 付 変数 また は 被 制御 変数 に 関す る 特殊 を 値 を 
返し た り , 基底 付 変数 の 所 在 場所 を 探し た りす る を ため の も の で ある 。 
と の ょ うな 関数 は , 次 の 通り で ある 。 


ADDR NULL 

ALLOCATION OFFSET 

EMPTY POINTER 
非同期 入出 力 組込み 関数 


と これ ら の 関数 は , プロ グラ マー の 側 で , 事象 変数 の 現在 の 状態 < つ 
いて 調べ る と と が で きる よう CC する た め の も の で あり , 次 の よう な 
も の が ある 。 


COMPLETTION 
STATUS 


STREAM 入 出力 組込み 関数 


と れ ら の 関数 は , プロ グラ マー の 側 で , ファ イル の 現在 の 状態 を 調 
べ る と と が で きる よう (て する た め の も の で あり , 次 の よう を も の が 
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ある 。 
COUNT 
LI NENO 
引数 の 変換 


引数 の 変換 が 行なわ れる 可能 性 が ある の は , 計算 関係 の 組込み 関数 
の 場合 だ け で ある 。 と れ ら の 組込み 関数 (c 渡す 引数 は , 演算 式 で あ 
っ て も よい 。 引数 と し て 渡さ れる 式 ( と の 中 組込み 関数 へ の 参照 
が あっ て も よい ) は , まず その 値 が 計算 され . デー タ 変 換 規 則 C 従 
っ て 当該 組込み 関数 fc 適し た 形 C 変換 され る 。 各々 の 引数 が 要求 す 
る デー タ ・ タ イプ に つい て は , 個々 の 関数 の 説明 の 項 で 触れ る 。 


スト リン グ 取 扱い 組込み 関数 


この 種 の 関数 の 中 IC は , スト リン グ 引 数 ば か り で な く 算 術 引 数 も 必 
要 と する も の も ある 。 算術 引数 は , スト リン グ の 長 さ を 表わす も の 
で ある か ら , 整数 で ある か 整数 変換 可能 な る の で な けれ ば な ら な 
い 。 スト リン グ 引 数 を 算術 式 で 表わす と と も で きる 。 と の 場合 , と 
の 算術 式 は , デー タ 変 換 規 則 ま た は 関数 の 説明 の 項 で 示さ れ て いる 
規則 従っ て , スト リン グ に 変換 され る 。 プ ブロ グラマー は , これら 
の 変換 の 結果 , 所 望 の スト リン グ ・ タ イブ で 関数 が 操作 され る ょ 9 
確認 し を な けれ ば を ら な い 。 


算術 組込み 関数 


と れ ら の 関数 の 中 KC は , 結果 の デー タ ・ タ イプ を 1 つ 以 上 の 引数 を 
も と に し て 決定 する も の も ある 。 引数 の デー タ ・ タ イプ が 違っ て い 
る と き は , デー タ 変 換 規 則 (C 従 っ て , 一 方 の 引数 が 他 の 引数 合致 
する ょ うら う 変 換 さ れる の で 結果 は 同じ デー タ ・ タ イブ て な る 。 結果 の 
デー タ 属 性 が 引数 の デー タ 属 性 と 一 致し を い 場合 (た と を えば, 
FLOOR 組込み 関数 ) に つい て は , 個々 の 関数 の 説明 の 項 で その 
規則 C つ いて 説明 する 。 


N と いら 文字 は , 固定 小数 点数 の 結果 に 関す る 許容 最大 精度 を 表 
わす の 用い られ て いる 。 N の 値 は 下 に 示す 通り で ある 。 


FIXED DECIMAL 15 
FLOAT DECIMAL 1 6 
FIXED BINARY 8.3 
FLOAT BINARY 9: さ 


プン 


数 学 組込み 関数 


と れ ら の 関数 は すべ て 浮 動 小数 点数 値 を 対象 と し て ぉ り , 肖 動 小数 
点数 の 結果 を 返す 。 し た が っ て , 肖 動 小数 点数 で を い 引 数 が ある と , 
と の 引数 は 河 動 小数 点数 に 変換 され る 。 


配列 取扱 い 組込み 関数 


と これ ら の 関数 で 必要 と され る 引数 の 変換 に つい て は , 各 関 数 の 説明 
の 項 で 触れ る 。 


数 学 関数 の 正確 度 


結果 の 正確 度 は , 次 の 2 つの 要因 左右 され る 。 
1. 引数 の 正確 度 
2、 算法 の 性 能 


ほとん どの 引数 (C は 誤差 が 含ま れ て いる 。 さら, 関数 の 値 を 計 
算 す る 前 に , ある 引数 の 誤差 が 何 惨 階 か に わた っ て 積み 重ね られ て 
いる と と も ゃ も ある 。 入力 変換 を 経た を ば か り の 新しい デー タ も 小さ な 
誤差 が 含ま れ て いる と と が ある 。 引数 の 誤差 が 結果 の 正確 度 に 及ぼ 
す 影 響 は , ひと え ぇ (C 数 学 関数 の 性 格 に ょ よる も の で あっ て , 結果 を 計 
算 す る た め の 算 法 と は 無関係 で ある 。 本書 で は , と の 種類 の 誤差 
つい て は と れ 以 上 触れ を いと と (CC す る 。 


各 数 学 関数 の 性 能 の 統計 が , 図 G.-1 (3 ペー ジ 學 わた っ て 収録 ) 
て 示さ れ て いる 。 と の 値 は , 引数 C は 誤差 が 含ま れ て い を いと いら 59 
前 提 に 立っ た も の で ある 。 


各 関 数 ど と (<, 有効 を 引数 の 範囲 また は その 範囲 の 代表 的 を 部 分 
(CC つい て の 正確 度 の 値 が 与え られ て いる 。 どの 関数 の 場合 も , 表 M 
示さ れ て いる 数 字 は , 検討 の 対象 と され て いる 関数 な よび 範囲 と 
っ て 最 も 意味 の ある も の で ある 。 


た と えば , 一 組 の 結果 を も と に し た 相対 誤差 の 自 乗 の 平均 値 の 平 
方 根 ( RMS ) と 相対 誤差 の 最大 値 は , 一 般 に 役に立つ 意味 の ある 
数 字 で ある 。 し か し , と れ ら の 数 字 は , 関数 の 値 が で ぞ ロ に な る よう 
を 範囲 で は 役 (C 立 た な い 。 と 言う の も , と の 場合 , 引数 の 値 (極め 
て 小さ な 誤差 が 含ま れ て いて も , 結果 の 相対 的 を 大 き さ K 無 限 の 変 
動 を も た ら す と と が ある か ら で あ る 。 た と えば , SINx に お いて 
x の 値 が ziC 近 づい た と き の ょ うら な 状態 CK な る 。 と の よう な 範囲 
お いて は , 絶対 誤差 を 問題 に する 方 が 妥当 で ある 。 


図 G.1 で 示さ れ て いる 値 は , 関数 の 性 格 応 じ て 各 範囲 C な いて 
一 様 分 布 ま た は 指数 分 耐 を を し て いる 5000 の 引数 か ら 得 られ た 
無 作為 の 結果 を も と に し た も の で ある 。 誤差 の 最大 値 と し て 挙げ ら 
れ て いる 値 は , 各々 ある 特定 の サン プル 関す る る の で あり , 誤差 


の 真 の 最大 値 が どの 程度 の も の か を 知る た め の 指 針 に すぎ な いと と 
て 注意 され た い 。 


強 
3 


短 精 度 お ょ び 長 精度 の 浮動 小数 点数 の 各々 の 結果 c つ いて, 
の 最大 値 お よび RMS 値 を 与え を て ある 。 


関数 の 各々 の 範囲 た つい て , 相対 誤差 また は (必要 応じ て ) 総 
対 誤差 の 最大 値 と RMS 値 を 与え を て ある 。 と れ ら の 値 は 次 の ょ うら 
し て 定義 され た も の で ある 。 


| 


f(zx) 関数 の 真 の 値 


g(x) = 関数 の 計算 され た 値 
で ある も の と すれ ば , 結果 の 絶対 誤差 は , 
ABS(f(x) 一 g(x)) 
と な を なり, 結果 の 相対 誤差 は , 
ABS(f(x) 一 g(x) ) ン f(x) 


と と で , 結果 の サン プル 数 が nh で ある も の と する と , 絶対 誤差 の 
RM S 値 は 次 の 式 で 与え られ る 。 


SQRT(zL_((f(x)-g(x))**2) ノ n) 


相対 誤差 の RM S 値 は 次 の 式 で 与え られ る 。 


SQRT(?_ (((f(x)-g(x))T(r))**2)2n) 


引数 と し て の 配列 お よび 構造 


引数 と し て 構造 を 受け 入れ る と と の で きる 関数 は ADDR, 
ALLOCATION, お よび STRING だ け で ある 。 


引数 を も つと と の で きる 組込み 関数 は すべ て , 引数 と し て 配列 を 
受け 入れ る と と が で きる 。 ADDR , ALLOCATION, 
STRING , お よび 配列 取扱 い 関 数 は , 1 つの 値 を 返す だ け で あ 
る が , と れ ら 以 外 の 関数 は すべ て 値 の 配列 を 返す 。 し た が っ て , た 
と えば SUBSTR の ょ うな 関数 を 使用 する 場合 は , どの 引数 も 配列 
で あっ て よい ( 2 つ 以 上 の 引数 が 配列 で ある 場合 は , こと これら の 配列 
の 限界 が 同じ で を けれ ば を ら な い ) 。 こ と の 機能 は , 制御 変数 に よっ 
て 変更 され る 添 字 付 配列 参照 を 引数 と し て 1 つ 以 上 も っ て いる DO 
ルー プ の 中 関数 参照 を 連 く の と 同じ で ある 。 
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ナル 引数 


引数 を 必要 と し た い 組 込み 関数 も 多い (主として , 条件 取扱 い 関数 )。 
と の よう な 関数 ついては, BUILTIN 属 性 で 明示 的 に と れ を 
宣言 する か , 関数 参照 の 中 に ナル 引数 リス ト を 含め て (た と え ぱ ば , 
ONCHAR( ) 廊 脈 の 上 か ら と れ を 宣言 し を けれ ば な ら な いと 言う 
規則 が ある の 注意 され た い 。 と の いずれ か の 措置 を と ら を いと , 
コン バイ ラー は その 名 前 を 組込み 関数 名 と し て 認定 する と と が で き 
を い 。 


擬似 変数 


受取 り 側 の フィ ー ル ド を 表わす の 使用 する と と が で きる 組込み 関 
数 も ある 。 組込み 関数 を この よら を な 形 で 使用 し た 場合 , これ は 擬似 
変数 で ある 。 擬似 変数 は , 割 山 て ステ ー ト メン ト ま を は DO ステ ー 
トメ ント の 等 号 の 左側 記入 する と と が で きる 。 ま た, GET ス テ 
ー ト メン ト の デー タ ・ リ スト KK 擬似 変数 を 記入 する と と も で きる し , 
KEYTO, STRING, また は REPLY オ プシ ョ ン の スト リン グ 
名 と し て 擬似 変数 を 使用 する と と も で きる 。 


0 
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擬似 変数 は すべ て 組込み 関数 で も ある か ら , 擬似 変数 iC 関し て は 該 
当 す る 組込み 関数 の 説明 の 項 で 簡単 と 触れ る (と と とどめ る 。 


擬似 変数 は 。 ネス ト す る と と が で き な い 点 K 注 意 さ れ を たい 。 た と 
えば , 次 の ステ ー ト メン ト は 無効 で ある 。 


UNSPEC(SUBSTR(A,1,2))='00'Bj 


以下 に 示す の は 擬似 変数 で ある 。 


COMPLETION REAL 

COMPLEX STATUS 
I MAG STRING 
ONCHAR SUBSTR 
ONSOURCE UNSPEC 


短 精度 浮動 小数 点数 長 精度 浮動 小数 点数 
相 対 , 誤 差 


玉 10*※*※17 


RMS 最 大 RMS 最大 
と CC.- 王 3 
seen sm | トー トー トー トーー 
ATAN(x ) NBGI 3800 0E 20 
に GE EEEEEIEEZEE EE 証 PT 
ls 連 


ーー 2 | 全 。 填 " | 
ATAN( xi , x。 ) ABS(x」) く 1 , 
ABS( x。 ) ぐ 1 2 9 160 の 3 6 


還 と 同じ ) 


ーー 数 ABS(x) ぐ 0.2 4 6 全 衝 
ABS(x) く 0.9 39 120 


ABS(x) く 0.25 2 0 5 | 
覆 系 才 | 全 須 還 当 人 導 020 に っ の NE 
実 数 *| 0Sx く ヶ 
1 


10<ABS(x) く 100 遇 270 
REUIBUES 
COSH(x) | 実 還 旨 0SN し に 20 1 00 | こし と 
ABS(x)S170 iT 


| ABS(x)S17 。 | 3 9 
ABS(x) く 5 38 
了 障 呈 款 大 
1 と の RM S 値 と 最大 値 は 絶対 誤差 (関す る も る の で ある 。 
^ 指数 分 布 。 と れ 以 外 は すべ て 一 様 分 布 で ある 。 
oe っ Re 


^ と と 示し た 各々 の 数 字 は 関数 の 特異 点 C 近 いあ る 特定 の 点 と 対応 する る の で あり , と の うな 範囲 た な いて は 誤差 を 調整 す 
る と と は で き な い 。 


COS(x) 


8 キュ ネギ b 三 


図 G. 1. 数 学 組込み 関数 の 性 能 の 統計 値 ( 3 の 1 ) 
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長 精度 浮動 小数 点数 
関 数 名 | 引数 の モー ド 範 時 相 対 誤 差 相 対 「 誤 差 
10 ネ 8 涼 10※*※ ネ 17 
MS | 加 

ERF(x) 実 数 1 2 8 5 

1 ぐ く ABS(x) く 2.0 4 4 1 1 

2.0 4 く ABS(x) く 39192 3 6 

2.0 4 ぐ ABS( x ) く 609 2 ー ー 

実 数 


ERFC(x) 


と | 


ト ) 
ーー コ ( つ 
ヽ O O1 で 1 〇 つ ^ 〇 CON | 一 ココ 〇 NM 
こう に こう 
〇 い び 1 


の 


ト う 


| 悪 
Na ce | o 1 ルオ 


3 3 


ト S う 
ー ト 


EXP(x) 


に 
〇 ON 


ABS(a) く 170 


ABS(b ) く ァ ヶ ン 2 
ABS(a) く 170 
ァ 〆2 ぐ ABS(b) く 20 
ABS(a) く 1 
ABS(b ) く ァ ン 2 


ABS(a ) く 20 
ABS(b) く 20 ー 2 0 
2 


oO | O ひ ヽ 
O び 1 | 忌 1 DO ーー 
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の 
に 


LOG2(x) 0.5 ぐ x く 2.0? を 除く 3 4 9 8 
『 1 

0.5 く xx ぐ 2.0* 

0.5 ぐ x ぐ 2.02 を 除く 


5 くく 2.0】 


こさ 
ON 


ググ 9 4 8 


LOG10(z) 


ト う 
ト ゝ ト O 
ー ト 
- バ 
| 〇 
ON 
ON ト ゝ 


( 注 に つい て は , 299 頁 を 参照 の と と 。 ) 


図 G. 1. 数 学 組込み 関数 の 性 能 の 統計 値 ( 3 の 2 ) 
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SIN(x) 


ABS(x ) く ァ ン 2 


長 精 度 浮動 小数 点数 


短 精 度 浮 動 小 数 点数 


相 対 . 誤 差 


10 ネ 17 


ァ /2 ぐ ABS(x) く 10 


10<ABS(x) く 10 


( 注 に つい て は , 


図 G. 1. 


299 頁 を 参照 の と と 。 ) 


ABS(a) く 10,ABS(b) く 1 


DS54 の が 31< ぐ ABS て tx ) 
ぐ 20.10! 
ABS(a)<9②,ABS(b) ぐ 1 


SIND(x) (実数 引数 の SIN と 同じ ) 
SINH(x) 実 数 ABS(x ) く 1 2 0 8 8 還 5 
1 ぐ く ABS(x) く 2 2 5 100 = 志 
| ABS(x ) く 170 2 0 8 2 了 
ABS(x) く 17 ー ー 1 0 3 6 
ABS(x) く 0.881374 ー ー 4 20 
0.881374< ぐ ABS(x) く 5 10 3 5 
| 衣 素 数 ABS(a) く 10,ABS(b) く 1 8 2 280 2 3 6 4 
実 数 全 域 ^ 
| 複 素 数 | 全 域 * 54 220 1.3 4 9 
TAN(x) 実 数 * ABS(x ) く ァ グ 4 29 160 6 5 5710 
ァ グ 4 ぐ ABS(x ) く z グ 2 3 7 150 ー ー 
ァ グ 4 ぐ ABS(x ) ぐ 1.5 ー ー 4 7 230 
ァ ノ 2 ぐ ABS(x)S10 $ あ が 3800 ul らら ニー 
15 く ABS(x ) く 10 ー ー 8400 473000 
10<ABS(x) く 100 3 1 140 7900 271000 
複 素 数 * ABS(a) く 1 ,ABS(b ) く 9 4 3 240 作 8 6 2 
TAND(x) | (実数 引数 の TAN と 同じ ) 
TANH(x) 実 数 |ABS(x) く 0.7 5 7 8 ー ー 
0.7 く ABS(x) く 9%2011 4 の 拉 り ー ー 
|AB8(x) く 054951 ー ー 4 1 9 
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G 節 ・ 


組込み 関数 と 擬似 変数 301 


ABS(zx) 算 術 
ABS は , 与え られ た 式 x の 絶対 値 を 返す 。 x が 実数 の 場合 , ABS 
が 返す 値 は x の 正 の 値 で ある 。 x が 複素 数 の 場合 。 A BS が 返す 値 
は 実数 部 お よび 虚数 部 各々 の 自 乗 の 和 の 正 の 平方 根 で ある 。 


x が 精度 ( p ,q ) の 固定 小数 点 複素 数 の 場合 , 結果 の 精度 は 次 
の 式 で 与え られ る 。 


と と で , N は 許容 され る 最高 の 桁 数 で ある 。 


ACOS(xz) 算 術 


ACOS は , 与え られ た 値 x の arc COS(COS-! x ) の 値 を 
素 わ す ラ ジア ン 単 位 の 浮動 小数 点数 値 を 返す 。 


x は 実数 で を けれ ば を ら ず , し か も x の 絶対 値 は 1 以下 で を けれ 
ら な い 。 すなわち も , ABS(x) に ーー 1 o 返さ れる 結果 は 次 の 範囲 
の 値 で ある 。 


0 ぐ く = テ ACOS (x ) ぐ = ァ 


ADD( xi」, x。 , x』。【〔, x。 〕 ) 算 術 
ADD は , 値 x, と x。 の 和 を x。 ぉ および xx で 指定 され て いる 精度 で 返す 。 
xi と xs2 は 加え 合わ せる べき 値 で ある 。 


xs 加算 を 行なう 除 (確保 す べき 桁 数 を 指定 する た め の 無 符号 の 
1 0 進 整数 定数 。 と の 値 は 当 ュ ン パ イラ ー の も と で の 許容 最 
大 精度 を 越え を て は な ら な い 。 


x。 結果 の スケ ー ル 因数 を 指定 する た め の 1 0 進 整 数 定数 ( 必要 
応じ て 符号 が つけ られ る ) 。 結 果 が 固定 小数 点数 の 場合 は , 
xs を 与え たら x。 も 与え を を けれ ば な ら な い 。 結果 が 浮動 小 
数 点数 の 場合 は ,。 x。 し か 与え る と と が で き な い 。 


ADDR(x) 記憶 域 制御 


ADDR は , 与え られ た 変数 x か 割り 振ら ちら れ て いる 記憶 場 所 を 識 
列 す る た め の ポ イン ター 値 を 返す 。 


3 任意 の デー タ ・ タ イプ おぉ よび 任意 の 編成 を も ち , 任意 の 記憶 
域 ク ラス 割り 振ら れ て いる 変数 。 た だ し , 次 の よう みな 変 
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ALL(x) 


ALLOCATION(x) 


数 を 除く 。 


1 UNALIGNED 属性 を も つ 固 定 長 ビ ッ ト ・ ス トリ ング で 
ある BASED 変 数 , DEFINPD 変 炒 , バ ラメ ー タ ー 変 数 , 添 
字 付 変数 また は 構造 基本 要素 変数 。 


2. UNALIGNPD 属性 を も つ 固 定 長 ビ ッ ト ・ ス トリ ング を 最初 
の 基本 要素 と し て いる 小 構造 (を た だし, と の 最初 の 要素 が , 
同時 に , と の 小 構造 の 属し て いる 大 構造 の 最初 の 要素 で も あ 
る 場合 を 除く ) 。 


っ DPFINED 属 性 を も つ 大 構造 また は ペラ メー ター で ある 大 構 
造 の うち , その 最初 の 要素 が UNALIGNPD 届 性 の 固定 長 ビ 
ッ ト ・ ス トリ ング で ある も の 。 


4. 連続 し て いる 記憶 域 (収容 され て いな い 変 数 。 


* が デー タ の 集合 体 で ある 場合 に は , 返さ れる 値 は その 最初 の 要素 
を 指し て いる 。 


x が 長 さ の 変わ る スト リン グ で ある 場合 に は, 返さ れる 値 は その 接 
頭 語 ( 2 バイト ) を 指し て いる 。 


x が 記憶 域 で ある 場合 C は , 返さ れる 値 は その 制御 情報 を 指し てい 
る 。 


* が まだ 割り 振ら れ て いな い 被 制御 変数 で ある 場合 に は , ナル ・ 
ポイ ンタ ー 値 が 返さ れる 。 


* が べ ベラ メー ター で ある 場合 , 見 か け 引 数 が 作成 され て いる な ら ば げ , 
返さ れる 値 は と の 見 か け 引 数 を 指し て いる 。 上 の 4 番目 の 条件 か ら , 
x* が バラ メー ター で ある な ら ば と の パラ メー ター は CONNPCTED 
属性 を も る つも の で な けれ ば な ら を いと いら 点 K 注 意 さ れ た い 。 


A 工 し は , 与え られ た 配列 x の すべ て の 要素 の 中 C, ある ビッ ト が 
存在 し て おり, し か も その ビッ ト が 1 で ある 場合 Cc そ れ と 対応 する 
各 ピ ビット が 1 に な っ て いる ピット ・ ス トリ ング を 返す 。 結果 の 長 さ 
は 一 番長 い 要 素 の 長 さ < 等 し い 。 


* が ビッ ト ・ ス トリ ング 配列 で を い 場 合 ) x は ビ ピット ・ ス トリ ング 
変換 され る 。x が 1iSUB で 定義 され た も の で あっ て は な ら な い 。 


記憶 域 制御 


ALLOCATION は , 与え ら れ た 寝 制 御 変 数 x の 世代 数 を 表わす 
省略 時 精度 の 固定 小数 点 2 進 整 数 を 返す 。 


X 被 制御 変数 の 名 前 。 と の 名 前 は , レベ ル 1 の 添字 の つい て い 
を い 名 前 で を けれ ば なら な い 。 


x が 割り 振ら れ て いな た い 場 合 , 結果 は ぞ ロ で ある 。 


ANY(x) 配列 取扱 い 
ANY は , 与え られ た 配列 x の いずれ か の 要素 C, ある ビッ ト が 存 
在 し て ぉ お り , し か も と の ビッ ト が 1 で ある 場合 に と れ と 対応 する ビ 
ッ ト が 1 で ある よう な ビッ ト ・ ス トリ ング を 返す 。 結果 の 長 さ は 一 
番長 い 要 素 の 長 さ に 等 し い 。 


x が ビッ ト ・ ス トリ ング 配列 で を い 場 合 ・x は ビ ピット ・ ス トリ ング 
て 変換 され る 。x は iSUB で 定義 され た も の で あっ て は を ら を な を い 。 


ASIN(x) 数 字 


AS IN は , 与え られ た 値 x の arc sin(sin-'x) の 値 を 表 わ 
す ラ ジア テン 単位 の 漂 動 小数 点数 値 を 返す 。 


x は 実数 で を けれ ば を ら ず , また その 総 対 値 は 1 以下 で を けれ ば 
を ら な い 。 す な わ も , ABS(x ) く 1。 結 果 は 次 の 範囲 の 数 値 で ある 。 


ー ァ /2 く < 三 ASTIN(x ) く デー ァ グ 2 


ATAN( xr 評 xz ] ) 数 に 


ATAN は , 与え られ た 値 xi また は 与え られ た 比 xi ブ xsz の are 
tan(tan~-' xi また は tan-' xx ブ xs ) の 値 を 表わす ラジ テン 
単位 の 浮動 小 匠 点 数 値 を 返す 。 


xi」 だ けが 指定 され て ぉ お り , し か も それ が 実数 で ある 場合 の 結果 は , 
次 の 範囲 の 数 値 で あ る 。 


ー ァ グ 2 ぐ ATAN( xi」) く ァ グ 2 


xi だ けが 指定 され て お り , それ が 複素 数 で ある 場合 , xi は 十 i ま 
た は - i で あっ て は な ら な い 。 と の 場合 , 結果 は 次 の 式 で 与え られ る 。 


- iATANH( i* ネ xi) 

xi と xs が 指定 され て いる 場合 C は , 両者 は 共 (c 実 数 で を けれ ば 
を ならない 。 xi と xs が 共に ゼロ の と きけ は, 誤り で ある 。 文 1 と Xs 
が と れ 以 外 の 任意 の 値 を と る 場合 , 結果 は 以下 の 式 で 与え られ る 。 

x。 >0 な を な ら ば arctan(xi ブ xz ) 
xs。 三 0, xi 0 な ら ば ァ z グ 2 
文 2 ー0, xi ぐ 0 な ら ぱ ば ー テ ググ 2 
x。 ぐ 0, xi ご 0 を ら ば (xi/xz ) 


ヶ 十 arctan 


x。 ぐ 0, xi く U な ら ば 一 ヶ 十 arctan(xi ブ xz ) 


ATAND ( x」 [ , x。 〕 ) 数 学 
ATAND は , 与え られ た 値 xi また は 与え られ た 比 x」 グ xsz の 
arc tan (tan-! xi また は tan-! xi ブ xz ) の 値 を 表わす 度 
単位 の 洋 動 小数 点数 値 を 返す 。 


xi」 だ けが 指定 され て いる 場合 これ は 実数 で を けれ ば ならない 。 
結果 は 次 の 範囲 の 値 で ある 。 


ー?0 ぐ ATAND(xi) く 9?0 


xi と xz が 指定 され て いる 場合 に は , 両者 は 共 ( 実 数 で を けれ 
ば な ら な い 。 結果 は , 関数 ATAN を 用 いた 次 の 式 で 与え られ る 。 


180 ノ ァ *ATAN( xi , xz ) 


ATANH(x) 数 


ATANH は , 与え られ た 値 x の arce tanh(tanh-'x) の 値 を 
表わす 浮動 小数 点数 値 を 返す 。 


x が 実数 で ある 場合 , その 絶対 値 は 1 より 小さ く を けれ ば な ら な 
いい o すなわち も , ABS ( x 2 


x が 複素 数 で ある 場合 )x は 1 また は ーー 1 で あっ て は な ら な い 。 
と の 場合 , 結果 は 次 の 式 で 与え を られ る 。 


LOG((1+x) プ (1-x) ) グ 2 


BINARY( xi , x。 〔, xs 〕 〕 ) 算 術 


BINARY は , x。 お よび x』 CC よっ て 指定 され て いる 精度 を も 
つ , 与え られ た 値 x」 の 2 進数 表現 を 返す 。 


xi 2 を 基数 と する 表現 (変換 すべ き 値 。 


x。 変換 操作 の 間 維 持 す べき 桁 数 を 指定 する た め の 無 符号 の 1 0 
進 整数 。 x 。 は 当 コ ン ペ イラ ー の も と で の 許容 最 大 精度 を 越 
えて いて は な ら な い 。 


x。 結果 の スケ ー ル 因数 を 指定 する た め の 1 0 進 整 数 ( 特 号 を つ 
け て も つけ な く て も よい ) 。 結果 が 固定 小数 点数 で あり , し 
か も x。 を 与え る 場合 C は , x。 も 与え を を けれ ば な ら な を い 。 
結果 が 浮動 小数 点数 で ある 場合 に は , x。 し か 与え る と と が 
で き ない 。 x。 と xs を 共 C 省 略し た 場合 は , 結果 の 精度 は , 
基数 変換 規則 (C 準 し て 決め られ る 。 
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BIT( zi【( ,x。〕 ) スト リン グ 取 扱い 


BT 和 Tl は , 与え られ た 値 x,。 の ビッ ト ・ ス トリ ング 表現 を 返す 。 

文 1 変換 すべ き 式 。 

テ *z 結果 と し て 得 ら れる ビッ ト ・ ス トリ ング の 長 さ を 指定 する た 
め の 系 数 変換 する と と の で きる 式 。 必 要 応 し て, x。 は 


精度 ( 1 5, 0 ) の 2 進 整 数 (c 変 換 さ れる 。 x。 を 省略 し た 
場合 , ビッ ト ・ ス トリ ング の 長 さ は , タイ プ ブ 変 換 規 則 従っ 


て 決定 され る 。 
BOOL ( x」, xz。 , x。 ) スト リン グ 取 扱い 


BOOL し は , x。 に よっ て 指定 され て いる ブー ル 演 算 を ピッ ト ・ ス 
トリ ング x」 お よび xz 行なっ た 結果 を 夷 わ す ビ ッ ト ・ ス トリ ン 
グ を 返す 。 結果 の 長 さ は , オペ ラン ド x」 と x。 の うち も 長い 方 の オォ 
ベラ ンド の 長 さ CK な る 。 


*i」 と X2 は , ビ ピット ・ ス トリ ング 式 , ま 友 は , ビ ピット ・ ス トリ ン 
グ K 変 換 す る と と の で き る 式 で ある 。 


xs は , 4 ビット か ら を な る ビッ ト ・ ス トリ ング で ある 。 次 示す ょ 
2 KC, と の 各々 の ビッ ト で , xi の ある ビッ ト と x。 の と れ K 対 応 
する ビッ ト と を 比較 し た 結果 を 指定 する 。 


文 1 文 2 結 果 


ヌ *s の ビッ ト 1 
xs の ビッ ト 2 
xs の ビッ ト 3 
xs の ビッ ト 4 


ーー の の 
つつ 〇 むー ロロ 


x」 の 長 さ と xz。 の 長 さ が 異なる 場合 , 短い 方 の ビッ ト ・ ス トリ ン 
グ の 右側 だ ゼロ が 補 を われ て , 長い 方 の ビッ ト ・ ス トリ ング の 長 さ 
に 揃 々 られ る 。 x』。 が 長 さ 4 の ビッ ト ・ ス トリ ング 式 で な い 場 合 , 
xs は ビ ピット ・ ス トリ ング 変換 され , 右側 で せ ロ の 補充 また は 切 
捨て が 行 を われ る 。 


CEIL(x) 算 術 


CETL は , 与え られ た 値 x 以上 の 最小 の 整数 を 返す 。 x は 実数 で 
な けれ ば な ら な い 。 


x が 精度 (p, q ) の 固定 小数 点数 で ある と する と , 結果 の 精 旋 
は 次 の 式 で 与え られ る 。 


(MIN(N,MAX(p-q+1, 1 ) ) , 0 ) 


と と で , N は 許容 され る 最大 の 桁 数 で ある 。 
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CHAR(x」( ,x。 〕 ) スト リン グ 取 扱い 


CHAR は , 与え られ た 値 x」 の 文字 スト リン グ 表 現 を 返す 。 

Xi 変換 すべ き 式 。 

xz 結果 と し て 得 ら れる 廊 字 スト リン グ の 長 さ を 指定 する た め の 
整数 変換 する と と の で きる 式 。 必要 応じ し て, x。 は 精度 


( 15 , 0 ) の 2 進 整数 fc 変換 され る 。 x。 を 省略 し た 場合 
文字 スト リン グ の 長 さ は , タイ プ 変 換 規 則 (c 従 っ て 決定 され る 。 


COMPLETTION(x) 非同期 入出 力 


COMPLETTON は , 与え られ た 事象 x の 完了 値 を 表わす 1 つの 
ビッ ト を 返す 。 与え られ た 事象 が 未完 了 の 場合 CK は , 「0 「 B が 返 
され る 。 与え られ た 事象 が 完了 し て いる 場合 Cc は , 1 「B が 返さ 
れる 。 

COMPLETTI ON 擬似 変数 

と の 擬似 変数 は , 与え られ た 事象 x の 完了 値 を セッ ト す る 。 x は 非 
活用 状態 た を な けれ ば な を ら な い 。 と の 擬似 変数 へ の 割当 て の 間 割 込 
み が 起 と る と と は な い 。 
COMPLEX(x,」, x。 ) 


省 略 形 : CPLX(x,」, x。 ) 


COMPLE 双 X は , 与え られ た 2 つの 値 x お よび x。 か ら 作 られ 
た 複素 数 値 を 返 す 。 


Xi 結果 の 実数 部 と を る 実数 値 。 
文 2 結果 の 虚数 部 と な る 実数 値 。 

Xi と xs の 基数 ま を た は スケ ー ル が 異な る 場合 は , デー タ 変 換 規 
則 < 従 っ て , 一 方 の 基数 また は スネ スケー ル が 他方 の 基数 また は スケ ー 
ル 《 合 致す る ょ 2 変換 され る 。 し た が っ て , その 結果 の 実数 部 と 虚 
数 部 の 基数 を ら び に スケ ー ル は 同じ し に な る 。 x」 と x。 は 共 K 実 数 
で な を けれ ば を な を ら な い 。 


結果 が 固定 小数 点数 の 場合 , その 精度 は 次 の 式 で 与え られ る 。 


(MIN(N,MAX( pi 一 gi ロ Ds 一 dz ) 二 MA 双 ( qi > dz ) 月 
MAX( qi テ d 2 ) ) 


に qi ), ( ps , dz。 ) は それ ぞ れ x」 と x。 の 
精度 で あり , N は 許容 され る 最大 の 桁 数 で ある 。 


デー 


必要 な 変換 を 行 を っ た 後 の 引 数 が 浮動 小数 点数 で あり , その 精度 が 
Di 9? Ds で ちあ る と する と, 結果 の 精度 は MAX(p 3 D? ) て な る 。 


COMPILEX 擬似 変数 

と の 擬似 変数 は , ある 複素 数 値 の 実数 部 を 変数 x」 iC 割り 当て , 虚 
数 部 を 変数 x 。 ic 割り 当て る 。 と の 擬似 変数 (CC は , 複素 数 値 し か 割 
り 当 て る と と が で き な い 。 xi が 配列 の 場合 , x。 は 要素 で も 配列 
で も よい 。 xi お よび x。 が 配列 の 場合 , 双方 の 配列 の 限界 が 等 し 
くけ れ ば な ら な い 。 

CONJG(x) 算 術 
CONJG は , 与え られ た 複素 数 値 x の 共役 複素 数 値 を 返す 。 ある 複 


素数 値 の 共役 複素 数 値 と は , も と の 複素 数 の 虚数 部 の 符号 を 逆 C し 
て 得 られ る 値 で あ る 。 文 が 実数 の 場合 , x け 複 素 数 に 変換 され る 。 


COS(x) 数 学 


C OS は, 与え られ た 値 x の cos の 値 (cos x) を 表わす 漂 動 
小数 点数 値 を 返す 。 


ラジ アン を 単位 と する 値 を も ゃ つ 式 。 
x が 複素 数 の 場合 , 結果 は 次 の 式 で 与え られ る 。 
coS x 六 eosh Db -i 半 sin a * キ sinh b 


た だ し , a 十 ji*※ ま bo。 


COSD(x) 数 学 


COSD は , 与え られ た 値 x の cos の 値 ( cos x ) を 表わす 
浮動 小数 点数 値 を 返す 。 


X 度 を 単位 と する 値 を も つ 式 。 x は 実数 で を けれ ば ならない 。 


COSH(x) 数 学 


COSH は , 与え られ た 値 x の cosh の 値 (cosh x ) を 表わす 
肖 動 小数 点数 値 を 返す 。 


DATAFIELD 


x が 複素 数 の 場合 , 結果 は 次 の 式 で 与え られ る 。 
cosh a 六 cos b 十 isinh a 玉 sin b 
た だ し , a 二 ji※b テ x で ある 。 


COUNT(z) STREAM 入 出力 
COUNT は , 指定 され て いる ファ イル xK 対 し て 最後 CK 行なわ れ 
た GET ま た は PUT 操 作 の 間 K 転 送 さ れ た デー タ 項 目 の 数 を 表 わ 
す , 省略 時 精度 の 固定 小数 点 2 進 整 数 を 返す 。 


< ファ イル 式 。 と の ファ イル は STREAM 属性 を も つも る の で 
な けれ ば な ら な い 。 


次 の 点 に 注意 す る こと 。GET ま た は PUT 操 作 の 間 に オ ン ・ ユ ニ 
ッ ト な いし プ ブ プロシージャー 入り , し か も る その オン ・ ユ ニッ ト な い 
し プロ シー ジャ ー の 中 で 同じ ファ イル KC 対し て GBT ま を は PUT 
操作 が 行なわ れ て いる 場合 ,」 COUNT の 値 は 新しく 行 を われ た 操 
作 (C 関 する 値 《C リ セッ ト さ れる 。 と の 後 , 当初 の GE T ま た は 
PU T が 再 囲 され る と COUNT の 値 が 復元 され る 。 


条 件 取扱 い 


DATAFIELD は , NAME 条 件 の た め の オ ン ・ ユ ニッ ト と お いて , 
と の 条件 を 引き 起す 原因 と を っ た フィ ー ル ド の 内 容 を 値 と する 文字 
スト リン グ を 返す の 使用 され る 。 


また , NAME 条 件 対処 する た め の シ ステ ュ 標 準 処 置 の 一 部 と 
し て 引き 起 さ れ た ERROR 条 件 を いし FINISH 条件 の ォ ン ・ 
ュ ニ ッ ト の 中 で DATAFIELD を 使用 する と と も で きる 。 


文脈 か ら 外 れ た と と ろ で DATAFIELD が 使用 され て いる と , 
ナル ・ ス トリ ング が 返さ れる 。 


DATE 


DATE は , 長 さ が 6 女 字 で yymmdd と いう 形 を と る 区 字 ス トリ 
ング を 返す 。 こ と と で , 


yy 今年 の 年 号 を 表わす 
mm 今月 は 何 月 か を 表わす 
dd 今日 は 何 日 か を 素 わ す 


DECTIMAL 訟 wo テ xz [ , xs ) 算 術 


省 略 形 : DOC Ke し > 1) 


DECIMAL は , 与え られ た 値 x. の 1 0 進数 表現 ( x。 ぉ お よび 
xs で 指定 され て いる 精度 を もつ ) を 返す 。 
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xi 10 を 基数 と する 表現 変換 すべ き 値 。 


xz 変換 操作 の 間 維 持 す べき 桁 数 を 指定 する た め の 無 符号 の 1 0 進 
整数 定数 。 x。 は 当 コ マンバ イラ ー の も と で の 許容 限度 を 越え 
て いて は な ら な い 。 


xs 結果 の スケ ー ル 因数 を 指定 する た め の 1 0 進 整数 定数 ( 符号 
は つけ て も つけ を く て も よい ) 。 結果 が 固定 小数 点数 の 場合 , 
x。 を 与え を た と き は x。 も 与え を を なけ れ ば を ら な い 。 結果 が 肖 
動 小 数 点数 の 場合 は , x。 し か 与え る と と が で き な い 。 


X?。 お よび xs を 共 K 省 略し た 場合 CK は , 結果 の 精度 は 基数 変換 規 
則 従 っ て 決定 され る 。 


DIM(x,」, x。 ) 配列 取扱 い 


D I M は , 与え られ た 配列 x」 関し て 指定 され て いる 次 元 xs の 
現在 の 範囲 を 表わす 省略 時 の 精度 の 固定 小数 点 2 進 整数 を 返す 。 


x」 与え られ た 配列 。 こ と の 配列 は 現時 点 で 割り 振ら れ て いる $ 
の で な けれ ば を ら を い 。 


xz xi の ある 特定 の 次 元 を 指定 する た め の 要 素 式 。 必 要 K 応 し 
て , xs は 精度 ( 15,0) の 2 進 整数 変換 され る 。 


xi の 次 元 数 は , x。 C よ っ て 指定 され て いる 次 元 よ り 小 さい も の 
で あっ て は な ら な い 。 


DIVIDE( xi, xs , xs 〔, x4〕 ) 算 術 


DIVIDE は , 2 つの 値 xi」 と x。 の 商 を xs お よび x。 で 指定 され 
て いる 精度 を も つ 数 と し て 返す 。 


到 ュ 被 除 数 。 

区?2 除 数 。 

xs 除算 の 間 確 保 す べき 桁 数 を 指定 する た め の 無 符号 の 1 0 進 整 
数 定数 。 x 。 は 当 コ ン バ イ ラー の も と で の 許容 限度 を 越え を て 
いて は な ら な い 。 

x。 結果 の スケ ー ル 因数 を 指定 する た め の 1 0 進 整数 定数 ( 符号 
は つけ て も つけ な く て も よい ) 。 結果 が 固定 小数 点数 の 場合 


は , xs と x。 の 両方 を 与 を を けれ ば な ら な た い 。 結果 が 浮動 
小数 点数 の 場合 は , x。 し か 与え る と と が で き な い 。 
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EMPTY 記憶 域 制御 
EMPTY は , ゼロ ・ エ クス テン ト の 記憶 域 を 返す 。 EMPTY は , 

ある 1 つの 記憶 域 の 中 の すべ て の 割 振り を 解放 する の 使用 され る 。 
と の 関数 の 値 は 4, ある エリ ア 変 数 が 割り 振ら れる と き 自 動 的 に そ 
の エリ ア 変 数 割り 当て られ る と い 9 点 注意 され た い 。 


ERF(x) 数 学 


ERF は , 与え られ た 値 x の 誤差 関数 を 表わす 浮動 小数 点数 値 を 
返す 。 x は 実数 で を けれ ば な ら な い 。 


結果 は 次 の 式 で 与え られ る 。 
ERF(x)=(2 ク pe at 
ERFC(x) 数 学 


ERFC は , 与え られ た 値 x の 誤差 関数 の 補 数 を 表わす 浮動 小数 点 
数 値 を 返す 。 x は 実数 で を けれ ば な ら な い 。 


結果 は , 関数 ERF を 使っ て 次 の ょ うら KK 定義 され る 。 


1-ERFE(x) 


EXP(x) 数 学 


EXP は , 自然 対数 の 底 e を 与え られ た べき 指数 x だ け 累 乗 し た 値 
を 表わす 浮動 小数 点数 値 を 返す 。 
FIXED( xi し Xs 上 Xs J〕 ) 算 術 


FIXED は , 与え られ た 値 x」 の 固定 小数 点数 表現 ( x。 な よび 
xs で 指定 され て いる 精度 を も つ ) を 返す 。 


xi 固定 小数 点 記 数 法 ( に ょ る 表現 < 変換 すべ き 値 。 

x。 結果 の 桁 の 総数 を 指定 する た め の 無 符号 の 1 0 進 整数 定数 。 

xs。 結果 の スケ ー ル 因数 を 指定 する た め の 1 0 進 整 数 定数 ( 符号 
を つけ て も つけ を く て も よい ) 。 x。 を 省略 し た 場合 , スケ 


ー ル 因数 は ゼロ とみ を され る 。 


xz と xs を 共 (C 省 略し た 場合 , 省略 時 の 精度 が と られ る 。 結果 が 


2 進数 の 場合 の 省略 時 の 精度 は ( 15,0 ) で あり , 結果 が 1 0 進数 
の 場合 の 省略 時 の 精度 は ( 5 , 0 ) で ある 。 
FLOAT(x」 〔(, x。 〕 ) 算 術 


FLOAT は , 与え られ た 値 x」 の 肖 動 小数 点数 表現 ( x。 で 指定 
され て いる 精度 を も つ ) を 返す 。 


xi」 浮動 小数 点 記 数 法 K ょ る 表現 変換 すべ き 値 。 
x。 結果 の 桁 の 総数 を 指定 する た め の 無 符号 の 1 0 進 整数 定数 。 
xz を 省略 し た 場合 , 省略 時 の 値 が と られ る 。 と れ は け は , 結果 


が 2 進数 の と き は 2 1 で あり , 結果 が 1 0 進数 の と き は 6 で 
ある 。 


FLOOR(x) 算 術 


FLOOR は , 与 を られ た 値 x 以下 の 最大 の 整数 を 返す 。 x は 実数 
で を けれ ば な ら な い 。 


x が 精度 (p, q ) の 固定 小数 点数 で ある 場合 , 結果 の 精度 は 次 の 
式 で 与え られ る 。 


(MIN(N,MAX(p-q 寺 1, 1), 0) 
と と で , N は 許容 され る 最大 の 桁 数 で ある 。 
HBOUND( x」, x。 ) 配列 取扱 い 
HBOUND は , 与え られ た 配列 x」 関し て 指定 され て いる 次 元 
x。 の 現在 の 上 限 を 表わす 省略 時 の 精度 を もつ 固定 小数 点 2 進 整数 
を 返す 。 


x」 与え られ た 配列 。 と の 配列 は 現時 点 に な いて 割り 振ら れ て 
いな を けれ ば な ら な い 。 


x。 xi の ある 特定 の 次 元 を 指定 する た め の 要 素 式 。 必 要 応 じ 
て , xs は 精度 ( 15,0 ) の 2 進 整数 変換 され る 。 


xi の 次 元 数 は , 次 元 x。 より 小さ いも る の で あっ て は な ら な い 。 


HIGH(x ) 


HIGHH は , 各々 の 文字 が 照合 順序 に な ける 最高 位 の 文字 ( 1 6 進 
法 で 表わす と FF ) で ある 長 さ x の 文字 スト リン グ を 返す 。 


LENGTH(x) 


スト リン グ 取 扱い 


X 長 さ を 指定 する た め の 式 。 必要 応じ て , x は 精度 ( 15, 
0 ) の 2 進 整 数 (変換 され る 。 


IMAG(x) 算 術 


IMAG は , 与え られ た 複素 数 値 x の 虚数 部 を 返す 。 結 果 の モー ド 
は 実数 で ある 。 


1 MAG 擬似 変数 


と の 擬似 変数 は , ある 実数 値 ほ また は ある 複素 数 値 の 実数 部 を , 与 を 
られ た 複素 変数 x の 虚数 部 ic 割り 当て る 。 xx の モー ド は COMPLEX 
で な けれ ば を ら な い 。 


INDEX( x」, x。 ) スト リン グ 取 扱い 
INDEX は , スト リン グ x。 の 中 で スト リン グ x。 と 等 し い サ プ 
スト リン グ が 開始 され る 位置 を 表わす , 省略 時 の 精度 を もつ 固定 小 
数 点 2 進 整数 を 返す 。 

x」 探索 され る スト リン グ 

X。 探索 の 目的 で ある スト リン グ 


xi」 の 中 (Cx。 が 見 あたら な い 場 合 に は , ゼロ が 返さ れる 。 


xi の 中 (Cx。 が 2 つ 以 上 ある 場合 に は , 最初 の x。 の 開始 位置 
が 返さ れる 。 


x。 が 配列 の 場合 , x」 は x。 と 同じ 限界 を も る つ 配 列 で を けれ ば 
な ら な い 。 


いずれ か の 引数 が 文字 また は 1 0 進数 で ある 場合 , この 引数 は 文 
字 ス トリ ング 変換 され る 。 あ る い は , 引数 が ピット ・ ス トリ ング 
と 2 進数 。 また は 2 信 数 と 2 進数 で ある 場合 は , と これら の 引数 は 
ッ ト ・ ス トリ ング 変換 され る 。 


スト リン グ 取 扱い 


LENGTH は , 与え を られ た スト リン グ x の 現在 の 長 さ を 表わす 
省略 時 の 精度 の 固定 小数 点 2 進 整数 を 返す 。 x が 2 進数 の 場合 , x 
は ビッ ト ・ ス トリ ング 変換 され る 。 と れ 以 外 の モー ド の 場合 , x 
は 所 要 の 変換 を 受け て 文字 スト リン グ に な る 。 
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LBOUND(xi, x。 ) 配列 取扱 い 


LBOUND は , 与え を られ た 配列 x.」 に つい て 指定 され て いる 次 元 
x。 の 現在 の 下限 を 表わす 省略 時 の 精度 の 固定 小数 点 2 進 整 数 を 返 
す 。 


x」 与え られ た 配列 。 こ と の 配列 は 現時 点 に お いて 割り 振ら れ て 
いな けれ ば な ら な い 。 


x。 XX」 の ある 特定 の 次 元 を 指定 する た め の 要 素 式 。 必 要 K 応 じ 
て , x。 は 精度 ( 15,0) の 2 進 整数 変換 され る 。 


x:」 の 次 元 数 は , 次 元 x。 より 小さ いも る の で あっ て は を ならない 。 


LINENO(x) STREAM 入 出力 


LINENO は , 指定 され て いる ファ イル の 現在 の 行 番号 を 夷 わ 
す 省 略 時 の 精度 の 固定 小数 点 2 進 整数 を 返す 。 


X ファ イル 式 。 と の ファ イル は PRINT 属性 を も つも の で な 
けれ ば な ら な い 。 


LOG(x) 数 学 
LOG は , 与え られ た 値 x の 自然 対数 ( e を 底 と する ) を 表わす 治 
動 小数 点数 値 を 返す 。 x が 実数 の 場合 , x は ゼロ より 大 きく な けれ 
ば を ら な い 。 x が 複素 数 の 場合 ,x は 0 十 0I (等 し いも の で あっ 


て は な ら な い 。 x が 複素 数 の 場合 , この 関数 の 値 は 複数 個 存 在 する 
- の で 主 値 だ けが 返さ れる 。 主 値 は 次 の 形 を と る 。 


4 十 ji 玉 b 
と と で , b は 次 の 範囲 に た ある 。 


ー ァ ヶ ぐ く b く ーー ァ 


LOG2(x) 数 学 


LOG 2 は , 与え られ た 値 x の 2 進 対数 ( 2 を 底 と する ) を 表わす 
浮動 小数 点数 値 を 返す 。 x は 実数 で を けれ ば を ら ず , し か も ゼロ よ 
り 大 きく を けれ ば な ら な い 。 
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LOW(x) 


LOG10(x) 数 学 


LOG10 は , 与 を られ た 値 x の 常用 対数 (1 0 を 底 と する ) を 表 
わす 肖 動 小数 点数 値 を 返す 。 x は 実数 で を な けれ ば を ら ず し か も ゼロ 
より 大 きく な けれ ば な ら な い 。 


スト リン グ 取 扱い 
LOW は , 各々 の 区 字 が 照合 順序 の 最 下 位 の 廊 字 ( 1 6 進 法 で 表 わ 
す と 0 0 ) で ある 長 さ x の 文字 スト リン グ を 返す 。 必要 ic 応 じ て , 


x は 精度 ( 15,0) の 2 進 整数 変換 され る 。 


文 長 さ を 指定 する た め の 式 。 


移す 算 術 


MAX は , 1 つの 組 を 構成 する 2 つ 以 上 の 引数 の 中 で 最大 の 値 を ゃ 
つ 引 数 を 探し , その 引数 の 値 を 返す 。 


・, Xn 返さ れる 最大 値 が その 中 か ら 選 ば れる 値 の リ 


スト 。 


し 。 の 


許容 され る 引数 の 数 は 最高 6 4 で ある 。 引 数 は すべ て 実数 で を けれ 
ば な ら を ない 。 


引数 が 次 の ょ うな 精度 の 固定 小数 点数 で ある も の と する と , 


し の: っ 0 (pz,d> 0 だ り dn ) 
結果 の 精度 は 次 の 式 で 与え を られ る 。 

(MIN(N, MAX( pi 一 q」, p。 一 ぅ , *・ つう っ Dnー dn ) 十 
MAX( 9」, d2 … っ dn)),MAXX(d」, 92 > dn ) ) 


所 要 の 変換 が 行なわ れ た 後 の 引 数 が 浮動 小数 点数 で , その 精度 が 
DP」 , D。, Ds。 ・・・DPn で ある も の と する と , 結果 の 精 府 は MAX 
(Pi, p。 ) DP。・・Pn ) で ある 。 


M TI N(x,」, x。,・・, Xn ) 算 術 


M I N は , 1 つの 組 を 構成 する 2 つ 以 上 の 引数 の 中 で 最小 の 値 を る 
つ 引 数 を 探し , その 引数 の 値 を 返す 。 
> テ Xn 返さ れる 最小 値 が その 中 か ら 選 ば れる 値 の リス ト 。 


文 」) 文 2 ぅ ) "* 


許容 され る 引数 の 数 は 最高 6 4 で ある 。 引数 は すべ て 実数 で を けれ 
ば な ら な い 。 


引数 が 次 の よう な 精 訂 の 固定 小数 点数 で ある も の と する と , 


( pi di )。 ( p。) すう,・・) (pn ) dn ) 

結果 の 精度 は 次 の 式 で 与え を られ る 。 
(MIN(N MAX(pi 一 qi, ps 一 92,・・)Pn 一 dn ) 十 
MAX(qi, ds ・ っ dn) )) MAX( d」,d ぅ 2)・ 7 > dn ) ) 


所 要 の 変換 が 行なわ れ た 人 後 の 引数 が 淳 動 小 数 点数 で あり , その 精度 


が Di,)D2z ) Ds ・・ > DP で ある も の と する と , 結果 の 精度 は 
MAX( D」)D。 」D。 。 *・ ぅ PD ) で ある 。 
MOD ( x,」 , xz ) 算 術 


MOD は , 次 の 式 を 満足 する 最小 の 正 の 値 R を 返す 。 


(xi 一 R)/x。 三 nm 「n は 整数 ) 
し た が っ て , 結果 は , 与え られ た 値 x」 が 与え られ た 値 x。 で 割り 
切れ る よう に する た め C, xi」 か ら 減 ず べ き 最 小 の 正 の 値 で ある 。 


交 」 は 実数 で な けれ ば な ら な い 。 ュ が 正 の 場合 , 結果 は x」 を x。z 
で 割っ た 余り で ある 。 x」 が 負 の 場合 , 結果 は と の 余り Cx。 を 加 
えた 値 で ある 。 


x。 は 実数 で を けれ ば を ら な い 。 x。 が ゼロ で ある と , 
ZERODI VIDE 条 件 が 起こ る 。 結果 が 浮動 小数 点数 の 場合 , そ 
の 精度 は xi と x。 の 精度 の うち 高い 方 の 精度 iC な る 。 結果 が 固定 
小数 点数 の 場合 , その 精度 は 次 の 式 で 与え られ る 。 


(MIN(N, p。 一 q。 填 MAX ( q, , q。) ) , 
MAX( qi, d。 ) ) 


と と で , ( Di , d」) , (p。 , d ぅ > ) は それ ぞ れ x」 と xs の 精度 で あ 
の も 


xi と X。 が 異な を る スケ ー ル 因数 を も ゃ つ 固 定 小数 点数 の 場合 , 結果 


の 左側 の 方 が 切り 捨て られ る と と が ある 。 と の 切捨て が 行なわ れ た 
場合 に c, SIZE 条件 が 解禁 状態 に ある と と の 条件 が 引き 起 さ れる 。 


MULTIPLY (X」, x。, x。[ , X4〕 ) 算 術 


MULTIPLY は , 2 つの 値 xi と x。 の 柄 (x。 ぉ よび x。 で 指定 
され て いる 柄 度 を も つ ) を 返す 。 
掛け 合わ せる べき 値 。 


区 ぅ 区 2 


xs 乗算 の 間 確 保 す べき 桁 数 を 指定 する た め の 無 符号 の 1 0 進 整 
数 定数 。 x。 は 当 コ ン パ イラ ー の も と で の 主 容 限度 を 越え て は 


ら な い 。 


x4 結末 の スケ ー ル 因数 を 指定 する た め の 1 0 進 整数 定数 ( 符号 

は つけ て も つけ を く て も よい )。 結果 が 固定 小数 点数 の 場合 

は , x 。 と x。 の 両方 を 与 を を けれ ば な ら な を い 。 結果 が 浮動 

小数 点数 の 場合 は , x。 し か 与え る と と が で き な い 。 
NULL 訪 憶 域 制御 
NULL は , ナル ・ ポ イン ター 値 , す を わ ち , 変数 の どの 世代 も 指 
し て いな い 値 , を 返す 。 と の 組込み 関数 の 値 を ある オフ セッ ト 変 数 
割り 当て る と と より, ナル ・ ポ イン ター 値 を OFRFSET KK 変 
換 す る と と が で きる 。 


OFFSET(x」, x。 ) 記憶 域 制御 


OFEFSET は , 与 えら れ た 記憶 域 x 。 を 基準 KC し て 与え を られ た ポイ 
ンタ ーX」 か ら 得 られ た オフ セッ ト 値 を 返す 。 xi」 が ナル の 場合 , 
ナル 値 が 返さ れる 。 


x」 。 ボイン ター 式 。 と の 式 は 記憶 域 x 。 内 の 基底 付 変数 の ある 世 
代 を 識別 する も る の で な けれ ば な ら な い 。 


ぅ エリ ア 変 数 。 


xi が 婦 素 式 で ある 場合 , x。 は 要素 変数 で な けれ ば を ら な い 。 


ONCHAR 条 件 取扱 い 
ONCHAR は , CONVERSION 条件 ぶ が 引き 起 さ れる 原因 と な っ 
た 文字 を 返す 。 CONVERSION 条件 の た め の オ ン ・ ユ ニッ ト の 
中 で ONCHAR を 使用 する と と が で きる 。 また, CONVERSION 
条件 対処 する た め の シ ステ ュ 標 準 処 置 と し て 引き 起 さ れ た 
ERROR 条 件 を いし FINISH 条 件 の オン ・ ユ ニッ ト の 中 で 
ONCHAR を 使用 する とこ と も で きる 。 


娘 脈 か ら は ずれ た と と ろ で ONCHAR 組込み 関数 が 使用 され て いる 
場合 は , プラ ンク が 返さ れる 。 た だ し , 廊 脈 か ら は ずれ た と と ろ で 
ONCHAR 擬似 変数 割当 て が 行 を われ て な り , と の た め C 
ONCHAR (ある 値 が 与え を られ て いる 場合 は 別 で , と の 場合 に は , 
と の 擬似 変数 割り 当て られ て いる 文字 が と の 組込み 関数 C よ っ て 
返さ れる 。 


ONCHAR 擬 似 変数 


と の 擬似 変数 は , ONCHAR 組込み 関数 の 現在 の 値 を リセ ッ ト す る 。 
と の 擬似 変数 ic 割り 9 付け られ て いる 値 は 長 さ 1 の 変 字 スト リン グ K 


_ 変換 され る 。 再度 変換 が 試み られ た と き は , 新しい 文字 が 使用 され る 。 
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と の 擬似 変数 が 文脈 の 外 で 使用 され て お り , し か も ONCHAR 組 
込み 関数 へ の 次 の 参照 も 文脈 の 外 で 行なわ れ て いる 場合 は , と の 擬 
似 変 数 Kr 割り 当て られ て いる 交 字 が 返さ れる 。 と れ 以 外 の 文脈 外 割 
当て は 無視 され る 。 


ONCODE 条 件 取扱 い 
ONCODE は , 当該 オン ・ ユ ニッ ト を 働か せる 原因 と な っ た 割 込 
み の タ イプ ブ を 表わす 省略 時 の 精度 の 固定 小数 点 2 進 整数 を 返す 。 ど 
の オン ・ ユ ニッ ト C お いて も ONCODE を 使用 する と こと が で きる 。 
「H 節 : ON 条件 」 で すべ て の ON コー ド を 定義 する 。 


文 脈 の 外 で ONCODE が 使用 され て いる 場合 は , ゼロ が 返さ れ 
る 。 


ONCOUNT 条 件 取 扱い 
ONCOUNT は , ある オン ・ ユ ニッ ト K 入 っ た と き C ま だ 残っ て 
いる 割込み の 数 を 表わす 省略 時 の 精度 の 固定 小数 点 2 進 整 数 を 返す 。 
RECORD 条件 を いし TRANSMI T 条件 の た め の オ ン ・ ユ ニッ ト 
また は , こと これら の 条件 < 対処 する た め の シ ステ ム の 標準 処置 と し て 
引き 起 さ れ た ERROR 条 件 を いし FINISH 条 件 の オン ・ ユ ニッ ト 
の 中 で し か ONCOUNT を 使用 し て は な ら な い 。 と いう の は , 複数 
の 割込み を 引き 起こ と し 得る の は , RECORD 条件 と TRANSMIT 
条件 だ け で ある か ら で あ る ( 「H 節 : ON 条件 」 を 参照 の と と ) 。 


文脈 の 外 で ONCOUNT が 使用 され て いる 場合 は , ぞ ロ が 返さ れる 。 


ONEFILE 


ONTF TI LE は , 入出 力 条 件 まき た は CONVERS1ION 条 件 が 提起 
され て いる ファ イル の 名 前 を 値 と する 廊 字 スト リン グ を 返す 。 入出 
力 条件 を いし CONVERSTION 条 件 の た め の オ ン ・ ユ ニッ ト , ま 
を は , 入出 力 条 件 を いし CONVERSION 条 件 < 対処 する た め の 
シス テム 要 準 処置 と し て 引き 起 さ れ た ERROR 条件 を いし 
FINISH 条件 の オン ・ ユ ニッ ト の 中 で ONFILE を 使用 する 
と と が で きる 。 


文脈 の 外 で ONE ILE が 使用 され て いる 場合 は , ナル ・ ス トリ 
ング が 返さ れる 。 
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ONKEY 


条 件 取扱 い 


条件 取扱 い 


ONKEY は , 入出 力 条 件 を 引き 起す 原因 と を っ た レコ ュー ド の キー 
を 値 と する 文字 スト リン グ を 返す 。 ENDFILE を 除く 任意 の 入 
出力 条件 の た め の オ ン ・ ユ ニッ ト , また は , 入出 力 条 件 対処 する 
た め の シ ステ ム の 標準 処置 と し て 引き 起 さ れ た ERROR 条件 みい 
し FINISH 条件 の オン ・ ユ ニッ ト の 中 で , ONKEY を 使用 す 
る と と が で きる 。 KEYED ファ イル C お ける 操作 CC 対し て は , つ 
ね (CONKEY が モッ ト さ れる (入出 力 条 件 を 提起 し た ステ ー ト メ 
ント で KEY,KEYTO, また は KEYFROM オ ォ オプション が 指定 
され て いな を いと き で も る ) 点 注意 され た い 。 


結果 は 以下 の 規則 従っ て 決定 され る 。 


1 (ENDFILE を 除く ) 任意 の 入出 力 条 件 , また は , これ 
ら の 条件 対処 する た め の シ ステ ム の 標準 処 置 と し て 引き 超 
され た ERROR 条件 を いし FINISH 条件 の 場合 , 結果 
は エラ ー を 引き 起 と し た 入出 力 ス テー トメ ント の 記録 され た 
キー の 値 た な る 。 


REGTIONAL ( 1 ) デー タ ・ セ ッ ト の 場合 に は , 結果 は 8 
バイ ト か ら な る 文字 表現 の 区 域 番号 C な る 。 キー が 間違っ て 
指定 され て いる 場合 , 結果 は 原始 キー の 最後 の 8 バイ ト C な 
る 。 原始 キー が 8 バイ ト よ り 短 い 場 合 , 原始 キー は 右側 で プ 
ラン ク が 補 わ れ て 8 バイ ト に な る 。 


2. 更新 され た レコ ュー ド の キー と 入力 レコ ー ド の キー と が 合致 し 
を いと き 更新 され た レコ ー ド を 索引 デー タ ・ セ ッ ト K 書 き 
込 も うと する た め CREWRITE ステ ー ト メン ト を 用 いた 
場合 に は , 結果 は 入力 レ ュ ー ド の 内 蔵 さ れ た キー の 値 に た な る 。 


文脈 の 外 で ONKEY が 使用 され て いる 場合 , ナル ・ ス トリ ング が 
返さ れる 。 


ONLOC 条 件 取扱 い 


ONLOC は , ある プロ シー ジャ ー の 中 で 当該 条件 が 引き 起 さ れ た 
場合 Cc, その プロ シー ジャ ー の 入口 点 の 名 前 を 値 と する 交 字 スト リ 
ング を 返す 。 ONLOC は , どの オン ・= ユ ニット の 中 で も 使用 する 
と と が で きる 。 


文脈 の 外 で ONLOC が 使用 され て いる 場合 は , ナル ・ ス トリ ン 
グ が 返さ れる 。 


ONSOURCE 条件 取扱 い 


ONSOURCE は , CONVERS TION 条件 が 引き 起 さ れ を とき 
処理 され て いた を フィー ルト の 内容 を 値 と する 区 字 ス トリ ング を 返す 。 


CONVERSTION 条 件 の た め の オ ン ・ ユ ニッ ト , また は , 
CONVERSION 条 件 に 対処 する た め の シ ステ ム ュ 標準 処置 と し て 引 
き 起 され た ERROR 条件 を いし FINISH 条件 の オン ・ ユ ニッ 
ト の 中 で ONSOURCE を 使用 する こと が で きる 。 


文脈 の 外 で ONSOURCE が 使用 され て いる 場合 は , ナル ・ ス 
トリ ング が 返さ れる 。 


ONSOURCE 擬 似 変数 


と の 擬似 変数 は , ONSOURCE 組込み 関数 の 現在 の 値 を リセ モット 
する 。 と の 擬似 変数 割り 当て られ て いる 値 は , 文字 スト リン グ KC 
変換 され , 必要 応じ て 右側 CK プ ラン ク が 補 わ れ て 当該 エラ ー を 引 
き 起 と し た フィ ー ル ド の 長 さ と 同じ 長 さ を も つよ うな る 。 有 再び 変 
換 が 試み られ る と き は , と の 新しい スト リン グ が 使用 され る 。 


再び 変換 が 試み られ る と き , と の 擬似 変数 に 割り 当て られ て いる 
スト リン グ は , 単独 の デー タ 項 目 と し て 処理 され る 。 と の よう な 理 
由 か ら , GET LIST また は GET DATA ス テー トメ ント を 
実行 し て いる 間 (c 変 換 が 行なわ れる 場合 は , エラ ー 訂 正 手順 の 中 で , 
2 つ 以 上 の デー タ 項 目 を 含む スト リン グ を 割り 当て て は な ら な い 。 
と の スト リン グ の 中 に プラ ンク ま を は コン マ が ある と , さら 変換 
ェ ラ ー が 起こ る 。 


POINTER( x」, x。) 記憶 域 制 御 

省 略 形 : PTR(xi」, x。) 

POINTER は , 与え られ た オフ セッ ト 値 x」 と 与え られ た 記憶 

域 x。 と か ら 得 られ た ポイ ンタ ーー 値 を 返す 。 x」 が ナル の 場合 は , 

ナル 値 が 返さ れる 。 

xi 。 オフ セッ ト 式 。 と の 式 は 基底 付 変数 の ある 世代 を 識別 する も 
の で な けれ ば な を ら な い 。 ただし, と の 基底 付 変数 は 必ず し ゃ 
x。 の 中 に を く て も よい 。 と の 基底 付 変数 が x。 の 中 CC な い 
場合 は , その 世代 が x 。 の 世代 等 し く て を な けれ ば を ら な い 。 

娘 ぅ エリ ア 変 数 。 

異な る 記憶 域 C ある 基底 付 変数 の 世代 が 等 し いと いう と と は , 一 

番 新 し い 世 代 の 割 振り ま で, 双方 の 変数 が 同じ 回 数 だ け 割 り 振 ら 

れ た り , ある い は 解放 され た り し た と と を 意味 す る 。 


POLY(x」 , 文 2 ) 


POLY は , 与え られ た 2 つの 1 次 元 配列 x」 お よび x。 か ら 作 ら 


PRECISION( x」, x。 〔, xs 〕) 算 


配列 取扱い PROD(x) 


れ た 多項式 の 値 を 表わす 肖 動 小数 点数 値 を 返す 。 


xi 。 a(m: n ) と し て 定義 され て いる 配列 。 と と で (m:n) 
は 下限 と 上 限 を 表わす 。 


x。 x(p: q ) と し て 定義 され て いる 配列 。 と と で (p:q) 
は 下限 と 上限 を 表わす 。 


一 方 の 配列 また は 双方 の 配列 の 要素 が 浮動 小数 点数 で を い 場 合 C は , 
と れ ら の 要素 は 浮動 小数 点数 c 変 換 さ れる 。 


返さ れる 値 は 次 の ょ う K 定 義 き れる 。 
nー-m 征 池 1 
a (m) + る ,。 (a(m+))\ る し x (pi ) ) 
] 1 三 


(q-p) く (nmーmー1 ) を な ら ば , (pi)q の と き 
x(p 二 ij)=x(q)。 


mーn な ら ぱ ば , 結果 は ぁ (m)。 
x。 が 要素 式 の 場合 , x 。 は 1 つの 要素 か ら を る 配列 , す を なわ, 


x (1) で ある と み を され る 。 と の と き , 結果 は 次 の ょ 2 定義 さ 
れる 。 


- m 
ティ a(m 二 j)* ネ x(1)*※*] 


x」 は , i SUB で 定義 され た も の で あっ て は な ら な い 。 


世 : 


省 略 形 : PREC( xi , xs 上 芝 : 測 


PRECISION は , 与え られ た 値 x を Xs と Xs で 指定 され 
て いる 精度 の 値 と し て 返す 。 


xi 精度 を 変更 すべ き 値 。 

xs と の 操作 を 行 を っ て いる 間 確 保 す べき 桁 数 を 指定 する た め の 
無 符号 の 1 0 進 整 数 定数 。 x 。 が 当 コ ン バ パイ ラー の も と で の 
許容 限度 を 越 を て いて は な ら な い 。 

xs 結果 の スケ ー ル 因数 を 指定 する た め の 1 0 進 整数 定数 ( 符号 
は つけ て も つけ を く て も よい ) 。 結果 が 固定 小数 点数 の 場合 , 
xs。 を 与え を を な けれ ば な ら な い 。 結果 が 浮動 小数 点数 の 場合 
xs を 与え を て は な を ならない 。 

配列 取扱 い 


PROD は , 与え られ た 配列 x の 中 の すべ て の 要素 の 積 を 返す 。 
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X 整数 また は 浮動 小数 点数 の 要素 か ら を る 配列 。 


x の 要素 が 整数 で を い 固 定 小数 点数 の 場合 は , と れ ら の 要素 は 浮 
動 小数 点数 ic 変換 され る 。 


x の 要素 が スト リン グ の 場合 , これ ら の 要素 は 整数 変換 され る 。 
結果 が 固定 小数 点 整 数 の 場合 , 結果 の 精度 は (N , 0 ) で ある 。 こと 


と で , N は 許容 され る 最大 の 桁 数 で ある 。 x は iSUB で 定義 され 
た も の で あっ て は な ら な い 。 


REAL(x) 算 術 


REAL。 は , 与え られ た 複素 数 値 x の 実数 部 を 返す 。 x が 実数 の 場 
合 , x は 複素 数 < 変換 され る 。 


REAL 擬 似 変数 


と の 擬似 変数 は , 与え られ た 複素 変数 x の 実数 部 実数 値 ま た は 複 
素数 値 の 実数 部 を 割り 当て る 。 x は 実数 で あっ て は な ら な い 。 


REPPPBAT( xi」, x。 ) スト リン グ 取 扱い 
REPEAT は , x。 で 指定 され て いる 回 数 だ け ス トリ ング x」 を 
連結 し た スト リン グ を スト リン グ * ェ ュ 低 返 す 。 したがって, 結果 と 
し て 返さ れる スト リン グ は , ( xi 圭 1 ) 個 の スト リン グ x」 か ら 
構成 され た も の に な る 。 

xi 繰 雄 し 用 いら れる スト リン グ 。 

xz 繰返し の 回 数 を 表わす 整数 変換 する と と の で きる 式 。 


文 ? が ゼロ また は 負 の 場合 , スト リン グ 」 が 返さ れる 。 


xs が 配列 の 場合 。, x」 は x。 と 同じ 限界 を も つ 配 列 で を けれ ば な 
ら な い 。 


xi が 算術 デー タ の 場合 , x」 は スト リン グ K 変 換 さ れる 。 x」 が 
2 進数 の と き は , xi は ピッ ト ・ ス トリ ング に 変換 され , x」 が 
1 0 進数 の と き は , x」 は 廊 字 スト リン グ K 変 換 さ れる 。 


ROUND( x」, xz ) 算 術 


ROUND は , 与え られ た 値 x」i を xz で 指定 され て いる 桁 で まる 
め た 値 を 返す 。 
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文 1 まる め を 行う 値 。 

x。 まる め を 行なう べき 桁 を 指定 する た め の 1 0 進 整数 定数 ( 符 
号 を つけ て も つけ を く て も と よい ) 。 x。 が 正 の 場合 , 小数 点 
か ら 右 KK x。 番目 の 桁 が まる め ら れる 。 x。 が 負 の 場合 , 小 
数 点 か ら 左 C ( x。 二 1 ) 番 目 の 格 が まる め ら れる 。 


xi が 和洋 動 小 数 点数 の 場合 , x。 は 無視 され , 小数 部 の 右端 の ビッ 
ト が 1 に セッ ト さ れる 。 


結果 が 固定 小数 点数 の 場合 の 精度 は , 次 の 式 で 与え られ る 。 
(MAX( 1, MIN(p-q 二 1 二 x。 , N) ), x。 ) 


と と で , (p , q ) は xi」 の 精度 で あり , N は 許容 され る 最大 の 桁 
数 で ある 。 


負 の 値 を まる め る 場合 は , まず その 絶対 値 を ま る め と の 後 符号 を 
取り 替え る と いう 9 点 KK 注意 され た い 。 


SIGN(x) 算 術 
SIGN は , 与え られ た 値 x が 正 , ゼロ , また は 負 の いずれ で ある 


か を 示す 省略 時 の 精度 の 固定 小数 点 2 進 整 数 を 返す 。 返 され る 値 を 
以下 示す 。 


x の 値 返さ れる 値 
0D 十 1 
x 三 0D 9 
※: ー 1 


x は 実数 で を な けれ ば を ならない 。 
SIN(x) 数 学 


S IN は , 与え られ た 値 x の sin の 値 ( sin x ) を 毒 わす 浮動 
小数 点数 値 を 返す 。 


X ラジ アン 単位 の 値 を も つ 式 。 
x が 複素 数 の 場合 , 結果 は 次 の 式 で 与え を られ る 。 
sin(a)*cosh(b) 十 i*cos(a)*sinh(b) 


と と で , a 十 ji*※b デ xxwW で ある 。 


SIND(x) 数 学 


S IND は , 与え られ 友 値 x の sin の 値 ( sin x) を 表わす 浮動 
小数 点数 値 を 返す 。 


x 度 単 位 の 値 を も つ 式 。x は 実数 で を な けれ ば な ら な を ない 。 


SINH(x) 数 学 


S 1] NH は , 与え られ た 値 x の sinh の 値 ( sinh x) を 表わす 笠 
動 小数 点数 値 を 返す 。 x が 複素 数 で ある 場合 , 結果 は 次 の 式 で 与 を 
られ る 。 


sinh(a)*cos(b) 十 icosh(a)*sin(b) 


と と で , a キ ii ネネ b テ xxo 


SQRT(x) 数 テ 


SQRT は , x の 平方 根 を 表わす 肖 動 小数 点数 値 を 返す 。 x が 実数 
で ある 場合 )x は ゼロ より 小さ いも る の で あっ て は ならない 。 結果 は 
x の 正 の 平方 根 で ある 。 x が 複素 数 で ある 場合 , と の 関数 は 複数 個 
の 値 を も つの で , その 主 値 だ けが 返さ れる 。 主 値 は 次 の ょ うな 形 を 
と る 。 


(a 二 ji*b) 


と と で , a0, また は , a 三 0 か つ b グー 0 で ある 。 


STATUS(x) 
STATUS は , 与え られ 事象 x の 状況 値 を 表わす 省略 時 の 精度 


の 固定 小数 点 2 進 整 数 を 返す 。 事象 が 正常 で ある 場合 に は ゼロ が 返 
され , 異常 で ある 場合 C は ゼロ 以外 の 値 が 返さ れ る 。 


STATUS 擬 似 変数 

この 擬似 変数 は , 与え られ た 事象 x の 状況 変数 を リセット する 。 
この 擬似 変数 へ の 割当 て が 行なわ れ て いる 間 は 如何 な る 割込み も 起 
こと ら な い 。 


STRING(x) 


STRING は , ある スト リン グ ・ デ ー タ 集合 体 の 全 要 素 を 連結 し 
て 得 られ た 1 つの 要素 スト リン グ を 返す 。 


3 要素 が . すべ て , 区 字 ス トリ ング と 数 字 デ ー タ クタ, また は , 


非同期 入出 力 


スト リン グ 取 扱い 


文字 スト リン グ か 数 字 デ ー タ , また は , ビッ ト ・ ス トリ ン 
グ , で ある 配列 式 を いし 構造 式 。 


x は , 演算 式 あ る い は 関数 参照 で も あっ て は を ら な を い 。 


x が ALIGNED 属 性 の 要素 の 性 質 上 バディ ング が 行 を われ て いる 構 
造 で ある 場合 ,、 こ の パ デ ィ ン グ は 結果 の 中 (C 含 まれ な い 。 


スト リン グ ・ デ ー タ 集合 体 の 中 の いずれ か の スト リン グ が 長 さ の 変 
わる スト リン グ で ある 場合 , 2 バイト の 長 さ 接頭 語 を 除く 現在 の 長 
さだ けが 連結 され る 。 x は, i SUB で 定義 S さ れ た も の で あっ て は 
な ら な い 。 


x が 要素 変数 で ある 場合 C も , スト リン グ ・ デ ー タ 集合 体 に 関し て 
記述 し た 規則 が 適用 され る 。 た だ し , と の 場合 連結 は 行なわ れ を い 。 


STR 1I NG 擬 似 変数 


と の 擬似 変数 は , 与え られ た 集合 体 変 数 xc, スト リン グ を 1 つ ず 
つっ 割り 当て る 。 と の 割り 当て は , 集合 体 の 要素 すべ て が 満た され る 
まで , ある い は 割り 当て られ る スト リン グ が を く を な る まで , 続け ら 
れる 。 後者 の 場合 , 集合 体 変数 の 中 の 未だ 割当 て の 行なわ れ て いな 
い ス トリ ング に ブラ ンク が 満た され る か , ある い は , 長 さ の 変わ る 
スト リン グ に つい て は こと これら 長 さ ぞ ロ が 与え られ る 。 


GET ス テー トメ ント の デー タ 指 定 の 中 や REBAD ス テー トメ ン 
ト の INTO ま た は KEYTO オ プシ ョ ン の 中 で STRTING 擬似 変 
数 を 使用 し て は な ら な い 。 


長 さ の 変わ る スト リン グ は その 最大 の 長 さ まで 満た され る 。 
SUBSTR( x, , xz 〔, xs ) スト リン グ 取 扱い 


SUBSTR は , 与え られ た スト リン グ x」 の ある サブ スト リン グ 
を 返す 。 


xi 当該 サ プ グスト リン グ が 抽出 され る スト リン グ 。 


x2 xi (て お ける 当該 サ プ ス トリ ング の 開始 位置 を 示す た め の 整 
数 変換 する と と の で きる 式 。 


xs Xi の 中 の 当該 サ プ ス トリ ング の 長 さ を 指定 する た め の 整 数 
iC 変換 する こと の で きる 式 。 xs。 が ゼロ の 場合 , ナル ・ ス ト 
リン グ が 返さ れる 。 xs を 省略 し た 場合 , 返さ れる サブ スト 
リン グ は xi の 位置 x。 か ら 始 っ て 終り 至る 部 分 で ある 。 


xi が スト リン グ で な い 場 合 , x」 が 2 進数 で あれ ば , xi は ビッ 
ト ・ ス トリ ング KK 変換 され , xi が 1 0 進数 を ら ば , xi は 文字 ス 
トリ ング KK 変換 され る 。 
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SUM(x) 


当該 サ プ ス トリ ング が x」 の 中 存在 し 得 た いよ うな xz。 お よび 


xs の 値 が 指定 され て いる 場合 と は , STRINGRANGE 条件 が 解 
禁 状態 CK あ れ ば と の 条件 が 引き 起 さ れる 。 STRINGRANGE 条件 
が 解禁 条件 に な けれ ば , と の 場合 の 結果 は どう を な る か わか ら な い 。 


SUBSTR 擬 似 変数 
と の 擬似 変数 は , 与え を られ た スト リン グ x の サブ スト リン グ K, あ 


る スト リン グ を 割り 当て る 。 と の スト リン グ の 他 の 部 分 は 何 の 変更 
も る 受け を い 。 


配列 取扱 い 


SUM は , 与え を られ た 配列 x の 中 の すべ て の 要素 の 和 を 返す 。 

X 算術 要素 か ら な る 配列 。 

x の 要素 が 固定 小数 点数 の 場合 , 結果 の 精度 は ( N, q ) で ある 。 
と と で , N は 許容 され る 最大 の 桁 数 で あり , q は x の スケ ー ル 因数 
で ある 。 x の 要素 が スト リン グ の 場合 , これ ら の 要素 は 整数 tc 変換 
され る 。x は iSUB で 定義 され た も の で あっ て は な ら な い 。 


TAN(x ) 数 学 


TA N は , 与え られ た 値 x の tan の 値 (tan x) を 表わす 潤 動 小 
数 点数 値 を 返す 。 


X ラジ アン 単位 の 値 を も る つ 式 。 


x が 複素 数 の 場合 , 結果 は 次 の ょ う K 定 義 さ れる 。 


REAI, (TAN(x ) ) ニ SIN( 2*a) ン 
(COS(2*a )+COSH( 2*b) ) 


IMAG (TAN(x ) ) 三 SINH(2*b) 
(COS(2*a) 十 COSH(2*b) ) 


と と で , a 十 i*※b 三 x。 


TAND(rx) 数 学 


TAND は , 与え られ た 値 x の tan の 値 ( tan x) を 表わす 浮動 
小数 点数 値 を 返す 。 


X 度 単 位 の 値 を も つ 式 。 x は 実数 で を な けれ ば な ら な い 。 
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TANH(x) 数 学 


TANH は , 与え られ た 値 x の tanh の 舘 ( tanh x) を 表わす 肖 
動 小数 点数 値 を 返す 。 


X ラ ジア ン 単 位 の 値 を も つ 式 。 
x が 複素 数 の 場合 , 結果 は 次 の ょ ら 定 義 さ れる 。 
ーi ネ TAN( i* ネ x ) 


TIME 
TIME は , hhmmssttt と いう 形 の 長 さ 9 の 婦 字 スト リン グ 
を 返す 。 こ と と で , 


hh 現時 点 の 時 間 
mm の 2 
S S 秒 
ttt ミリ セカ ンド 


計時 機構 が 使用 可能 で な い 場 合 , TIME は (9)'0' と 言 2 値 を 
返す 。 

TRANSLATE( xi, x。 (し , xs ] ) スト リン グ 取 扱い 
TRANSLATE は 与え を られ た スト リン グ x」 と 同じ 長 さ を も も , 
x」 の 一 部 また は すべ て の 文字 が 他 の 女 字 と 賀 き 換 えら れ て いる ス 
トリ ング を 返す 。 xi の 中 の 文字 は , スト リン グ x。 お よび x』 が 
与え る 翻訳 テー ブル KK 従っ て 変更 され る 。 


TRANSLATE は , x」 の 中 の 個々 の 女 字 を 次 の ょ うら K 処 理 す る 。 


xi の 中 の ある 文字 が x 』。 の 中 C あ る 場合 に は , xi の 中 の と の 
文字 対応 する x 。 の 文字 が 結果 と し て 複写 され る 。 これ 以外 の 場 
合 に は , x」 の 中 の 文字 が 結果 と し て 直接 複写 され る 。 


xi 翻訳 の も と (C な る 文字 スト リン グ 。 


xs 文字 の 翻訳 値 (翻訳 され た 後 の 値 ) を 含ん で いる 廊 字 スト リ 
ング 。 


xs 翻訳 すべ き 文 字 を 含ん で いる 文字 スト リン グ 。 xs。 を 省略 し 
た 場合 , x。 は 2 56 文 字 か ら な る スト リン グ で ある と みな 
され る 。 と の スト リン グ に は すべ て の 廊 字 ( 1 6 進 法 で 表 わ 
す と 00 か ら FF ) が 虹 順に 並ん で いる 。 


スト リン グ xz。 と スト リン グ x。 の 長 さ は , 同じ で を けれ ば な を なら な 
い 。 両者 の 長 さ が 異 な る 場合 , x。 の 長 さ を xs。 の 長 さ と 等 し くす 
る た め (C, x。 の 右側 CC ブラ ンク が 補充 され る か , また は x。 の 右 
端 が 切り 捨て られ る 。 


文字 以外 の 引数 は すべ て 廊 字 変換 さ れる 。 


TRUNC(x) 


TRUNC は , 与え られ た 値 x 対し て 切捨て を 行なっ た 人 後 の 整 数 
を 返す 。 x が 正 ま た は ゼロ で ある 場合 , 結果 は x 以 下 の 最大 の 整数 
で ある 。 x が 負 の 場合 , 結果 は x 以 上 の 最小 の 整数 で ある 。 x は 実 
数 で を な けれ ば な ら な い 。 


x が 精度 (p ,q ) の 固定 小数 点数 で ある と する と , 結果 の 精度 
は 次 の 式 で 与え られ る 。 


(MIN(N,MAX(p-q+1, 1) ) , 0 ) 


と と で , N は 許容 され る 最大 の 桁 数 で ある 。 


UNSPEC(x) 


UNSPEC は , 与え られ た 値 x の 内 部 コー ド 形 式 で ある ビッ ト ・ 
スト リン グ を 返す 。 


X 意 の デー タ ・ タ イブ の 式 。 
返さ れる ビ ピット ・ ス トリ ング の 長 さ は x の 属性 に よっ て 決ま る 。 


x が 複素 数 の 場合 , 返さ れる スト リン グ の 長 さ は 下 の 表示 し た 
値 の 2 倍 で ある 。 


ピッ トッ スズ トリ シグ 
* の 


16 FIXPD BINARY (p,q) た だ し , p ぐ 16 


FIXED BINARY (p, q), た だ し p ジ 15 
FLOAT BINARY (p), た だ し p2 グ 22 
FLOAT DECIMAL(p), た だ し p< く / 
POINTER 
OFFSET 
FILE 定数 また は 変数 


FLOAT BINARY (p), た だ し 21 ぐ p く 54 
FLOAT DECIMAL(p) , た だ し 6 ぐ p く 17 
LABEL 定数 また は 変数 
ENTRY 定数 また は 変数 


配列 取扱 い 


スト リン グ 取 扱い 


ビッ ト ・ ス トリ ング ' 
に mo 
下請 陸 
8 ネネ mn 
PICTURE 
( 文字 スト リン グ の 長 さ は n ) 


と と で , 組込み 関数 の 場合 n は 現在 の 長き で あ 
| 8* (nm+2 ) |CHARACTER (nm) VARYING 
AREA 


り , 擬似 変数 の 場合 n は 最大 の 長 さ で ある 。 


CHARACTER (n) 
8*FLOOR(n) IFIXED DECIMATL (p,q) 
と と で , n 三 (pn 士 2) ン 2 


UNSPEC 擬 似 変数 


この 疑似 変数 は , 与え られ た 変数 xi て ピッ ト ・ ス トリ ング を 直接 割 
り 当 て る 。 つ まり, 変数 の デー タ ・ タ イズ ブ の 変換 は 試み られ を いわ 
け で ある 。 ビ ピット ・ ス トリ ング の 長 さ を 変数 の 長 さ と 等 し くす る た 
め に と , 必要 ic 応 じ し て , ビッ ト ・ ス トリ ング の 右側 に ゼロ が 補充 され 
る 。 


x が 長 さ の 変わ る スト リン グ の 場合 , その 2 バイト の 接頭 語 も ビ 
ッ ト ・ ス トリ ング が 割り 当て られ る フィ ー ル ド の 中 入る 。 


VERIFY( xi」, xz ) スト リン グ 取 扱い 
VERIFY は , 与え られ た スト リン グ xi」 の 中 で , 与え られ た ス 
トリ ング x。 に な い 文 字 ま た は ビッ ト が 出 て 来 た 最初 の 位置 を 志す 
省略 時 の 精度 の 固定 小数 点 2 進 整数 を 返す 。 x」 の 中 MC ある 交 字 ま 
た は ピッ ト が すべ て xs。 の 中 に て も ある 場合 C は , ゼロ と いう 値 が 返 
され る 。 引数 が 2 つと る 算術 デー タ の 形 C を な っ て いる 場合 , これら 
の 引数 は スト リン グ K 変 換 さ れる 。 一 方 の 引数 が ビッ ト ・ ス トリ ン 
グ で 他方 の 引数 が 文字 ネト リン グ の 場合 。 ビッ ト ・ ス トリ ング が 廊 
字 ス トリ ング KK 変換 され る 。 


xi 。 xs。 の 中 て な い 文 字 を 求め て 走査 され る スト リン グ 。 
x。 任意 の 順序 に 並ん だ 1 組 の 文字 か ら な る 検査 スト リン グ 。 
いずれ か の 引数 が 文字 また は 1 0 進数 で ある 場合 , と の 引数 は 文字 


スト リン グ に 変換 され る 。 こと れ 以外 に は , 引数 が ビッ ト ・ ス トリ ン 
グ と 2 進数 の 場合 , また は 双方 の 引数 が 2 進数 の 場合 , 変換 が 行 な 


われ て と れ ら の 引数 は ビッ ト ・ ス トリ ング (て を る 。 
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H 節 : ON 条件 


ON 条件 は , PL ンプ I の ON ステ ー ト メン ト で 指定 する と と の で き 
る 例外 条件 で ちる 。 あ る 条件 が 解禁 状態 C ある と き , その 条件 が 引 
き 起 され る と 割込み が 起 と る 。 割込み が 起こ と る と , その 条件 対処 
すべ く 現 時 点 に な いて 指定 され て いる 処置 が か と られ る 。 その 条件 を 
対象 と する ON ステ ー ト メン ト が 効力 を も っ て いな を い 場 合 IC は , 現 
時 点 で 指定 され て いる 処置 は その 条件 を 対象 と する シス テッ ュ 様 準 処 
塁 で ある 。 そ の 条件 を 対象 と する ON ステ ー ト メン ト が 効力 を も っ 
て いる 場合 , 現時 点 で 指定 され て いる 処置 は , SYSTEM (その 
条件 を 対象 と する シス テム の 標準 処置 が と られ る ) また は ある オン 
・ ユ ニッ ト ( プロ グラ マー が その 条件 iC 対処 する た め の 独 自 の 処 思 
を 指定 し た も の ) で ある 。 


ある 条件 が 解禁 状態 KC な い 場 合 ( つま り , その 条件 が 禁止 状態 
ある 場合 ) コン パイ ラー は , 実行 中 に その 条件 を テス ト す る た 
め の コ ー ド を 作り 出さ な い 。 と の 条件 が 引き 起 さ れ た 場合 エラ ー が 
発生 する で あろ う が , と の 条件 (CK ょ っ て シス テム 割込み が 引き 起 と 
され な い 限 り 実 行 が 停止 され る と と は な い 。 


例外 条件 の 中 CC は, 条件 接頭 語 に よっ て 明示 的 < 禁止 状態 c 連 か 
れい 限り つね KC 解禁 状態 C あ る 条件 が ある 。 ま た , 条件 接頭 語 ic 
ょ っ て 明示 的 解禁 状態 置か れ な い 限り つね 禁止 状態 C あ る 条 
件 が ある 。 さら, つね (C 解禁 状態 に あり , 禁止 状態 置く と と の 
で き な い 条件 も ある 。 


条件 接頭 語 C ょ っ て 明示 的 iC 禁止 状態 置か れ を い 限 りつ ね 解 
禁 状 態 C あ る 条件 を 以下 に 示す 。 
CONVERSION 
FIXEDOVERFLOW 
OVERFLOW 
UNDERFLOW 
ZERODIVIDE 
条件 名 の 前 (C NO と 記入 し た 条件 接頭 語 を 用 いる と と (C よ っ て , 上 
掲げ た 条件 の 名 々 を 禁止 状態 C 加 く こ と が で きる (条件 接頭 語 を 作 


る 際 条 件 名 と NO の 間 (C プ ラン ク を 婁 いて は を ら な い ) 。 し た が っ て , 移 
の 各々 の 条件 接頭 語 に ょ っ て , 対応 する 条件 が 禁止 状態 て 賀 か れ る 。 


NOCONVERSION 


NOFIXEDOVERFLOW 
NOOVERFLOW 
NOUNDERFLOW 


NOZERODI VIDE 


と の + うら な 条 件 接頭 語 を 指定 する と と (と よっ て , その 接頭 義 の 有 
効 範囲 の 間 と これ と 対応 する 条件 が 禁止 状態 置か れる 。 と の 有効 還 
開 の 外 で は と の 条件 は 依然 と し て 解禁 状態 た ある 。 ( 条件 接頭 語 の 
有効 範囲 《K つ いて は , 「 第 1 4 章 : 例外 条件 の 取扱 いと ブロ グラ 
ム ・ チ ェ ッ クア プッ ウト 」 を 参照 され た い 。 )* 


上 掲げ た 条件 と は 逆 (Cc, 次 C 示 す の は 条件 接頭 語 C よっ て 解禁 
状態 iC 置か れ を い 限り つね 禁止 状態 C ある 条件 で ある 。 


SIZE 
SUBSCRIPTRANGE 
STRINGRANGE 
STRINGSIZE 


CHECK 


と れ ら の 条件 名 が 条件 接頭 語 の 中 C 現 われ る と , その 接頭 語 の 有 
効 範囲 の 間 , その 条件 が 解禁 状態 置か れる 。 しかし, と の 有効 範 
囲 の 外 で は と の 条件 は 依然 と し て 禁止 状態 に ある 。 ま た, NOSIZP, 
NOSUBSCRIPTRANGE,NOSTRINGRANGE , 
NOSTRINGS1IZE, ま た は NOCHCK と 指定 し て いる 条件 接頭 
語 が ある と , その 接頭 語 の 有効 範囲 の 問 , 対応 する 条件 が 禁止 状態 
思 か れる 。 


上 掲 以 外 の 条件 は すべ て つね 解禁 状態 な C あ り プ ログ ラム を 実行 
し て いる 間 ず っ と と の 状態 KC と ど ま る 。 と の よら な 条件 を 以下 C 示 す 。 

AREA 

CONDITION 

ENDEILE 

ENDPAGE 

ERROR 

FINISH 

KEY 

NAME 
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RECORD 

TRANSMIT 

UNDEFINEDFILE 
条件 コー ド ( ON コー ド ) 
プロ グラ マー は , 任意 の オン ・ ユ ニッ ト の 中 で ONCODE 組込み 関 
数 を 使っ て , 当該 オン ・ ユ ニッ ト に 入る 原因 と を っ た エラ ー な いし 
条件 の 性 格 を 調べ る と と が で きる 。 当 コン バイ ラー(C よ っ て チェ ッ 


ク さ れる 条件 な よび ェ ラ ーK 対 応 す る コー ド を 以下 に 示す 。 


コー ド  。 エラ ー ま た は 例外 条件 


0 オン ・ ユ ニッ ト の 外部 で ONCODE 関数 が 使用 され て 
いる 。 


ERROR 条 件 コー ド 


3 実行 の 前 た すでに C エ ラー が ある と 診断 され て いた ステ ー 
トメ ント を 実行 し よう と し た 。 


FINISH 条 件 コー ド 
4 SIGNAL FINISH, また は STOP ス テー トメ ント 
が 実行 され た 。 
また は , 
主 プ アロ シー ジャ ー が 正規 に 終了 し た 。 
ERROR 条 件 コー ド 


2? SITGNAL ERROR ス テー トメ ント が 実行 され た 。 


生 : 上 述 以外 の ERROR 条件 コー ド C つ いて は , コー ド 番 号 
10 0 0 の 後 の 所 を 参照 の と と 。 


NAME 条 件 コー ド 
10 SIGNAL NAME ス テー トメ ント が 実行 され た 。 
また は , 
GET DATA 入 力 流れ の 中 認定 で き ない 議 別 名 が ある 。 
RECORD 条 件 コー ド 
20 SIGNAL RECORD ス テー トメ ント が 実行 され た 。 
2 1 レコ ー ド ・ サ イズ の 値 よ り 小 さい レ ュ コー ド 変 数 が ある 。 


22 レコ ー ド ・ サ イズ の 値 よ り 大 きい レ ュ ー ド 変数 が ある 。 


23 長 さ が ゼロ の レコ ー ド を 書き 出 そ う と し た り , ある い は 
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探 そ うと する 試み が な を され た か , ある い は , 小さ すぎ て 
内 蔵 さ れ た キー を 収容 で き を な い レ コー ド が ある ( キー 大 
の VSAM の 場合 ) 。 


24 REGIONAL デー タ ・ セ ッ ト か ら 長 さ が ゼ ロ の レ ュ ー 
ド が 読み 取ら れ た 。 


TRANSMIT 条 件 コー ド 


40 STGNAL TRANSMI T ス テー トメ ント が 実行 され た 。 


4 1 出力 デー タ ・ セ モット の 中 困 正 不可 能 転 送 ェ ラー が あ 
る o 


42 入力 デー タ ・ セ ッ ト の 中 訂正 不可 能 な 転送 ェ ラ ー が ある 。 


43 キー 順 の VSAM デー タ ・ セ ッ ト の 索引 セッ ト へ の 出力 
て 訂正 不可 能 な 転送 ェ ラ ー が ある 。 


44 キー 順 の VSAM デー タ ・ セ ッ ト の 索引 セッ ト か ら の 入 
力 訂 正 不可 能 な 転送 テラ ー が ある 。 


45 キー 順 の VSAM デー タ ・ セ ッ ト の 順序 モッ ト へ の 出力 
て 訂正 不可 能 な 転送 ラ ー が ある 。 


46 キー 順 の VSAM デー タ ・ セ モッ ト の 用 序 モッ ト か ら の 入 
力 刀 町 正 不可 能 を 転送 ラー が ある 。 


K E Y 条 件 コー ド 


50 SIGNAL KEY ステ ー ト メン ト が 実行 され た 。 


5 1 指定 され て いる キー が 見 つか ら な い 。 


52 INDEXED デー タ ・ セ ッ ト ま た は キー 順 の VSAM デ 
ー タ クタ ・ モ セッ ト の 中 に す で K 存 在 し て いる レコ ュー ド の キー 
と 同じ キー を も つ キ ー 付 レコ ー ド を 追加 し よう と し た か , 
また は , REGTIONAL (1) デ ー タ ・ セ ッ ト を 作成 する 際 C, 
すでに レコ ー ド が 収容 され て いる 区 域 jC 書 込 も うと し た 。 


53 INDEXED デ ー タ ・ セ モット, キー 順 の VSAM デー タ ・ セ 
ッ ト , また は REG TONAL デ ー タ ・ セ ッ ト を 有 順次 方 式 で 
作成 し て いる と き C, KEYFRROM オプ ショ ン で 指定 さ 
れ て いる 式 の 値 が , 先 指定 され て いる キー また は 区 域 
番号 の 値 よ り 小 さい 。 


54 区 域 番 号 が 数 字 で を い , を な ど と いう 理由 で , キー 変換 
工 ラ ー が 発生 し た 。 


55 キー の 指定 が ナル ・ ス トリ ング で ある か , (8) '1'B で 
始ま っ て いる , ある い は , INDEXED デー タ ・ セ ッ ト 
また は キー 順 VSAM デー タ ・ セ ッ ト を 対象 と する 順次 方 
式 の REWRTITE(FROM 〕 と お いて 内 蔵 さ れ た キー の 変 
更 が 行 克 われ た 。 


56 当該 デー タ ・ セ ッ ト の 範囲 の 外 に ある キー を 使っ て レコ 
ー ド MC アク セス し よう と し た 。 


57 キー 付 レコード を 追加 する た め の ス ペー ス が を な を い 。 
58 指定 され て いる キー が 当該 デー タ ・ セ ッ ト K 対 し て 定義 


され て いる キー の 午 囲 の 外 iC と ある ( キー 順 VS AM の み )。 
ENDFILE 条 件 コー ド 


70 SIGNAL ENDF ILE ス テー トメ ント が 実行 され た 。 
また は , 
ファ イル の 区 切り を 越え て 読み 取 ろ うと し た 。 


UNDEFINEDEF ILE 条 件 コー ド 


80 SIGNAL UNDEFINPDFILE ステ ー ト メン ト が 実 
行 さ れ た 。 


8 1 ファ イル を 開く 時 点 に お ない て, DECLARE ステ ー ト メ 
ント で 指定 され て いる 属性 と , 明示 的 ま た は 暗示 的 な 
OPEN ステ ー ト メン ト で 指定 され て いる 属性 と の 間 に K, 
ファ イル の 属性 の 矛盾 が 存在 する 。 


82 INPUT ノ UPDATE を 行なう た め の デ ー タ ・ セ モット と 
し て , 空白 の VSAM デ ー タ ・ も セット が 開か れ た 。 


83 環境 の 指定 ( ENV, DD カー ド , DSCB な ど ) が 不 完全 
で ある 。 


84 ASSGN , DLBL, また は EXTENT ステ ー ト メン ト 
(C エ ラー が ある ( VSAM の み ) 。 


85 ある REC IONAL デー タ ・ モ セット と 結び 付け られ て い 
る 0UTPUT ファ イル の 初期 設定 を 行なっ て いる 間 K, 
入出 力 ェ ラー が 発生 し た 。 
また は , 

INDEXED デー タ ・ セ モッ ト を 作成 し て いる 場合 に マ 
スタ ー 索 引用 また は シリ ンダ ー 索 引用 と し て 与え を られ て 
いる スペ ー ス が 充分 で を い 。 


86 行 の 長 さ が 当 コ ン バ イ ラー《K お いて 定義 され て いる 最大 
値 よ り 長 い 。 
また は け , 
ENVIRONMENT オブ ショ ン で 有効 で な い 値 が 指定 さ 
れ て いる 。 


87 ENVI RONMENT の オプション K 矛 盾 が ある 。 た と えば , 
レコ ー ド 形式 と ブロ ッ ク ・ サ イズ が 両立 し 得 た い 。 
また は , 

ュ ン パイ ラー が , ファ イル 宣言 の 中 に 困 正 不可 能 な エラ 
ー を 見 つけ た 。 


89 合言葉 が 有効 で な いか , また は 合言葉 が 抜け て いる 
( VSAM の み )。 
ENDPAGE 条 件 コー ド 
?0 SIGNAL ENDPAGE ステ ー ト メン ト が 実行 され た 。 
また は , 


行 番号 が 現在 の ペー ジ ・ サ イズ KK 等 し い の K 新 し い 行 を 
開始 し よう と し た 。 


92 VSAM デー タ ・ セ ッ ト (C て アク セス する CK あたっ て その 
デー タ ・ モ セット を 開 〈 際 , オペ レー ティ ング ・ シ ステ ム 
が エラ ー を 見 つけ た 。 


93 VS AM デー タ ・ セ ッ ト を 開く 際 に , 認識 不可 能 な エラ 
ー を VSAM が 見 つけ た 。 


STRINGSIZE 条 件 コー ド 


150 SIGNAL STRINGSIZE ステ ー ト メン ト が 実行 さ 
れ た 。 


また た は, 
ある スト リン ク グ が それ より 短い スト リン グ 割 当て られ た 。 


OVEREFLOW 条 件 コー ド 


300 SIGNAL OVERLOW ステ ー ト メン ト が 実行 され た 。 
また は 
浮動 小数 点数 の 大 き さ が 許容 最大 値 を 越 を て いる 


FIXEDOVERFLOW 条 件 コー ド 


310 SIGNAL FIXEDOVERELOW ス テー トメ ント が 実 
行 さ れ た 。 
また は , 


固定 小数 点数 算術 演算 の 結果 の 長 さ が 許容 最大 値 を 越え 
て いる o 


ZERODIV1IDE 条 件 コー ド 


320 SIGNAL ZERODIVIDE ス テー トメ ント が 実行 され た 。 
また は , 
ゼロ で 割 ろ ろう と し た 。 


UNDERFLOW 条 件 コー ド 


330 SIGNAL UNDERFLOW ステ ー ト メン ト が 実行 され た 。 
また は , 
浮動 小数 点数 の 大 き さ が 許容 最小 値 よ り 小さ い 。 


S {I ZE 条 件 コー ド 


340 SIGNAL SIZE ス テー トメ ント が 実行 され た 。 
また は , 
変数 ある い は 一 時 フィ ー ル ド へ の 割当 て に あたっ て , 高 
位 の ゼロ 以外 の 桁 が た 失わ れ た , ある い は , 入出 力 操作 の 
間 (c 有効 数 字 が 失わ れ た 。 


34 1 入出 力 操作 の 問 /, 高位 の ぞ ロ 以外 の 桁 が 失わ れ た 。 


STRINGRANGE 条件 コー ド 


350 SIGNAL STRINGRANGE ス テー トメ ント が 実行 され た 。 
また は , 
SUBSTR 参 照 の 引数 の 長 さ が SUBSTR 組 込み 関数 


の 項 で 説明 し た 規則 KC 合致 し て い を い 。 


AREA 条 件 コー ド 


380 割 振り を 行 を うた め の 記 憶 域 が 充分 に ない エ リア MC, 基 
底 付 変数 を 割り 振る ろう と し た 。 


H 節 : ON 条件 319 


38 1 原 エ リア を 割り 当て る 充分 を ペー ス が 日 標 エ リア な 
いい o 


382 SIGNAL ARPA ス テー トメ ント が 実行 され た 。 
CONDI TION 条 件 コー ド 


500 SIGNAL CONDITION( 条件 ) ス テー トメ ント が 実 
SE だら 


CHECK 条 件 コー ド 


510 STIGNAL CHPECK ステ ー ト メン ト が 実行 され た 。 
また け , 
CHECK 接頭 着 の 有効 範囲 に な いて , 変数 の すべ て ま 
た は 一 部 の 値 が 変化 し と うと し て いる か , ある い は ラベ 
ル ん を な いし 名 前 が 指定 され た ステ ー ト メン ト の 実行 が 始ま 
ろ ら と し て いる 。 


SUBSCRIPTRANGE 条 件 コー ド 


520 SIGNAL SUBSCRIPTRANGE ステ ー ト メン ト が 
実行 され た 。 
また は , 
添字 の 値 が 計算 され た 結果 , 指定 され た 限界 の 外 に ある 
こと が わか っ た 。 


524 1 SUB で 定義 され て いる 変数 の 添字 が , 基底 変数 の 対応 す 
る 次 元 c 割 り 振 られ て いる 限界 の 外 ( と ある こと が わか っ た 。 


CONVERSION 条 件 コー ド 
600 SIGNAL CONVERSION ステ ー ト メン ト が 実行 され た 。 


603 GET STRING ス テー トメ ント の F 形 式 項目 を 処理 し 
て いる 間 に C エ ラー が あっ た 。 


604 GEPT FILE ステ ー ト メン ト の F 形 式 項目 を 処理 し て 
いる 間 エ ラー が あっ た 。 


605 TRANSMTI T 条件 の 後 実 行 さ れる GET FILP ス テ 
ー ト メン ト の PF 形式 項目 を 処理 し て いる 間 C エ ラー が あ 
っ た 。 


606 GET STRING ス テー トメ ント の 形式 項目 を 処理 
し て いる 間 (C エ ラー が あっ た 。 


607 GET FILE ステ ー ト メン ト の BB 形 式 項目 を 処理 し 
て いる 間 に エ ラー が あっ た 。 


608 TRANSMIT 条 件 の 後 実行 され る GET FTILE ス テー ト 
メン ト の E 形 式 項目 を 処理 し て いる 間 に ェ ラー が あっ た 。 


409 GET STRING ス テー トメ ント の B 形 式 項目 を 処理 
し て いる 間 jC エ ラー が あっ た 。 


320 DOS PL プロ 最適 化 コ マンバ イラ ー : 言語 解説 書 第 2 部 


610 


611 


612 


6 13 


614 


615 


617 


618 


619 


620 


62 1 


622 


623 


625 


626 


630 


GET FILE ステ ー ト メン ト の B 形 式 項目 を 処理 し 
て いる 間 に ェ ラー が あっ た 。 


TRANSMTI T 条 件 の 後 実行 され る GET FILE ぇ ュ 
テー トメ ント の B 形 式 項 目 を 処理 し て いる 問 c エ ラー が 
あっ た 。 


文字 スト リン グ か ら 算 術 デ ー タ へ の 変換 の 間 C エ ラー が 
あっ た 。 


GET FILE ま た は PUT FILE ステ ー ト メン ト で 
行なわ れ た 文字 スト リン グ か ら 算 術 デ ー タ へ の 変換 の 間 
て エ ラー が あっ た 。 


TRANSMIT 条 件 の 後 実行 され る GET FILE ま を は 
PUT FILE ステ ー ト メン ト で 行 な た われ た , 文字 スト 
リン グ か ら 人 算術 デー タ へ の 変換 の 間 ( ェ ラー が あっ た 。 


文字 スト リン グ か ら ビ ッ ト ・ ス トリ ング へ の 変換 の 間 (c 
エラ ー が あっ た 。 


GET FILE ま た は PUT FILE ス テー トメ ント で 行 
を われ た 文字 スト リン グ か ら ビ ピット ・ ス トリ ング へ の 変 
換 の 間 (C エ ラー が あっ た 。 


TRANSMTIT 条 件 の 後 実行 され る GET FILE ま た 
は PUT FILE ステ ー ト メン ト で 行なわ れ た 文字 スト 
リン グ か ら ビ ッ ト ・ ス トリ ング へ の 変換 の 間 ( と エラ ー が あっ た 。 


娘 字 スト リン グ か ら ビ ピク チャ ー へ の 変換 の 間 (C エラ ー が 
あっ た 。 


GET FILE ス テー トメ ント で 行なわ れ た 区 字 ス トリ ン 
グ か ら ビ ピクチャー へ の 変換 の 間 (C エ ラー が あっ た 。 


TRANSMIT 条 件 の 後 実 行 さ れる GET FILE ステ ー 
トメ ント で 行なわ れ た 文字 スト リン グ か ら ピ クチ ャ ー へ 
の 変換 の 間 に エ ラー が あっ た 。 


GET STRING ス テー トメ ント の た め の 1 0 進 P 形 式 
項目 C エ ラー が ある 。 


GET _ FILE ステ ー ト メン ト の 1 0 進 P 形 式 入力 に と ェ 
ラー が ある 。 


TRANSMIT 条 件 の 後 実行 され る GET FILE ス テー 
トメ ント の 10 進 P 形 式 人 入力 に エラ ー が ある 。 


GET FILE ステ ー ト メン ト の 文字 P 形 式 人 力 (と エラ 
ー が ある 。 


TRANSMIT 条 件 の 後 実行 され る GET FILE ス テー 
トメ ント の 文字 P 形 式 入力 に ェ ラ ー が ある 。 


LIMSCONV の も と で 使用 可能 を & STREAM 入出 力 変 
換 の 限定 モッ ト ( 含 まれ て いな い 変 換 が , GET 


632 


STRING LTST ま たけ は GET STRING DATA ス 
テー トメ ント で 要求 され て いる ( STREAM 入 出力 変換 
セッ ト で は , 変換 の 種類 が 制限 さん て いる )。 


LIMSCONV の も と で 使用 可能 を STREAM 入出 力 変 
換 の 限定 モット (含ま れ て いな い 変 換 が GET FILE 
LIST また は GET FILE DATA ステ ー ト メン ト で 
要求 され て いる (STREAM 入 出力 変換 セッ ト で は , 変 
換 の 種類 が 制限 され て いる ) 。 


TRANSMI T 条 件 の 後 実行 され る GET FILE LIST 
また は GET FILE DATA ステ ー ト メン ト (LIMSCONV 
の も と で 使用 可能 な STREAM 入 出力 変換 の 限定 モッ ト 
を 使用 し て いる ) で 行 を われ た 変換 の 間 ( に エラ ー が あっ た 。 


ERROR 条件 コー ド 


注 ・: 


以下 記載 され て いる も の 以外 の ERROR 条件 に つい て は , 


条件 コード? を 参照 の と と 。 


1002 


1003 


1004 


1005 


1007 


1008 


1009 


1011 


1014 


1015 


1016 


1018 


GET STRING また は PUT _ STRING で, スト リン 
グ の 長 さ ょ より 長い デー タ が 指定 され て いる 。 


当該 デー タ ・ セ ッ ト i 関 連 し て 先 (C 引 き 起 され て いた 
TRANSMI T 条件 また は KEY 条件 の た め , 出力 が 
停止 され た 。 


印刷 用 ファ イル 以外 の ファ イル に K 対 し て , PAGE , 
LINE, ま を は SKIP ぐ 0 を 使用 し と うと し た 。 


DISPLAY (要素 式 ) REPLY( 廊 字 変数 ) ス テー トメ 
ント の 要素 式 な いし 文字 変数 の 長 さ が ゼロ で ある 。 


REPWR TI TE また は DELETEE ステ ー ト メン ト の 直前 
READ が ある 。 


GET STRING DATA ス テー トメ ント で 指定 され て 
いる スト リン グ の 中 に, 認定 され て いな い 識 別名 が ある 。 


入出 力 ス テー トメ ント の 中 で , 当該 ファ イル の 属性 と 矛 
盾 し て いる 操作 を いし ォ プ ショ ン が 指定 され て いる 。 


デー タ 管 理 プ ログ ラム (て よっ て 入出 力 エ ラー が 検出 され 
を が, その ェ エラー の 原因 ic 関す る 情報 を 与える と と が で 
き な い 。 


未完 了 の 入出 力 操作 の 数 が 当 コ ン パ イラ ー の も と で の 許 
容 限度 を 越え て いる の CC, さら K 他 の 入出 力 操作 を 開始 
だ の ああ も 療 。 


す で ん 使用 され て いる EVENT 変数 を 用 いて 入出 力 操 
作 が 指定 され て い る 。 


暗示 的 に ファ イル を 開 こ うら と し て 失敗 し た た め 
UNDEFINEDFILE 条件 が 引き 起 さ れ , と の 後 。 ォ 
ン ・ ユ ニッ ト か ら 制 御 が 正常 た 形 で 返さ れ て 当該 ファ イ 
ル が 開か れ て い を いと と が わか っ た 。 


デー タ ・ リ スト の 終り また は (編集 指示 転送 に な ける ) 


1022 


1024 


1025 


1028 


1500 


1501 


1504 


1505 


1506 


1507 


1508 


1509 


1510 


1511 


1514 


1515 


形式 リス ト の 終り 達する 前 C, デー タ の 中 IC フ ァイル 
の 終り な いし スト リン グ の 終り が 出 て 来 た 。 


使用 可能 な スペ ー ス が を な い 順 次 方 式 の 出力 デー タ ・ セ ッ 
ト に レコ ー ド を 書き 込 も うと し た 。 


関連 する ファ イル 入出 力 順序 エラ ー が ある 。 


使用 可能 を 仮想 記憶 域 が 不 充 分 で ある た め (C, 入出 力 要 
求 を 完了 する と と が で き な い 。 


複数 だ が リュ ー ム VSAM デー タ ・ セ ッ ト の 取り 付け られ 
て いい ボリ ュー ム 存 在 す る レコ ュー ド が 要求 され て い 
る 。 


計算 エラ ー: SQRT 組込み 関数 の 短 精 度 浮 動 小数 点 
引数 が 負 で ある 。 


計算 エラ ー: SQRT 組込み 関数 の 長 精 度 浮動 小数 点 
引数 が 負 で ある 。 


LOG, LOG2, また は LOG10 組 込み 関数 な な ける 
計算 エラ ー: 短 精 度 浮動 小数 点 引 数 <0 。 


LOG,LOG2 , ま を は LOG10 組込み 関数 C お ける 
計算 エラ ー: 長 精度 浮動 小数 点 引 数 < 0。 


SIN,COS , SIND , また は COSD 組込み 関数 tc 
お ける 計算 エラ ー: 短 精度 浮動 小数 点 引 数 の 絶対 値 が , 
( 2 ネネ *18 )* ネ ァ (SIN お よび COS の 場合 ) また は 

( 2**18 )*180(SIND ぉ お ょ とび COSD の 場合 ) を 
越 を て いる 。 


SIN,COS,SIND, ま を た は COSD 組込み 関数 
ぉ ける 計算 エラ ー: 長 精 度 浮 動 小 数 点 引 数 の 絶対 値 が , 
( 2 ネネ *50 )*z(STIN ぉ お よび COS の 場合 ) また は 
(2**50)*180(SIND ぉ とび COSD の 場合 ) を 
越え て いる 。 


計算 エラ ー: TAN ま た は TAND 組込み 関数 の 短 精 
度 消 動 小数 点 引 数 の 絶対 値 が , それ ぞ れ (2**18 )* ァ 
また は (2**※18)*180 を 越え て いる 。 


計算 エラ ー: TAN ま た は TAND 組込み 関数 の 長 精 
度 肖 動 小数 点 引 数 の 絶対 値 が , それ ぞ れ ( 2**50)* ァ 
また は (2** ネ 50)*180 を 越 を て いる 。 


計算 エラ ー: ATAN ま た は ATAND 組込み 関数 の 
短 精 度 浮 動 小数 点 引 数 が 共 (C ゼロ で ある 。 


計算 エラ ー: ATAN ま た は ATAND 組込み 関数 の 
長 精度 浮動 小数 点 引数 が 共に ゼロ で ある 。 


計算 エラ ー: ATANH 組込み 関数 の 短 精 度 浮 動 小数 
点 引数 の 絶対 値 1 。 


計算 エラー: ATANH 組込み 関数 の 長 精度 浮動 小数 
点 引 数 の 絶対 値 1 。 


H 節 : ON 条件 321 
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322 DOS PL プン エ 最適 化 コ センパイ ラー: 


計算 エラ ー: ASIN ま た は ACOS 組込み 関数 の 短 
精度 浮動 小数 点 引数 の 絶対 債 が 1 を 越え を て いる 。 


計算 エラ ー: ASIN ま た は ACOS 組込み 関数 の 長 
精度 浮動 小数 点 引 数 の 絶対 値 が 1 を 越え て いる 。 


計算 エラ ー: 実数 の 短 精 度 浮動 小数 点数 で ある 底 が ゼ 
ロ で , その 整数 の 指数 が 正 で ない 。 


計算 エラ ー: 実数 の 長 精度 肖 動 小 芝 点 数 で ある 底 が ぞ ゼ 
ロ で , その 整数 の 指数 が 正 で を い 。 


計算 エラ ー: 実数 の 短 精度 浮動 小数 点数 で ある 底 が ぞ ゼ 
ロ で , その 非 整数 の 指数 が 正 で を い 。 


計算 エラ ー: 実数 の 長 精度 浮動 小数 点数 で ある 底 が ゼ 
ロ で , その 非 整 数 の 指数 が F で を い 。 


計算 エラ ー: 複素 数 の 短 精度 浮動 小数 点数 で ある 底 が 
ゼロ で, 固定 小数 点 整 数 で ある 指数 が 正 で を い 。 


計算 エラ ー: 複素 数 の 長 精度 浮動 小数 点数 で ある 底 が 
ゼロ で , 固定 小数 点 整 数 で ある 指数 が 正 で を い 。 


計算 エラ ー: 複素 数 の 短 精 度 浮動 小数 点数 で ある 底 が 
ゼロ で , 固定 小数 点 指数 が 正 で も 実数 で も を い 。 


計算 エラ ー: 複素 数 の 長 精度 浮動 小数 点数 で ある 底 が 
ゼロ で, 非 整 数 の 指数 が 正 で も 実数 で も な い 。 


計算 エラ ー: ATAN ま た は ATANH 組 込み 関数 の 複 
素数 短 精 度 浮動 小数 点 引 数 が , それ ぞ れ 土 1 1 また は 
土 1 で ある 。 


変換 すべ き ス トリ ング (有効 で を い 文字 が あり , と の た 
め C 引 き 起 され た CONVERSTION 条 件 の 結果 と し て 入 
っ を た オン ・ ユ ニッ ト C お いて , ONSOURCE また は 
ONCHAR 擬似 変数 を 使っ て と の 節 字 が 訂正 され て い 
を い 。 


デー タ 集 合体 の 長 さ が シス テム の 許容 限度 ( 2** ネ 24 
バイ ト ) を 越え て いる 。 


構造 の 中 に ある 配列 の ある 要素 を マッ プ す る と と が で き 
を な い 。 


COBOL ま た は FORTRAN で , デー タ 集 合体 を マッ 
プ す る と と が で き を い 。 


COMPLET TION 擬似 変数 の 引数 と し て 指定 され て い 


言語 解説 書 第 2 部 


る 事象 変数 は , ある DISPLAY ステ ー ト メン ト の た め 
に す で 使 用 され て いる も の で ある 。 


3905 理由 の わか ら な を い 入 出力 テラ ー が 発生 し た 。 
3906 す で K 活 用 状態 ある 事 旬 変 数 へ の 割当 て が あっ た 。 


39107 す で & 対 応 づ けら れ て いる 事象 変数 を 対応 づけ ょ うら と し 
だ a 


39 1 1 オン ・ ユ ニッ ト (C お おい て, す で ICWA IT ステ ー ト メン 
ト の 対象 と を っ て いた 入出 力 事象 を 対象 と する WAIT 


ステ ー ト メン ト が 出 て 来 た 。 


4001 CONTROLLED 変 数 が 割り振ら れる 前 (CC, その 変 
数 が 参照 され た 。 


809 1 命令 例外 。 

8092 特権 命令 例外 。 
8093 EXECUTE 例外 。 
8094 記憶 保護 例外 。 
8095 アド レシ ング 例外 。 
8096 指定 例外 。 

8097 デー タ 例 外 。 


9004 連係 編集 プロ グラ ム が , 指定 の デー タ ・ セ ッ ト の 中 K 入 
口 定数 を 見 つけ る と と が で き な い 。 


?200 SORT ノ MERGE プ ログ ラム CC お いて プロ グラ ム ・ チ 
ェ ッ ク が 発生 し た 。 


2201 SORT 出口 c 対 する も の と し て 指定 され て いる バラ メ 
ー タ ー な いし 返さ れる 値 が か, PLISRT の 呼出 し に お 
ける 指定 と 合致 し な い 。 


複数 の 割込み 


複数 の 割込み と は , 2 つ 以 上 の 割込み が 同時 に 発生 する と と で ある 。 
当 コ ン バ パイ ラー で は , 複数 の 割込み は TRANSMIT お よび 
RECORD 両 条件 (Cc 起因 する も の だ け で ある 。 複数 の 割込み が 発 
生 し た 場合 , つ ね Cc, TRANSMIT 起因 する 割込み が 最初 
処理 され る 。 正常 の 制御 の 返還 を 行 な ち オン ・ ユ ニッ ト が 
TRANSMIT KK 対し て 設け られ て いな い 場 合 は , RECORD 


起因 する 割込み は 無視 され る 。 CONVERSTION 
FIXEDOVEREFLOW 


OVERFLOW 
SIZE 
条件 の リス ト UNDERFLOW 
ZERODIVIDE 
以下 は 各種 条件 を アル ファ ベッ ト 有 順列 挙 し た も の で ある 。 通常 , 2. 入出 力 条 件 一 デー タ の 転送 関係 の ある 条件 で あり , 次 
各 条 件 ど と MC 次 (C 示 す よ うな 情報 を 記載 し て ある 。 の も の が ある 。 
ENDF ILE 
1. 各 条 件 の 一 般 形 式 を 見 出し と し て 示し て ある 。 ENDPAGE 
KEY 
2. 説明 一 その 条件 つい て の 説明 。 そ の 条件 を 引き 起す 可 Se 
能 性 の ある 環境 Cc つい て の 説明 を 含む 。 SIGNAL ステ ー TRANSMIT 
トメ ント を 使用 すれ ば , つね と , 解禁 状態 C あ る 条件 を 引き UNDEFRINEDFILE 
起す と と が で きる と いう 点 C 注 意 さ れ た い 。 以下 の 説明 で は , 
と の 事実 を そ を の つと ど 取り上げる と と は し て いな い 。 3 ブ プログ ラム ・ チ ェ ッ クア ウト 条件 一 プロ グラ ム の デベ バッ 


グ を 容易 (CC する た め の 条 件 で あり , 次 の ゃ の が ある 。 
3 結果 一 その 条件 を 引き 起す 原因 と を な っ た 操作 の 結果 。 


と の と と は , その 条件 が 解禁 状態 に C あ る 場合 も , 禁止 状態 に CHECK 
ある 場合 も , 適用 する と と が で きる 。 場合 に よっ て は , 結果 SUBSCRIPTRANGE 
STRINGRANGE 


が 定義 で き を いと と も ある 。 つま り , 結果 が どう な る か 予測 
する と と が で き な い 。 とれ に K 該 当 す る 場合 に は , その 旧記 し 
て ある 。 4. 記憶 域 制 御 に 関す る 条件 


STRINGS1ZE 


4. シス テム の 標準 処置 一 ある 割込み が 起 っ た と き (C, ブロ AREA 


グラ マー の 側 で その 割込み を 処理 する を た を め の オ ン ・ ユ ニッ ト 
を 指定 し て いな い 場 合 (C シス テム に よっ て と られ る 処罰 。 


1 


シス テム の 処置 (C 関 する 条件 一 条件 が 引き 起 さ れ た 人 後 # 
た は プロ グラ ム が 完了 し た 後 と られ る シス テム の 標準 処 連 を 
拡張 する た め の 手 段 と を る 条件 。 以下 の も の が ある 。 


の 


状況 一 ブロ グラ ム の 実行 が 始ま る と き そ の 条件 が 解禁 状 
態 C ある か 禁止 状態 な ある か の 表示 。 そ の 条件 を 解禁 状態 
する 方 法 ま た は ( 可能 を 場合 に は ) 禁止 状態 C す る 方 法 に つ 
いて の 説明 を 含む 。 


ERROR 
FINISH 


6 ブロ グラ マー が 名 付け る 条件 
6. 正常 戻り 一 その オン ・ ユ ニッ ト を 正常 な 形 で 終え た 人 後 
制御 が 戻さ れる 場所 。GO TO ステ ー ト メン ト で オン ・ テ ユ 
ニッ ト の 外 K 制 御 を 江 す と , オン ・ ユ ニッ ト は 異常 停止 する 
と と iC て を る 。 SIGNAL ステ ー ト メン ト (C よ っ て ある 条件 が AREA 記憶 域 制御 
引き 起 さ れ た 場合 は , 正常 の 戻り で あれ ば つね 《 SIGNAL 
の 直後 の ステ ー ト メン ト K 制 御 が 戻さ れる と いう と と 注意 説明 : 次 の いずれ か の 環境 (Cc な いて AREA 条 件 が 引き 起 さ れる 。 
し て いた だ きた い 。 


CONDITION 


1. ある 基底 付 変数 が 割り 振ら れる だ け の 記憶 域 が あい て いな 
い エ リア と の 変数 を 割り 振 ろ 2 と し た と き 。 


条件 の 分 類 2 0 の 0 引合 MENS だ MO 還 e 寺 2 上 
2 リア て な い の を と, エリ アプ 割当 て を 行 な お むと し た と き 。 
条件 は 次 の ょ う K 分 類 さ れる 。 結果 : いずれ の 場合 (C も , と の ょ うな 割 振り を し ょ うら と し て も 割 
当て 《 何 の 効果 も を い 。 
1. 計算 関係 の 条件 一 デー タ の 取扱 い , 式 の 値 の 計算 , お ょ 
び 計 算 ij 関 係 する 条件 で あり , 次 の りゃ の が ある 。 シス テム の 標準 処置 : オン ・ ユ ニッ ト が 与え を られ て いな い 場 合 
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シス テム は メッ セー ジ を 印刷 し , ERROR 条件 を 起 と す 。 


状況 : AREA は つね 解禁 状態 に あり, 禁止 状態 C 置 く と と は 
で き な い 。 


正常 た 戻り : オン ・ ユ ニッ ト か ら の 正常 を 戻り の 後 と られ る 措 凡 


は , 次 (示す 通り で ある 。 


1. 割 振り に よっ て と の 条件 が 引き 起 さ れ た 場合 に は , 再び と の 
割 振り が 試み られ る 。 た だ し , と の 試み を 行なう 前 (C, エリ 
ア 参 照 の 値 が 再度 計算 さん る 。 し た が っ て , オン ・ ュ ユニット 
で 小さ すぎ る エリ ア へ の 参照 を 修飾 し て いる ポイ ンタ ー の 値 
を 変更 し て , と の ポイ ンタ ー が 別 の エリ ア を 指す ょ 9 修正 し 
た 場合 は , と の 割 振り は , 新しい エリ ア で 行なわ れる よう 
試み られ る 。 


2. エリ アプ 割 当て を な いし SIGNAL ステ ー ト メン ト (C て よっ て と 
の 条件 が 引き 起 さ れ た 場合, 割込み の 発生 し た 場所 か ら 実 行 
が 続行 され る 。 


CHECK〔 (名 前 の リスト ) 〕 プロ グラ ム ・ チ ェ ッ クア ウト 
説明 : CHECK 条 件 が 引き 起 さ れる の は , CHECK 条 件 接頭 語 
の 有効 範囲 の 中 だ け で ある 。 こ と の 条件 接頭 語 は , DECLARE, 
DEFAULT, お よび ENTRY ステ ー ト メン ト 以 外 で あれ ば どの 
よう を な を ス テー トメ ント の 前 に つけ る とこ と も で きる 。 CHECK 条件 
は , CHECK 接頭 語 の リス ト KC あ る 個々 の 名 前 ど と C, 別々 KK 解 
禁 状態 罰 か れる 。 た と えば げ , 接頭 語 ( CHECK(A,B,C) ): 
は ( CHECK(A)): (CHECK(B) ): ( CHECK(C) ): 
と 同じ 指定 で ある 。 し た が っ て , 各 名 前 ど と < 別々 の 処置 を 指定 す 
る と と が で きる 。 また , 名 前 の リス ト を 与え な い 場 合 iC は , 
CHECK 接頭 義 の 有効 範 界 の 中 に ある 各 変 数 Cc 対し て それ ぞ れ と 
の 条件 が 解禁 状態 ,c 置か れん る 。 な ぉ , REVERT ステ ー ト メン ト 
を 使っ て , リス ト 内 の 名 前 対し て 指定 され て いる 処置 を 変更 する 
と と が で きる (変更 する 処 置 の 数 < 制限 は な い ) 。 を お また , 
NOCHECK 接頭 語 を 使っ て , 特定 の 名 前 対し て CHECK 条 
件 を 禁止 状態 て 置く と と が で きる 。 


必要 ic 応じ て 与え る 「 名 前 の リス ト 」 は , 1 つま た は それ 以上 の 
名 前 を コン マ で 区 切っ た も の で ある 。 と の 名 前 は 修飾 され た 名 前 で 
も よい 。 と の 各々 の 名 前 は , 次 の いずれ か で を けれ ば を ら な い 。 


1 入口 定数 また は 入口 変数 。 
2. ラベ ル 定 数 また は ラベ ル 変 数 。 


3 要素 , 配列 , また は 構造 を 表わす 任意 の デー タ ・ タ イブ で , 
添字 の つい て いな い 名 前 。 と の 変数 は i SUB で 定義 され た 
も ゃ の で あっ て は を ら な い 。 また, と の 変数 は 「 名 前 の リス ト | 
の 中 の ロケ クー ター よっ て 明示 的 修飾 され て いる も の で あ 
っ て は を ら な い 。 


デー タ ・ リ スト の 中 の 被 定義 変数 が 次 の いずれ か で あっ て は 
友 ら ない 。 
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a. 被 制御 変数 iC 重ね て 定義 され て いる 変数 。 


b. 調節 可能 を & 1 つ 以 上 の 限界 を も つ 配 列 IC 重 ね て 定義 され て 
いる 変数 。 


c・ 定 数 以外 の も の を 指定 し て いる POSITTION 属性 を も 
つも の と し て 定義 され て いる 変数 。 


「 名 前 の リス ト 」 の 中 の 基底 付 変数 (は , 以下 の 制約 が 適用 さ 
れる 。 


a. と の 変数 は , す で (COFFSET 属性 を 与え を られ て いる も 
の で あっ て は な ら な い 。 


b. と の 変数 は , REFEBR オプ ショ ン (C よ っ て 宣言 され て い 
る 構造 の メン バー で あっ て は な ら な い 。 


c. と の 変数 の 基底 と を っ て いる ポイ ンタ ー は , 基底 付 で あっ 
た り , 被 定義 で わっ て は を ら を いし , バラ メー ター で あっ 
て は な ら な い 。 さら, と の ポイ ンタ ー は 配列 を いじ 構造 
の メン バー で あっ て は な ら な い 。 


CHECK 接頭 語 で 与え る 名 前 は , 当該 ブロッ ク の 中 で 知ら れ て 
いる 名 前 また は CHECK 接頭 語 が つけ られ て いる ステ ー ト メン ト 
を 指す も の で ある 。 「 名 前 の リス ト 」 の 中 で 指定 する と と の で きる 
名 前 の 数 は , 最高 2 5 5 で ある 。 


CHECK の 後続 く 「 名 前 の リス ト 」 で 構造 の 名 前 たい し 構造 
の 配列 の 名 前 が 指定 され て いる 場合 , この リス ト は , その 構造 た い 
し 構造 の 配列 の 要素 が , 宣言 され て いる 順 ic 並 ん で いる 名 前 の リス 
ト と 同じ も の で ある 。 た と えば , P が 次 の よう KK 定義 され て いる も 
の と する 。 


DECLARE 1 PBP,2 Q.2 R.2 S: 
する と , 
CHECK (P) 


は 次 の 指定 ic 等 し い 。 
CHECK (P.Q,P.R,P.S ) 


CHECK 接頭 語 の 有効 範囲 に お いて , 次 の いずれ か の 事態 が 生 
じ た と き , CHECK 条 件 が 引き 起 さ れる 。 


1 CHECK 接頭 語 で 指定 され て いる 名 前 が ステ ー ト メン ト ・ 
ラベ ル ん 定数 で ある 場合 は , その ラベ ル が 前 に つけ られ て いる 
ステ ー ト メン ト を 実行 する 前 ICCHECK 条件 が 提起 され , 
割込み が 起 と る 。 た だ し , と の ラベ ル が FORMAT ステ ー 
トメ ント の 接頭 語 で ある 場合 に は , CHECK 条件 は 引き 起 
され な い 。 


2. CHECK 接頭 語 で 指定 され て いる 名 前 が ( 上 の 一 般 形 式 の 
第 3 項 に 示し た ) 変数 で ある 場合 , と の CHECK 接頭 語 の 
有効 範囲 内 で , と の 変数 の 値 き た は と の 変数 の 一 部 分 の 値 が 
何ら か の ステ ー ト メン ト C よ っ て 変更 され る た びに , 
CHECK 条件 が 引き 起 さ れる 。 


と く 記 , 次 の よう な 場合 CK CHECK 条件 が 引き 起 さ れる 
( と と で , 識別 名 I D は と の 変数 を 表わす も の と する ) 。 


a. 割当 て ステ ー ト メン ト の 左側 (CC ID が ある 場合 。 
( BY NAME 割 当て に 関し て は , 言及 され る 名 前 
よっ て その 値 が 変更 され る 場合 に 限り , と の 項 の 記述 
が 適用 され る 。 ) 


b. 割当 て ステ ー ト メン ト の 左側 c あ る 擬似 変数 の 結果 と 


し て TI D が セッ ト さ れ 友 場合 。 


c . { D が DO グル ー プ の 御 御 変数 を いし デー タ ・ リ スト 
内 の 繰返し 指定 の 制御 変数 と し て 出 て 来 た 場合 (また 
は , DO グル ー ズ プ の 制御 変数 を いし デー タ ・ リ スト 内 
の 繰返し 指定 の 制御 変数 と し て 出 て 来 た 擬似 変数 の 結 
果 と し て I D が セッ ト さ れ た た 場合 ) 。 


d. 編集 指示 また は リス ト 指 示 の GET ス テー トメ ント の 
リス ト の 中 ID が ある 場合 。 


e. データ 指 示 の 入力 C よ っ て ID が 変更 され た 場合 。 


f . DISPLAY ス テー トメ ント の REPLY オ プシ ョ ン 
の 中 (C I D が ある 場合 。 


g. PUT ス テー トメ ント の STRING オプ ショ ン の 中 
(C 1 D が ある 場合 。 

h. ID が プロ グラ マー に よっ て 定義 され た プロ シー ジャ 
ー へ の 引数 と し て 渡さ れ , 見 か け 引 数 が 作成 され ず , 
と の ブロ シー ジャ ー が RETURN また は END で 終 
了 し た 場合 。 


1i. READ ステ ー ト メン ト の KEYTO ま を た は INTO 
オプ ショ ン の 中 CC ID が ある 場合 。 を お , と の 
READ ス テー トメ ント が EVENT オプ ショ ン を も 
つ 場 合 C は , CHECK 条件 は 引き 起 さ れ を い の で 注 
意 さ れ た い 。 


TI D が ロケ クー ター 変数 と し て SET オ プシ ョ ン の 中 
ある 場合 , また は , ID が 暗示 的 に モッ ト さ れ た 場合 。 


k. ID が INITIAL 属性 (よっ て セッ ト さ れ た た 非 静 
的 変数 で ある 場合 。 


上 の a,b,d,e, C お いて , ID が デー タ 集 合体 で ある 場 
合 , その 集合 体 の 個々 の 要素 (C 値 が 与え を られ る た び KCHECK 
条件 が 引き 起 さ れる 点 K 注 意 さ れ た い 。 I D が デー タ 集 合体 
の 1 つの 要素 で ある 場合 に は , その 要素 (C 対 し て CHECK 条 
件 が 引き 起 さ れる の で あり , その デー タ 集 合体 全体 ,C 対 し て 
と の 条件 が 引き 起 さ れる わけ で は な い 。 


結果 : 


以下 EK 示す いずれ の 環境 (お な いて も, CHEBCK 条 件 は 引き 起 
され な い 。 


a 、 ID また は ID の 一 部 で 定義 され て いる 変数 の 値 が 上 
述 の いずれ か の 方 法 で 変っ た 場合 。 


b. 引数 ID を 素 わ す パ ラメ ー タ ー の 値 が 変っ た 場合 。 


c ・ GO TO を いし RETURN ステ ー ト メン ト の 中 に 
ID が ある 場合 , また は , GO TO を いし RETURN 
ステ ー ト メン ト の 実行 を 含む セス テー トメ ント の 中 
ID が ある 場合 。 


上 示し た いずれ の 文脈 ない て も , ID は 添字 の つい た 形 
また は 修飾 され た 形 で あっ て よい と い 9 点 注意 され た い 。 
また , CHECK 接頭 語 の 「 名 前 の リス ト 」 に ID が ある 必 
要 は な いと いう 点 C も 注意 され た い 。 TI D は , リス ト の 中 の 
名 前 に 含ま れる 構造 を たい し 要素 を 素 し て いる か , リス ト の 中 
の 名 前 を 含む 構造 を た いし 要素 を 表わし て いさ を すれ ば よい 。 


h の 場合 を 除き , {ID へ の 割当 て の 直後 CCHECK 条件 の 
た め の 割 込み が 起こ る 。 h の 場合 Cc は , と の サブ ルー チン の 
RETURN を いし END ス テー トメ ント を 実行 し た 直後 と 
の 割込み が 起 と る 。 DO ステ ー ト メン ト の 場合 は , 制御 が 

DO ステ ー ト メン ト の 直後 の ステ ー ト メン ト 乏 次 移る たび 
と 割込み が 起こ と る 。 DO ステ ー ト メン ト で 実行 の 繰返し が 指 
定 さ れ て いる 場合 に は , 制御 変数 の 値 が 変る た び 割 込み が 
起 と る 。 


ある 1 つの ステ ー ト メン ト が 原因 と な っ て いく つか の 名 前 
関連 し て CHECK 条件 が 引き 起 さ れる 場合 は , リス ト の 中 
で 左 に ある 名 前 か ら 順 に , こと の 条件 が 起こ る 。 


CHECK 接頭 語 の 「 名 前 の リス ト 」 に ある 識別 名 が 入口 定 
数 で ある 場合 , と の 入口 定数 対応 する 入口 点 の 呼出 し が 行 
を われ る た びに KC, と の 呼出 し 先立っ て CHECK 条件 が 提 
起 さ れ , 割込み が 起こ る 。 た だ し , CHECK 条件 が 提起 さ 
れる の は , CHECK 接頭 語 で 与え を られ て いる 入口 定数 (< ょ 
っ て と の 入口 点 が 呼び 出さ れ た 場合 だ け で ある 。 


CHECK 条件 が 引き 起 さ れ て も , と の と き 実 行 さ れ て い 


る ステ ー ト メン ト は 何 の 影 響 も 受け を い 。 


シス テ ュ ょ の 標準 処置 : オン ・ 


ュ ニ ッ ト が 与え を られ て いな を ない) 場合 


「 名 前 の リス ト 」 が 与え を られ て いる か 否 か CK か か わり な く , 次 c 示 


す よ ょ うな 出力 が 出さ れる 。 な お , 


と の 出力 と は 現在 の ステ ー ト メン 


ト 番 号 も 含ま れる 。 
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族 また は 定数 


算術 変数 また は スト リン グ 変 数 名 前 と 値 


ェ リ プア 変 数 。 ファ イル 変数 , 入口 変数 , 
事象 変数 , ラベ ル 変 数 , また は ロケ クー 名 前 の み 
ター 変数 , 入口 定数 また は ラベ メル 定数 


| 護 


a . 「 名 前 の リス ト 」 を 与え を か っ た 場合 , SIGNAL 
CHECK KC 対 応 す る シス テム の 標準 処置 は ストリング 
変数 な ょ び 算 術 変数 の 名 前 ( と 新しい 値 ) を 印刷 する と 
と だ け で ある 。 


b. CHECK 条件 Cc 対す る シス テム の 標準 処 置 で は , 当該 
変数 を アク セス する 必要 が ある 。 し た が っ て , 割り 振 
られ て いな い 変 数 に 対し て SIGNAL CHECK が 与 
えら れ て いる 場合 は , エラ ー が 生じ る 。 同様 CK, オン ・ 
ュ ユニ ッ ト で と の 変数 CK アク セス し 太 た 場合 Cc も エラ ー が 生 
じ る 。 


状況 : ユー ザー の 側 で 特 指 定 し を い 限り , CHECK は 禁止 状 
態 C あ る 。 また, NOCHECK 条件 接頭 語 の 有効 範 胃 の 中 で も 
CHECK は 禁止 状態 CK あ る 。CHECK 接頭 語 の 有効 範 囲 内 で だ 
け , CHECK は 解禁 状態 置か れる 。 


正常 戻り : CHECK 条件 の た め の オ ン ・ ユ ニッ ト が 正常 な 形 
で 完了 する と, 割込み の 起こ っ た 場所 の 直ぐ 後 の と と ろか ら 実 行 が 
続行 され る 。 


CONDITION (名 前 ) プロ グラ マー が 名 付け る 
省略 形 : COND (名 前 ) 


説明 : CONDITION は , 該当 する 名 前 を 指定 し て いる 
SIGNAL ス テー トメ ント CC よっ て 5| き 起 さ れる 。 SIGNAL ステ 
ー ト メン ト で 指定 され て いる 名 前 に よっ て , どの CONDI TION 
条件 を 引き 起す か が 決ま る 。 


ON SIGNAL, また は REVERT ステ ー ト メン ト の 中 CK, あ 
る 識別 名 を も つ CONDITION が 記入 され て いる と いら と と は , 
その 識別 名 が 廊 脈 の 上 か ら 宣 言 さ れ た と と を 意味 する 。 と の 識別 名 
(C は EXTERNAL 属性 が 与え られ る 。 ま た, CONDITION 属 
性 を 使っ て , 識別 名 を 条件 名 と し て 明示 的 に 宜 言 する と と も で 
きる 。 


シス テム の 標準 処置 : この 条件 の た め の オ ン ・ ユ ニッ ト が 与 を ら 


れ て いな た い 場 合 , ンス テム は メッ セー ジ を 印刷 し , SIGNAL の 
次 の ステ ー ト メン ト か ら 実 行 を 続行 する 。 
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状況 : CONDITION は つね に 解禁 状態 な < あり , とれ を 禁止 
状態 KC する と と は で き な い 。 


正常 な 戻り: オン ・ ユ ニッ ト が 正常 た 形 で 完了 する と , と の 割 込 


み を 引き 起こ と し た SIGNAL ス テー トメ ント の 次 の ステ ー ト メン 
ト か ら 実 行 が 続行 され る 。 


CONVERSION 計 算 関係 
省略 形 : CONV 


説明 : 文字 スト リン グ ・ デ ー タ KC 対し て 有効 で を い 変 換 が 試み ら 
れる た び C CONVERS {ON 条件 が 引き 起 さ れる 。 と の 変換 は 計算 機 
内 部 で 試み られ る と と も あり , 入出 力 操作 の 間 に 試 み ら れ る と と も ゃ 
ある 。 た と えば , ビッ ト ・ ス トリ ング 変換 すべ き 文 字 ス トリ ング 
の 中 (C 0 また は 1 以外 の 文字 が ある と , CONVERSION 条 件 が 
引き 起 さ れる 。 また, た と えば , 数 字 フ ィ ー ル ド 《 変 換 す べき 廊 
字 ス トリ ング の 中 ICPICTURE 指定 で 許さ れ て いな い 文 字 が あ 
っ た 場合 , ある い は コー ド 化 算術 デー タタ KC 変換 す べき スト リン グ の 
中 て 算術 定数 の 文字 表現 が 含ま れ て いな い 場 合 C も CONVRRSION 
条件 が 引き 起 さ れる 。 


文字 スト リン グ ・ デ ー タ は すべ て , 1 文字 ずつ 左 か ら 右 向かっ 
て 変換 され る 。 と の 間 , 有効 で を い 文 字 が ある た び C CON 一 
VERS TION 条件 が 引き 起 さ れる 。 有効 で を い 文字 が 出 て 来る と , 割 込 
が 起こ とこ り ( も ゃ ちろ ん , と れ は CONVERS ION が 禁止 状態 KC 置か 
れ て いな い 場 合 ) , CONVERSION 条 件 関し て 現在 指定 され て 
いる 処置 が と られ る 。 と の 処置 が オン ・ ユ ニッ ト を 実行 する と と で 
ある と き は , オン ・ ユ ニッ ト の 中 で ONSOURCE な いし ONCHAR 
擬似 変数 を 使っ て 有効 で を い 文 字 を 訂正 する こと と が で きる 。 この い 
ずれ か の 擬似 変数 を 使用 し て いる 場合 は , オン ・ ユ ニッ ト か ら 戻 っ 
た 化 再 び 先 の 変換 が 試み られ る 。 エ ラー が 訂正 され て いな い 場 合 c 
は , プロ グラ ム は ルー プ に 入る と と に な る 。 上 上述 の 擬似 変数 を 使用 
し て いな い 場 合 に は , ERROR 条件 が 引き 起 さ れる 。 


結果 : CONVERSION が 引き 起 さ れ た 場合 , 結果 の フィ ー ル ド 
全体 の 内 容 は , どう を る か わか ら な い 。 


シス テム の 標準 処置 : オン ・ ユ ニッ ト が 与 を られ て いな い 場 合 は , 
シス テム は メッ セー ジ を 印刷 し , ERROR 条件 を 引き 起す 。 


状況 : NOCONVERSTON を 指定 し て いる 条件 接頭 語 の 有 交 範 
囲 を 除い て , プロ グラ ム を 実行 し て いる 間 中 CONVERSIONG 解 
禁 状態 C あ る 。 


正常 た 戻り : と の 条件 の た め の オ ン ・ ユ ニッ ト が 正常 み 形 で 終了 
し た 人 後 , 当該 スト リン グ の 最初 の と こと ろ K 制 御 が 戻さ れ , 再び 変換 
が 試み られ る 。 


ENDFILE (要素 ファ イル 式 ) Sri 


説明 : ENDF ILE 条 件 は , GET ま た は READ 操作 を 行っ て いる 
と き ( 人 引き 起 さ れる 可能 性 が ある 。 す な わ ち , GEBT を いし READ 
ステ ー ト メン ト で 名 前 が 指定 され て いる ファ イル の ファ イル 区 切り 
符号 を 越え て 読取 り を 行 な な むう と する と , と の 条件 が 引き 起 さ れる 。 
と の 条件 が 適用 され る の は , SEQUENTTIAL INPUT, 
SBPQUENTIAL UPDATE, ぉ よび STREAM INPUT の ファ 
イル だ け で ある 。 


レコ ー ト 方 式 の 入出 力 に な いて は , READ ス テー トメ ント を 実 
行 し て いる 間 に フ ァイル 区 切り 符号 が 出 て 来る た び K, 
ENDF ILE 条件 が 引き 起 さ れる 。 


スト リー ム 方 式 の 入出 力 C な いて は , ある GET ス テー トメ ント 
を 実行 し て いる 間 , こと この GET ステ ー ト メン ト の デー タ ・ リ スト 
ある どの 項目 も 転送 され を いら うち, ある い は ある デー タ 項 目 を 転 
送 し た 人 後 他 の デー タ 項 目 を 転送 する まで の 間 (C フ ァイル 区 切り 符号 
が 出 て 来場 合 , ENDFTI LE 条件 が 引き 起 さ れる 。 ある デー タ 
項目 を 転送 し て いる 間 C フ ァイル 区 切り 符号 が 出 て 来 た 場 合 ま た は 
X 形式 項目 を 実施 し て いる 間 に フ ァイル 区 切り 符号 が 出 て 来場 
合 に は , ERROR 条件 か 引き 起 さ れる 。 


ENDEF ILE が 引き 起 さ れ た 人 後 当 該 フ ァイル が 閉じ られ て いな 
い 場 合 C は , 当該 ファ イル を 対象 と する GET な いし READ ステ 
ー ト メン ト が と の 後 出 て 来る と た だ ち C, また ENDFILDP 条件 
が 引き 起 さ れる 。 


EVENT オプ ショ ン を も ゃ も つ 入 出力 ステ ー ト メン ト よっ て 
ENDF ILE が 引き 起 さ れ た 場合 に は, と の 事象 を 対象 と する 
WAIT ステ ー ト メン ト が と の 人 後 実行 され る まで 割込み は 起 と ら な 
\ い o 


シス ネス テム の 標準 処 置 : オン ・ ユ ニッ ト が 与え られ て いな い 場 合 , 
シス テム は メッ セー ジ を 印刷 し , ERRO R 条件 を 引き 起す 。 


状況 : ENDFILE 条件 は つね 解禁 状態 KK あり , と れ を 禁止 
状態 CK 置く と と は で き な い 。 


正常 た 戻り : と の 条件 の た め の オ ン ・ ユ ニッ ト が 正常 た 形 で 終了 
する と , ENDFTILE を 引き 起 し を た GET な いし READ ステ ー 
トメ ント の 直ぐ 後 の ス テー トメ ント か とら 実行 が 続行 され る ( また は , 
EVENT オ プシ ョ ン を も つ READC よ っ て ENDEF [LE が 引き 起 
され た た 場合 C は , と の 条件 の た め の オ ン ・ ユ ニッ ト を 呼び 出し た 
WAIT ステ ー ト メン ト K 制 御 が 戻さ れる ) 。 


注 : ENDFTILE 条件 の た め の オ ン ・ ユ ニッ ト の 中 で ファ イル 
が 閉じ られ た 場合 に は , 正常 た 戻り の 後 ど うろ を る か は わか ら な い 。 
と の 種 の オン ・ ユ ニット で は , GO TO ステ ー ト メン ト と よっ て 制 
御 を オン ・ ユ ニッ ト の 外出 さ を け れ ば な ら な い 。 


ENDPAGE (要素 ファ イル 式 ) 入 出 カ 
説明 : ある PUT ス テー トメ ント を 実行 し た 結果 と し て , 現在 の 


ペー ジ K 対 し て 指定 され て いる 限界 を 越え て 新しい 行 を 開始 し ょ 5 
と する と , ENDPAGE 条 件 が 引き 起 さ れる 。 ペー ジ の 限界 は , 


OPEN ステ ー ト メン ト の PAGESTIZE オ プシ ョ ン を 用 いて 指定 
する と と が で きる 。 PAGESIZE が 指定 され て いな い 場 合 は , 

当 コ ロン バイ ラー の 省略 時 の 限界 で ある 6 0 行 が ペー ジ の 限界 で ある 
$ も の と みな され る 。 デー タ (編集 指示 の PUT ス テー トメ ント の 場 
合 C と は デー タ と 結び 付い て いる 形式 項目 を 含む ) を 転送 し て いる 間 
(C, ま を は LINE オ プシ ョ ン ま た は SKIP オ ォ オプ ショ ン 選 よっ て , 
ペー ジ の 限界 を 越え る 新しい 行 を 開始 し ょ うと する 試み が を され る 
と と が ある 。 また, 現在 の 行 番号 ょ り 小 さい 行 番号 を 指定 し て いる 
LINE オ プシ ョ ン ま た は LINE 形 式 項目 た と っ て , ENDPAGE 
が 引き 起 さ れる と と も ある 。 


ENDPAGE が 9 引き 起 さ れ 友 時 点 の 行 番号 は , PAGESIZE オ プ 
ショ ン で 指定 され て いる 番号 より 1 つ 大 きい (また は , PAGES1IZR 
が 指定 され て いな じい 場合 に は , 6 1 ) 。 したがって, 同じ ペー ジ K 
印刷 を 続け る こと も 可能 で ある 。 オ ン ・ ユ ニッ ト で は , 現在 の 行 番 
号 を 1(C セ モッ ト す る た め の PAGE オ プシ ョ ン ま た は PAGE 形 式 
項目 を 実行 する こと に よっ て , 新しい ペー ジ を 開始 する と と が で きる 。 


ENDPAGE は , 1 つの ペー ジ で は 1 回 し か 引き 起 さ れ を い 。 と の 
た め , オン ・ ユ ニッ ト で 新しい ペー ジ が 開始 さん を けれ ば げ ば, 現在 の 
行 番号 が 無限 に 大 きく を なる と と が ある 。 と の 人 後 出 て 来 た LINE ォ 
プシ ョ ン ま た は LINE 形 式 項目 で 現在 の 行 番号 ょ り 小 さい 行 番号 
が 指定 され て いた 場合 に は , ENDPAGE は 引き 起 さ れ を な い が 現 在 
の 行 番号 が 1 に セッ ト さ れ て , 新しい ベー ジ が 開始 され る 。 た だ し , 
指定 され て いる 行 番号 が 現在 の 行 番号 に 等 し く ,。 し か も る ファ イル の 
位置 が と の 行 の 1 桁 目 C あ る 場合 C は ENDPAGE は 引き 起 さ れ な 
いっ o 


デー タ を 転送 し て いる 間 (c ENDPAGE が 引き 起 さ れ た 場合 tc 
は , オン ・ ユ ニッ ト か ら 戻 っ た 人 後 , デー タ が 現在 の 行 (印刷 され る 
( と と で いう 9 現在 の 行 は 。 オン ・ ユ ニッ ト で 変更 され て いる 可能 性 
が ある ) 。 LINE を いし SKIP オプション に よっ て ENDPAGE 
が 引き 起 さ れ た 場合 C は , オン ・ ユ ニッ ト か ら 戻 っ た 後 , その 
LINE な を いし SKIP で 指定 され て いる 処置 は 無視 され る 。 


シス テム の 様 準 処 置 : オン ・ ユ ニッ ト が 与え を られ て いな い 場 谷 , 
ンス テム は 新しい ペー ジ を 開始 する 。 SIGNAL ス テー トメ ント 
(C よ っ て と の 条件 が 引き 起 さ れ た 場合 は , 実行 は これ KC よっ て 何 
の 影響 も 受け ず , SIGNAL ステ ー ト メン ト の 次 の ステ ー ト メン ト 
か ら 実行 が 続行 され る 。 


状況 ENDPAGE は つね 解禁 状態 あり, と れ を 禁止 状態 
(CC 置く こと と は で き な い 。 


正常 戻り : と の 条件 の た め の オ ン ・ ユ ニッ ト が 正常 た 形 で 完了 


する と , 上 述 の と よら に し て 当該 PUT ス テー トメ ント の 実行 が 続行 
され る 。 


ERROR シス テム の 処置 
説明 : 次 の ょ うな 環境 に な いて ERROR 条 件 が 引き 起 さ れる 。 


1. シス テム の 標準 処置 が 「 ェ エラ ー・ メ ッ セ ー ジ を 印刷 し 
ERROR 条 件 を 引き 起す }」 と と で ある よう な ON 条件 
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対す る シス テム の 標準 処置 の 結果 と し て 。 


ウ プ ブログ ラム を 実行 し て いる 間 K 発 生 し た ( ON 条件 の な い ) 
ェ エラー の 結果 と し て 。 


SIGNAL ERROR ス テー トメ ント の 結果 と し て 。 


シス テム の 標準 処置 : FINISH 条件 が 引き 起 さ れ , その 人 後 当 
該 ブ プロ グラ ム が 停止 され る 。 


状況 : ERKROR は つね 解禁 状態 な た あり , これ を 禁止 状態 ic 置 
く と と は で き な な い 。 


正常 戻り: オン ・ ユ ニッ ト が 正常 た 形 で 完了 する と , シス テム の 
標準 処置 が と られ る 。 
FINISH シュテ ム の 処 凡 
説明 : FINISH 条件 は , PL ノエ ブロ グラ ム を 停止 させ る よ 
ら な ステ ー ト メン ト ( STOP ステ ー ト メン ト , また は , 第 1 プロ 
シー ジャー の 中 の RETURN な いし END ス テー トメ ント ) を 実 
行 し て いる 間引き 起 さ れる 。 また, SIGNAL FINISH KK+ 
っ て と の 条件 が 引き 起 さ れる と と も ある し , ERROR 条件 の た め 
の シス テム の 標準 処置 の 一 部 と し て と の 条件 が 引き 起 さ れる と と も 
ある 。 


シス テム の 標準 処置 : オン ・ ユ ニッ ト が 与え を られ て いな い 場 合 は , 
何 の 処置 も る と られ な い 。 すなわち , 割込み を 引き 起こ し た ステ ー ト 
メン ト の 実行 が 続行 され る 。 


状況 : FINISH は つね 解禁 状態 に あり, と れ を 禁止 状態 
置く と と は で き な い 。 


正常 戻り: オン ・ ユ ニッ ト が 正常 た 形 で 完了 する と , 割込み を 
引き 起 と し た ステ ー ト メン ト の 実行 が 続行 され る 。 


FIXEDOVERFLOW 計 算 
省略 形 : FROFL 

説明 : 固定 小数 点数 算術 演算 の 結果 の 長 さ が 当 コ ン パ イラ ーK お 
いて 許さ れ て いる 最大 の 長 さ を 越え を た と き , FIXEDOVERFLOW 
条件 が 引き 起 さ れる 。 と の 最大 の 長 さ は , 1 0 進 固定 小数 点数 値 の 
場合 は 1 5 で あり , 2 進 固定 小数 点数 値 の 場合 C は 3 1 で ある 。 


結果 : 有効 で を い 固 定 小数 点数 演算 の 結果 は , 定義 で きい 。 


ジ シス テム の 標準 処置 : オン ・ ユ ニッ ト が 与え られ て いな い 場 合 , 
ジ シス テム は メッ セー ジ を 印刷 し , BRROR 条件 を 引き 起す 。 


状況 : NOFIXEDOVERFLOW と 指定 され て いる 条件 接頭 義 の 
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正常 た 戻り : 


有効 範 胃 を 除い て , プロ グラ ム を 実行 し て いる 間 中 
FIXEDOVERFLOW は 解禁 状態 と ある 。 


と の 条件 の た め の オ ン ・ ユ ニッ ト が 正常 み 形 で 終了 
する と , 割込み が 起こ っ た 場所 の 直後 ic 制御 が 戻さ れる 。 


KEY( 要 素 フ ァイル 式 ) 入 出 カ 


説明 : KEY 条件 は , キー 付 レコ ー ド を 対象 と する 操作 を 行っ 


て いる と きだ け , 引き 起 さ れる 可能 性 が ある 。 次 に あげ る いずれ 
か の 事態 が 生じ し た と き !C と の 条件 が 引き 起 さ れる 。 


1. 該当 の キー 付 レ コー ド が 見 つか ら な い 。 


2. 重複 し た キー を 追加 し ょ うと し た 。 ( 編成 方 式 が 
INDEXED, キー 順 の VSAM, また は REGTONALG) の 
フラ ァイル の み ) 


3 る. キー の 順序 が 間違っ て いる 。 
4. キー を 変換 し て いる 間 (C ェ ラー が 発生 し た 。 


5. キー が ナル ・ ス トリ ング で ある か , 見 か け の レコ ュ コー ド ・ ス 
トリ ング (⑱)! 1 ! B で 始ま っ て いる 。 


6. キー 付 レ ュー ド を 追加 す る た め の ス ペー ス が 使用 可能 で な 
te 


7 キー が 当該 チタ ・ セ ッ ト の 限界 の 外 C あ る 
( RPG IONAL デ ー タ ・ セ モット の 人 )。 


8. TI NDEXED デー タ ・ セ ッ ト ま た は キー 順 の VSAM デー 
タ ・ セ ッ ト を 対象 と する 順次 方 式 の REWR TI TE (FROM 
操作 の 間 (C, 内 蔵 さ れ た キー を 変更 し ょ うと し た 。 


9 キー が 当該 デー タ ・ セ モッ ト で 定義 され て いる キー 範囲 の 外 
に ある ( キー 順 VSAM の み ) 。 


EVENT オプ ショ ン を 使用 し て いる 入出 力 ス テー トメ ント K よ 
っ て KEY が 引き 起 さ れ た 場合 は , と の 後 同じ プロ シー ジャ ー の 中 
で と の 事象 を 対象 と する WAIT ステ ー ト メン ト が 実行 され る まで , 
割込み は 起こ ら を い 。 


REG IONAL(3) デー タ ・ セ ッ ト を 対象 と する 操作 Cc お いて 
LOCATE ス テー トメ ント が 使用 され て お り , し か る 指定 され て い 
る 区 域 に と あい て いる スペ ー ス が 充分 に を い 場 合 , レコ ー ド の 転送 が 
試み られ る まで は KEY 条件 は 引き 起 さ れ を い 。 同様 と , キー 順 の 
VSAM デ ー タ ・ セ ッ ト を 対象 と する 操作 に お いて LOCATE ステ 
ー ト メン ト が 使用 され て お り , キー が キー の 定義 域 の 外 に あり , し 
か る 指定 され て いる 区 域 に あい て いる スペ ー ス が 充分 CK ない 場合 , 
レコ ー ド の 転送 が 試み られ る まで は KEY 条件 は 引き 起 さ れ な い 。 


と の 条件 を 引き 起こ と す 原因 と を っ た レコ ー ド も 現在 の レコ ュー ド $ 転 
送 さ れ な い 。 


シス テム の 標準 処 購 : オン ・ ユ ニッ ト が 与え られ て いな を い 場 合 , 
シス テム は メッ セー ジ を 印刷 し , ERROR 条件 を 引き 起す 。 


状況 : KEY は つね K& 解 禁 状態 に あり , これ を 禁止 状態 < 置く と 
と は で き 廊 い 。 


正常 戻り : と の 条件 の た め の オ ン ・ ユ ニッ ト が 正常 な 形 で 完了 
する と , KEY 条件 を 引き 起す 原因 と を た っ た ステ ー ト メン ト の 直ぐ 
後 の ス テー トメ ント KK 制御 が 渡さ れる (また は , EVENT オ プシ 
ョ ン を も 入出 力 ス テー トメ ント CC よっ て KEY が 引き 起 さ れ た 場 
合 C は , KEY 条件 の た め の オ ン ・ ユ ニッ ト を 呼び 出し た WAIT 
スネ ステー トメ ント 制御 が 戻さ れる )。 


注 : と の 条件 の た め の オ ン ・ ユ ニッ ト (C お いて ファ イル が 閑 
じ ら れ た 場合 , 正常 た 戻り の 後 ど の ょ よら な 処置 が と られ る か は 
定義 で き な い 。 と の よう な オン ・ ユ ニッ ト の 場合 は , GO TO 
ステ ー ト メン ト に よっ て オン ・ ユ ニッ ト の 外 制 御 を 渡す べき 
で ある 。 
NAME ( 要素 ファ イル 式 ) 内 < 人 血 
説明 : NAME 条 件 は , FILE オ プシ ョ ン を も つ デ ー タ 指示 方 
式 の GET ス テー トメ ント を 実行 し て いる と き C だ け , 引き 起 さ れ 
る 可能 性 が ある 。 と の 条件 は , 次 の 場合 の よう C, 認定 の で き を い 
要素 変数 が スト リー ム の 中 K 出 て 来 た 場合 に 引き 起 さ れる 。 


1. 変数 の 中 に 有効 で ない 女 字 が ある 場合 : 


容 数 の 中 ブラ ンク 以外 の 区 切り 待 号 ( コン マ , セミ コロ 
ブ , また は ファ イル 終り マー ク ) が ある 。 


右 括弧 と 等 号 の 間 (C プ ラン タク 以外 の 文字 が ある 。 
数 字 で を い 添 字 が 付い て いる 。 

2. 変数 の 中 MC 有効 で ない プ ラン ク が ある 場合 : 
名 前 の 中 また は 添字 の 値 の 中 CC プラ ンク が ある ( 注 : 修 
飾 さ れ た 名 前 に 関し て は その ビリ ォ ド の いずれ の 側 C ブ プラ 
ンク が あっ て も よい し , また , 添字 の 符号 と 数 字 の 間 に ブ 
ラン ク が あっ て も よい )。 

る 名 前 が を い 場 合 ま た は 名 前 が 有効 で を い 場 合 : 


デー タ ・ リ スト の 中 対応 する 名 前 が を い 。 


デー タ ・ リ スト が な いと き (, 当該 プロ ッ ク に お いて 名 前 


が 知ら れ て いな い 。 

修飾 され た 名 前 が 完全 (修飾 され て は い を い 。 
完全 (修飾 され た 名 前 が 2 5 6 文字 を 越 を て いる 。 
iSUB で 定義 され た 名 前 で ある 。 


4. 添字 の リス ト が な い 場 合 ま た は 添字 の リス ト が 有効 で を い 
場合 


添字 が 抜け て いる 。 

添字 の 数 が 間違っ て いる 。 

添字 が 6 桁 以上 の 数 で ある ( 先行 で ど ロ は 無視 され る )。 
添字 の 値 が 範囲 の 外 に ある 。 


プロ グラ マー は , オン ・ ユ ニッ ト の 中 で DATAFIELD 組込み 
関数 を 用 いて , 当該 デー タ ・ フ ィ ー ル ド を 取り 出す こと と が で きる 。 


シス テム の 標準 処置 ・ オン ・ ユ ニッ ト が 与え を られ て いな い 場 合 , 


シス ュ テ ょ ム は , 間違い の ある デー タ ・ フ ィ ー ル ド を 無視 し , メッ セー 
ジ を 印刷 し , 当該 CET ス テー トメ ント の 実行 を 続け る 。 


状況 : NAME は つね (解禁 状態 あり , と れ を 禁止 状態 C 思 く 
と と は で き な い 。 


正常 な 戻り : と の 条件 の た め の オ ン ・ ユ ニッ ト が 正常 な 形 で 完了 
する と , スト リー ょ の 中 の 次 の 識別 名 か ら 当 該 CT ス テー トメ ン 
ト の 実行 が 続行 され る 。 


OVERFLOW き 算 
省略 形 : OFL 
説明 : OVERFLOW 条件 は , 浮動 小数 点数 の 大 き さ が 許容 最 


大 値 を 越 を た と き (C 引 き 起 され る 。 浮動 小数 点数 また は その 中 間 結 
果 の 大 き さ は , 約 1 075, すなわち も 2272% を 越え て は な を なら な い 。 


結果 : 有効 で を い , と の よう を な 滞 動 小 数 点数 の 値 は 定義 で き を い 。 


シス テム の 標準 処置 : オン ・ ユ ニッ ト が 与え を られ て いな を ない 場合 , 
シス テム は メッ セー ジ を 印刷 し , ERROR 条 件 を 引き 起す 。 


状況 : NOOVERFLOW が 指定 され て いる 条件 接頭 義 の 有効 範 
囲 を 除い て , プロ グラ ム を 実行 し て いる 間 中 OVERFLOW は い 
つも ゃ 解禁 状態 た ある 。 


正常 大 戻り : と の 条件 の た め の オ ン ・ ユ ニッ ト が 正常 を 形 で 終了 
する と , 割込み が 起こ っ た 場所 の 直ぐ 後に 制御 が 戻さ れる 。 
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RECORD( 要素 ファ イル 式 ) 人 仙丹 


説明 : RECORD 条 件 は READ, WRITE, LOCATE, ま た 
は REWRITE 操作 を 行なっ て いる と き に だ け 引 1 き 起 さ れる 可能 
性 が ある 。 次 の いずれ か の 事態 が 生ずる と , と の 条件 が 引き 起 さ れ 
る 。 


1. 固定 長 レ ヌード 用 ファ イル 対し て 指定 され て いる レコ ー 
ド 長 が READ INTO ス テー トメ ント の 変数 より 小さ く , 
し か も と の 変数 が 固定 長 ス トリ ング の と き 。 と の 変数 の 残 
り の 部 分 は , どら を る か わか ら な い 。 


の レコ ー ド が READ INTO ス テー トメ ント の 変数 ょ り 大 き 
いと き 。 レ コー ド の 残り の 部 分 は 失わ れる 。 


3. 最大 レコ ー ド 長 が WR 1I TE, REWRI TE, また は 
LOCATE ステ ー ト メン ト の 変数 と より 小さ いと き 。 と の 場合 , 
WRITE また は REWRITE に 関し て は , 変数 の 残り の 部 
分 が 失わ れる 。 LOCATE CK 関し て は , 変数 は 転送 され を ない 。 


4. 固定 長 レ ロー ド 用 ファ イル KK 対し て 指定 され て いる レコ ー 
ド 長 が WRITE , REWRI TE , ま た は LOCATE ステ ー ト 
メン ト の 変数 より 大 きい 。 と の 場合 , レ ュ ー ド の 残り の 部 
分 は どう なる か わか ら な い 。 と の 変数 が 可変 長 ス トリ ング 
で ある 場合 , SCALARVARYING オプ ショ ン が と の フ 
ァイル 適用 さき れ て いる な を なら ば , RECORD は 引き 起 ざ 
れ な い 。 


5. WRITE また は REWRITE ス テー トメ ント の 変数 の 長 
さ が ゼ ロ で ある と 指示 され て いる と き 。 転送 は 行なわ れ を な 
い 。 と の 変数 が 可変 長 ス トリ ング で ある 場合 , 
SCALARVARYING ォ オプション が と の ファ イル 適用 さ 
れ て いる な ら ば , RECORD は 引き 起 さ れ な い 。 


6. WRITE また は REWRITE ス テー トメ ント の 変数 が 短 す 
ぎ て , 当該 デー タ ・ セ ッ ト の 内 蔵 さ れ た キー が と の 変数 c 
人 ら な いと き 。 と の 場合 , 転送 は 行なわ れ な い 。 ( キー 順 
VSAM の み ) 。 VSAM フ ァイル CC お いて は , さら 
RECORD 条件 が 検知 され る と いう 点 を 除き , レコ ュー ド の 
チェ ッ ク は , 可変 長 レ コー ド と 同様 に C し て 行なわ れる 。 


エリア を 転送 し て いる 間 ic RECORD 条件 が 引き 起 さ れ た 場合 , 
誤っ た 情報 が この ェ リ ア 制 御 フ ラフィ ー ル ド に 入っ て いる と と が ある 。 


SCALARVARYING オプ ショ ン が 当該 ファ イル KK 適用 され て 
いる 場合 (可変 長 ス トリ ング を 転送 する < は , 位置 指定 方 式 で と の 
オプ ショ ン を ファ イル 適用 し な けれ ば な ら な い ), 要素 可変 長 ス ト 
リン グ と 共 C 2 バイ ト の 長 さ 接頭 語 が 転送 され る 。 RECORD 条件 
が 9「 き 起 さ れ て も , と の 長 さ 接頭 語 は リセ ッ ト さ れ な い 。 
SCALARVARYING オ プシ ョ ン が 当該 ファ イル K 適 用 され て い を い 
場合 , 長 さ 接頭 語 は 転送 され ず , 入力 の 際 レ ュ ー ド 長 と スト リン グ の 
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最大 長 の うち 短い 方 が , 可変 長 ス トリ ング の 現在 の 長 さ (C る 。 


EVENT オ ォ オプ ショ ン を 使用 し て いる 入出 力 ス テー トメ ント K よ っ 
て RECORD 条件 が 引き 起 さ れ た 場合 , と の 後 同じ アロ ンー ジャ ー 
の 中 で その 事象 を 対象 と する WAIT ステ ー ト メン ト が 実行 され る 
まで , 割込み は 起こ と ら な を い 。 


LOCATE ス テー トメ ント で RECORD 条件 が 引き 起 さ れ た 場合 , 
その ポイ ンタ ー 変 数 は セッ ト さ れず , 次 の 入出 力 ス テー トメ ント を 
実行 する と き (C も 緩衝 域 の 中 の デー タ は 転送 され な い 。 


CONSECUTIVUE デ ー タ ・ セ ッ ト か ら SEQUENTI AL 
UNBUFFERED フ ァイル KK 読み 取ら れ た 不定 長 レ コー ド K 対 し て , 
RECORD 条 件 が 引き 起 さ れる と と は を な い 。 


シス テム の 標準 処置 : オン ・ ユ ニッ ト が 与 * ら れ て いな い 場 合 , 
シス テム は メッ セー ジ を 印刷 し , ERROR 条 件 を 引き 起す 。 


状況 : RECORD は つね 解禁 状態 CK あり , これ を 禁止 状態 
置く と と は で き な い 。 


正常 戻り : オン ・ ユ ニッ ト が 正常 な 状態 で 完了 する と , 
RECORD 条件 を 引き 起 し た ステ ー ト メン ト の 直後 の ステ ー ト メン 
ト か ら 実 行 が 続行 され る ( また は , EVENT オ プシ ョ ン を も つつ 入 出 
カス テー トメ ント C よ っ て RECORD が 引き 起 さ れ た 場合 た は , オ 
ン ・ ユ ニッ ト を 呼び 出し た WATT ス テー トメ ント 制御 が 戻る )。 


注 : と の 条件 の た め の オ ン ・ ユ ニット の 中 で ファ イル が 閉じ られ 
た 場合 , 正常 た 戻り の 後 ど の よう な 処置 が と られ る か は わか ら な い 。 
と の 種 の オン ・ ユ ニッ ト で は , GO TO ステ ー ト メン ト (C よ っ て オ 
ン ・ ユ ニッ ト の 外 制 御 を 渡す べき で ある 。 


S 1 の E 計 算 


説明 : 変数 を いし 中 間 結 果 へ の 割当 て の 際 , また は 入出 力 操作 を 


行なっ て いる 間 (c 2 進数 を いし 1 0 進数 の 最高 位 の ( 左端 の ) 有効 
数 字 が 和 失わ れ た 場合 に だ け , STIZE 条件 が 引き 起 さ れる 。 異な る 
デー タ ・ タ イズ プ , 異な を る 基数 , 異な る スケ ー ル , また は 異 み る 精度 
が 関係 する 変換 が 行 を われ る と き に , と の ょ 29 う 最高 位 の 有 迷 数 字 
が 失わ れる と と が ある 。 


S 1 ZE 条 件 と FIXEDOVEREFLOW 条 件 と の 相違 は , 計算 され 
た 固定 小数 点数 値 の 大 き さ が 当 コ ン バ イ ラー に お いて 許さ れ て いる 
最大 値 を 越 を た と き (C, FIXEDOVERFLOW 条件 が 引き 起 され 
る の 対し て , S1ZE 条 件 の 場合 は , ある デー タ 項 目 ( 割り 当て 
られ る 値 の 大 き さ が その デー タ 項 目 に つい て 宣言 され て いる (また 
は 省略 時 の ) 大 き さ を 越え を た と き (C 引 き 起 され る と いう 点 で ある 
(FIXEDOVERFLOW 条 件 ic 関し て は , と の 条件 の 項 を 参照 さ 
れ た い ) 。 あ る 値 を 割り 当て る 際 iC SIZE 条 件 が 引き 起 さ れる か 
と どう か は , その 値 を 計算 し た と き (CFTIXEDOVERFLOW 条件 が 
起 っ た か どら か , と いう と と と は 無関係 で ある 。 


ヘー ン 


ヘー 一 


ある デー タ 項 目 C つ いて 宣言 され て いる 大 き さ は , 必ず し も その 
項目 が 記憶 域 の 中 確保 し て いる 精度 で は を ない 。 しかし, SIZE 
条件 が 引き 起 さ れる 基準 と を る 限界 は , 宣言 され て いる 大 き さ ま た 
は 省略 時 の 大 き さ で あっ て , 記憶 域 (C お ける 実際 の 大 き さ で は な い 。 
た と えば , 精度 が (20 ) の 固定 小数 点 2 進数 項目 は , 記憶 域 の 中 で 
は 1 フル ワー ド を 占め る が , FIXED BINARY(20) を 越え る 大 
き さ の 値 が と の 項目 割り 当て られ る と , SIZE 条件 が 引き 起 さ 
れる 。 


結果 : 大 き さ が 適当 で を い 値 の 受取 り 側 デ ー タ 項目 の 内 容 は , と 
2 を る か わか ら な を い 。 


シス テム の 標準 処置 : オン ・ ユ ニッ ト が 与え を られ て いな い 場 合 , 
シス テム は メッ セー ジ を 印刷 し , ERROR 条 件 を 引き 起す 。 


状況 : SIZE が 指定 され て いる 条件 接頭 語 の 有効 範囲 を 除い て , 
プロ グラ ム の 実行 中 は , NOSIZE 条 件 接頭 語 の 有効 範囲 お な よび 
その 他 の 範囲 に た な いて も , SIZE は 禁止 状態 た ある 。 


正常 た 戻り : と の 条件 の た め の オ ン ・ ユ ニッ ト が 正常 み 形 で 終了 
する と , 割込み の 発生 し た 場所 の 直後 制御 が 戻さ れる 。 


STRINGRANGE プロ グラ ム ・ チ ェ ッ クア ッ ウト 


省略 形 : STRG 


説明 : SUBSTR 参照 の 引数 の 長 さ が SUBSTR 組込み 関数 
の 項 (Cc 記述 され て いる 規則 合致 し を た いと と が ある と , その た び 
STRINGRANGE 条 件 が 引き 起 さ れる 。 と の 条件 は , と の ょ ら 
を SUBSTR 参照 が か ある た び (C 引 き 起 され る 。 


シス テム の 標準 処置 : メッ セー ジ が 印刷 され , 「 正 常 を た 戻り] の 
項 IC 記 述 さ れ て いる 処理 が 続行 され る 。 


状況 : ユー ザー の 側 で 特 < 指 定 し を い 限 り , STRINGRANGE 
は 禁止 状態 K あ る 。 また, NOSTRINGRANGE 条件 接頭 語 の 有 
効 箇 胃 に な いて も と の 条件 は 禁止 状態 な ある 。 STRINGRANGE 
条件 接頭 語 の 有効 範囲 の 中 で だ け , と の 条件 は 解禁 状態 叔 か れる 。 


正常 戻り : オン ・ ユ ニッ ト か ら の 正常 な 戻り の 人 後 , 町 正 さ れ た 
SUBSTR 参 照 の 実行 が 続行 さん る 。 と の SUBSTR 参照 の 値 
は , 次 の よう KK 定義 され る 。 


(オン ・ ユ ニット が 与え られ て いる 場合 に は , その 実行 の 後 の ) 
原 ス トリ ング の 長 さ が k, 開始 点 が i, サブ プ ス トリ ング の 長 さ が j 
で ある と すれ ば ぱげ, 


和 i が k よ り 大 きい 場合 , 値 は ナル ・ ス トリ ング で ある 。 


2. i が kc 等 し いか k よ り 小 さい 場合 , 値 は , 原 ス トリ ング 
の m 番 目 の 文字 きた は ビッ ト か ら 始 まる , n 個 の 文字 また 
は ビ ピット を 含む ササ プス トリ ング で ある 。 と と で , m と n は 


次 の ょ よう 定義 され る 。 
mMAX( i, 1 ) 


n 三 MAX(0 ,MIN(j+TMIN(i,1)-1, 
k-m+ す 1)) 
[ j が 指定 され て いる 場合 〕 


nk-m 二 1 
し j が 指定 され て いな を い 場 合 〕 


以上 の よら に し て , 新しい 引数 は , 強い て 限界 内 (収め られ る わけ 
で ある 。 


i と j の 値 は オン ・ ユ ニッ ト K 入 る 前 (C 計 算 さ れる だ け で あり , 
オン ・ ユ ニッ ト か ら 戻 っ た 後 と れ ら の 値 が 再度 計算 され る と と は な 
いい o 


SUBSTR の 最初 の 引数 が 長 さ の 変わ る スト リン グ で ある 場合 
(C は , オン ・ ユ ニッ ト の 中 で k の 値 が 変化 する と と が ある 。 値 n は, 
オン ・ ユ ニッ ト か ら 戻 っ た 後 k の 新しい 値 を 使っ て 計算 され る 。 


STRINGSIZE プロ グラ ム ・ チ ェ ッ クア プ ウ ト 


省略 形 : STRZ 

説明 : STRINGSIZE 条 件 は , ある スト リン グ が それ より 短い 
スト リン グ 底 割り 当て られ た と き ( 引 き 起 され る 。 と の 場合 , 目標 
スト リン グ K 原 スト リン グ を 収容 する と と が で きる と うた , 原 ス ト 
リン グ の 右端 の 方 の 娘 字 を いし ピット が 切り 捨て られ る 。 


結果 : 切捨て が 行なわ れ た 後 の ス トリ ング が , その 目標 スト リン 
グ K 割 り 当 て られ る 。 
シス テム の 標準 処置 : メッ セー ジ が 印刷 され , 処理 が 続行 され る 。 
状況 ユー ザー の 側 で 特に 指定 し な い 限 り , STRINGSIZE は 
禁止 状態 KC ある 。 また , NOSTRTINGS I ZE 条件 接頭 語 の 有効 範 


囲 に な いて も と の 条件 は 禁止 状態 KC ある 。 STRINGSI ZE 条 件 接 
頭 語 の 有効 範 胃 の 中 で だ け , と の 条件 は 解禁 状態 < 賀 か れる 。 


正常 み 戻 り : オン ・ ユ ニッ ト か ら の 正常 た 戻り の 後 , と の 割当 て 
の 直後 の 場所 か ら 実 行 が 続行 され る 。 
SUBSCRIPTRANGE プロ グラ ム ・ チ ェ ッ クア ウト 
省略 形 : SUBRG 

説明 : 添字 の 値 を 計算 し た 結果 . その 値 が と の 砂 字 の 指定 され て 
いる 限界 の 外 に ある と と が わか る と , SUBSCRIPTRANGE が 9 引 
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き 起 され る 可能 性 が ある 。 ま た , iSUB の 添字 が 1iSUB 定義 の 
配列 の 宣言 で 与え を られ て いる 範囲 の 外 に ある と き (C も , この 条件 が 
引き 起 さ れ る 。 他 の 添字 の 評価 と の 間 で 相対 的 に みて , 
SUBSCRTIPTRANGE が 引き 起 さ れる 順序 は , 定義 で き を い 。 


結果 : SUBSCRIPTRANGE が 引き 起 さ れ た 場合 。 有効 で を い 
活字 の 値 は 定義 で き を な い , し た が っ て , その 参照 の 結果 が どう な る か 
も わか ら な い 。 


シス テム の 標準 処置 : オン ・ ユ ニッ ト が 与え を られ て いな い 場 合 , 
ジス テム は サメ ッ セ ー ジ を 印刷 し , ERROR 条件 を 引き 起す 。 


状況 : SUBSCRIPTRANGE は , ユー ザー の 側 で 何 も 指定 し を 
いと 禁止 状態 し を る 。 また, NOSUB SCRIPTRANGE 条件 接頭 
語 有効 範囲 に た な いて も , と の 条件 は 禁止 状態 に と ある 。 
SUBSCRIPTRANGE 条 件 接頭 語 の 有効 範囲 た お な いて の 信 , この 
条件 は 解禁 状態 C 思 か れる 。 

正常 た 戻り: SUBSCRIPTRANGE オ ン ・ ュ ユニ ッ ト か ら の 正常 
な 戻り の 後 , RROR 条 件 が 引き 起 され る 。 


TRANSMI T (要素 ファ イル 式 ) 火 、 


説明 : 入出 力 操作 を 行なっ て いる と き ( て は それ が どの よう な タイ 
プ の 入出 力 操作 で あっ て も , TRANSMIT 条件 が 引き 起 さ れる 可 
能 性 が ある 。 と の 条件 は , 永続 的 転送 テラ ー に よっ て 引き 起 され 
る 。 し た が っ て , これ は 転送 され た デー タ が 誤っ て いる 可能 性 の あ 
る と と を 表わし て いる 。 


入力 の 際 は , 誤り が ある 可能 性 の ある レコ ー ド を 割り 当て た 後 
で TRANSMIT 条件 が 引き 起 さ れる 。 レ コー ド が ブロ ッ ク 化 され 
て いる 場合 。 と の ブロ ッ ク の 中 の と れ よ り 後 CC あ る レコ ー ド 各々 
つい て TRANSMIT 条件 が 引き 起 さ れる 。 出力 の 際 (C は , 誤り が あ 
る 可能 凡 の ある デー タ 項 目 を 転送 し た 後 で TRANSMI T 条件 が 引 
き 起 され る 。 レ コー ド が ブロ ッ ク 化 され て いる 場合 は , ブロ ッ ク が 
一 杯 CC を な っ た と き K 転 送 が 行 を われ る 。 出力 ステ ー ト メン ト の 後 で 
各々 転送 が 行なわ れ る わけ で は な い 。 


EVENT オ プシ ョ ン を 使用 し て いる 入出 力 ス テー トメ ント よっ 
て TRANSMIT が 引き 起 さ れ た た 場合 は , と の 後 同じ プロ シー ジャ 
ー の 中 で その 事象 を 対象 と する WA 1 T ス テー トメ ント が 実行 され 
る まで , 割込み は 起 ら を い 。 


シス テム の 標準 処置 : オン ・ ュ ユニット が 与え られ て いな を ない) 場合 , 
シス テム は メッ セー ジ を 印刷 し , ERROR 条 件 を 引き 起す 。 


状況 : TRANSMIT は つね K& 人 解禁 状態 KK あり, と れ を 禁止 状態 
て 置く と と は で き な い 。 
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正常 戻り : オン ・ ユ ニッ ト が 正常 な 状態 で 完了 する と , エラ ー 
が 発生 し な か っ た か の ょ う K 処 理 が 続行 され , TRANSMIT 条件 
を 引き 起す 原因 と を な っ た デー タ 項 目 の ス テー トメ ント よっ て 他 の 
条件 (た と えば , RECORD ) を 引き 起す と と も 可能 に な る 。 

( EVENT ォ プシ ョ ン を $ つ 入出 力 ス テー トメ ント iC よ っ て 
TRANSMIT が 引き 起 さ れ た 場合 に は , オン ・ ユ ニッ ト を 呼び 出 
じ た WAIT ステ ー ト メン ト 制 御 が 戻さ れる 。 ) 


注 : と の 条件 の た め の オ ン ・ ユ ニッ ト の 中 で ファ イル が 閉じ られ 
た 場合 , 正常 戻り の 後 ど の ょ うな 処置 が と られ る か は 定義 で き な 
い 。 と の 種 の オン ・ ユ ニッ ト の 中 で は , オン ・ ユ ニッ ト の 外 制 御 
を 渡す と き は , GO TO ステ ー ト メン ト を 使用 すべ き で ある 。 


UNDEFINEDFILE( 要素 ファ イル 式 ) た 。 肖 - 


省略 形 : UNDF (要素 ファ イル 式 ) 

説明 : ファ イル を 開 こ うと し て 失敗 し た と き は つね に , 
UNDEFINEDFILE 条件 が 引き 起 さ れる 。 2 つ 以 上 の ファ イル 
名 を 指定 し て いる OPEN ステ ー ト メン ト に よっ て 開 こ と うと し た 場 
合 は , その ステ ー ト メン ト で 指定 され て いる 他 の ファ イル を 開 と 9 
と する 試み が すべ て 行 を われ た 後 で UNDEFINEDFILE 条件 が 
引き 起 さ れる 。 同一 の OPEN ステ ー ト メン ト お いて 2 つ 以 上 の フ 
ァイル KC 関 し て と の 条件 が 引き 起 さ れ た 場合 は , その OPEN ステ 
ー ト メン ト の 中 で ファ イル 名 が 並ん で いる 順 (C ( 左 か ら 右 (C 向 か っ 
て ) オン ・ ユ ニッ ト が 実行 され る 。 


EVENT オ プシ ョ ン を も た な い \ 入 出力 ステ ー ト メン ト の 中 で 暗示 
的 ファ イル を 開く と と (よっ て , と の 条件 が 引き 起 さ れ た 場合 は , 
オン ・ ユ ニッ ト か ら 正 常 C 戻 っ た あと で , 割込み を 引き 起こ し た 入 
出力 ステ ー ト メン ト の 残り の 部 分 の 処 理 が 続行 され る 。 オン ・ ュ ユニ 
ッ ト (C て な いて と の ファ イル が 開か れ を か っ た 場合 に は , この 入出 力 
ステ ー ト メン ト の 実行 を 続け る と と が で きず , と の た め ERROR 条 
件 が 引き 起 さ れる 。 


EVENT オプ ショ ン を $ つ 入出 力 ス テー トメ ント の 中 で 暗示 的 
(CC ファ イル を 開く こと に よっ て , と の 条件 が 引き 起 さ れ た 場合 は , 
と の 事象 変数 が 初期 設定 され る 前 < 割込み が 起こ と る 。 い いか えれ ば , 
と の 事象 変数 は 前 の 値 を 保持 し て ぉ り , 非 活用 状態 た と ど ま っ て い 
る 。 オ ン ・ ユ ニッ ト か ら 正 常に 戻っ た 後 , と の 事象 変数 が 初期 設定 
され る 。 つま り , と の 変数 は 活用 状態 に を なり, その 完了 値 が '0' 
B(C て セッ ト さ れる 。 た だ し , こと これ は オン ・ ユ ニッ ト の 中 で ファ イル 
が 開か れ た 場合 で ある 。 こと の 後 , 割り 込ま れ た を ステー トメ ント の 残 
り の 部 分 の 処理 が 続行 され る 。 オ ン ・ ユ ニッ ト の 中 で ファ イル が 開 
か れ な か っ た 場合 C は , 事象 変数 の 初期 設定 は 行なわ れ を い の で , 
ステ ー ト メン ト の 実行 を 続け る と と が で き な い 。 と の た め , と の 場 
合 C は ERROR 条 件 が 引き 起 さ れる 。 


と の コン バイ ラー で は , た と えば , 次 の ょ うな 場合 
UNDEFINEDFILE 条件 が 引き 起 さ れる 。 


1. ENVIRONMENT オ プシ ョ ン の いく つか が 矛盾 し て い 
る か , 誤っ た オプ ショ ン が ある 。 


の VSAM デー タ ・ モ ッ ト を 開く と き CVSAM に よっ て エ 
ラー が 検出 され た 。 


シス テム の 標準 処置 : オン ・ ユ ニッ ト が 与え を られ て いな い 場 合 , 
シス テム は メッ セー ジ を 印刷 し , ERROR 条件 を 引き 起す 。 


状況 : UNDEFINEDFILE は つね 解禁 状態 た あり , これ を 


禁止 状態 置く と と は で き な い 。 


正常 な 戻り : 最後 の オン ・ ユ ニッ ト が 正常 な 状態 で 完了 し た 後 , 


と の 条件 を 引き 起こ す 原 因 と を な っ た ステ ー ト メン ト の 直後 の ステ ー 
トメ ント 制御 が 与え られ る (暗示 的 を 開放 の 場合 と と られ る 処置 
て つい て は , 「 説 明 」 の 項 を 参照 の と と )。 


池 
ー ビ 
二 


UNDERFLOW 


省略 形 : UFL 


説明 : 浮動 小数 点数 の 大 き さ が 許容 最小 値 よ り 小 さい と , 


UNDERFLOW 条件 が 引き 起 さ れる 。 (シス テム 3 6 0 お よ 
び シ ステ ム ブ 3 7 0(C お な いて は , ゼロ で な い 涯 動 小 数 点数 値 は , 約 
10~-78 すなわち も 2-2⑳9 より 小さ いも の で あっ て は な ら な を い 。 ) 


同じ 数 を 減算 し て も る UNDERFLOW は 引き 起 さ れ な い ( と れ は , 
有効 数 字 ェ ラー と 呼ば れる と と が 多い ) 。 


式 X* ネ *※ (一 Y) (と と で , Y ツ 0 ) の 値 を 計算 する と き C け は , 
XX ネネ Y の 逆数 を と る と と (て よっ て 計算 する とこ と が で きる 点 C 注 意 
され た い 。 と の た め , UNDERFLOW 条 件 で は を なく, OVERFLOW 
条件 が 引き 起 さ れる こと が ある 。 


結果 : 有効 で を ぃ い 消 動 小数 点数 値 が ぞ ロ に セッ ト さ れる 。 

シス テム の 標準 処置 : オン ・ ユ ニッ ト が 与え られ て いな い 場 合 , 
シス テム は メッ セー ジ を 印刷 し , 割込み が 発生 し た 場所 か ら 実 行 を 
続行 する 。 

状況 : NOUNDERFLOW が 指定 され て いる 条件 接頭 義 の 有効 
範囲 を 除い て , プロ グラ ム を 実行 し て いる 間 中 , UNDERFLOW は 
解禁 状態 た ある 。 

正常 な 戻り: と の 条件 の た め の オ ン ・ ユ ニッ ト が 正常 み 形 で 終了 
する と , 割込み が 発生 し た 場所 の 直後 て 制御 が 戻さ れ る 。 
ZPRODI VIDE 還 算 
省略 形 : ZDIV 

説明 : ゼロ で 割 ろ うと する と , ZERODI VIDE 条 件 が 引き 起 さ 
れる 。 固定 小数 点数 除算 の 場合 に も, 肖 動 小数 点数 除算 の 場合 (C も , 
と の 条件 が 引き 起 さ れる 。 


結果 : ゼロ KC ょ る 除算 の 結果 は わか ら な い 。 


シス テム の 標準 処置 : オン ・ ユ ニッ ト が 与え られ て いな い 場 合 , 
シス テム は メッ セー ジ を 印刷 し , ERROR 条 件 を 引き 起す 。 


状況 NOZERODTIVIDE が 指定 され て いる 条件 接頭 語 の 有 


効 重 囲 を 除い て , プログラム を 実行 し て いる 間 中 ZERODIVIDE 
は 解 松 状態 に C あ る 。 


正常 な 戻り : と の 条件 の た め の オ ン ・ ュ ユニ ッ ト が 正常 な 形 で 終了 
する と , 割込み が 発生 し た 場所 の 直後 制御 が 戻さ れる 。 
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I 節 : 必 性 


本 節 は , すべ て の 属性 つい て の 詳細 説明 を アル ファ ベッ ト 順 
C 収 録 し た も の で ある 。 択 一 的 属性 は 一 個所 に C に まとめ て 説明 する 。 


図 [ . 1 は 属性 ic 関す る 個々 の 規則 を も と (C し て まとめ た も の で 
あり , 以下 の 事柄 の 「 早 見 表 ] と し て 使え る よう 工夫 し て ある 。 


1. 属性 の デー タ ・ タ イプ ズブ 別 分 類 。 


6 ある 1 つの デー タ 項 目 (c 適 用 する と と が で きる 属性 の 有効 
を 組合 せ 。 


変数 (< 関し て は , デー タ 必 性 , 有効 範囲 属性 , 記憶 域 属性 , 
境界 合せ 属性 の 欄 か ら 属 性 を 選び 出さ な けれ ば な を ら な い 。 表 
iC 示 され て いる タイ プ の 定数 (C 関 し て は , デー タ 属 性 お よ 
び 有 効 範囲 属性 の 欄 か ら 属 性 を 選び 出さ を な けれ ば を ら な い 。 
ある 1 つの デー タ 項 目 !c 適 用 され る 全 属 性 は , 明示 宣言 ま 
た は 文脈 宜 言 ,. な よ 上 び プロ グラ マー の 定義 に を る 省略 時 属 
性 ま た は 標準 省略 時 属性 か ら 得 られ る と と 注意 し て いた 
だ きた い 。 


3. 互い 両立 し を い 必 性 。 


ある 1 つの デー タ ・ タ イプ 適用 され る も の と し て 示さ れ 
て いる 属性 は , 他 の デー タ ・ タ イプ 適用 され る 届 性 と は 
両立 し な い 。 を た だ し , 2 つの デー タ ・ タ イプ 適用 され る 
も の と し て 示さ れ て いる 属性 は と の 限り で を い 。 あ る 1 つ 
の デー タ ・ タ イプ の 中 で の 択 一 的 属性 (た と を えば, BIT 
と CHARACTER ) も 両立 し を い 。 


例 を 用 いて と の 図 の 使い 方 を 説明 し ょ ら 。 
DRECLAREB ST BIT(10): 
と の ょ う 諾 宣言 が 与 を られ て いる と , ST と いう 名 前 に は , 標準 省 


踏 時 属性 で ある AUTOMATIC, INTERNAL, 
UNALIGNED が 適用 され る 。 


以下 の 注 は , 図 I .1 の 注 1, 注 2, 注 3K 対 応 す る も る の で ある 。 


1 暗示 的 ic 宣言 され て いる 識別 名 ( または, 有効 範 因 属 性 , 記憶 
域 属性 ,。 な いし 境界 合せ 属性 だ けが 明示 的 (と 宣言 され て いる 識別 
名 ) は , 算術 変数 で ある と みな され る 。 と の 議 別 名 の 頭 娘 字 が 
I か ら N の 間 の 字 で ある 場合 , 標準 省略 時 搬性 は , FIXED 
BINARY (15,0) で ある 。 と れ 以 外 の すべ て の 場合 に は , 
標準 省略 時 属性 は FLOAT DECIMAL (6) で ある 。 
BINARY , DECIMAL , RPAL , ま た は COMPLEBX と 指定 さ 
れ て いる 場合 iC は , 標準 省略 時 属性 は FLOAT で ある 。 と の ほほ 
か , ネス ケール 因数 C よっ て 精度 が 指定 され て いる 場合 C は , 標 
準 省 略 時 属 條 は FIXED で ある 。 


2. IRREDUCI BLE , REBDUCI BLE , RETURNS, ま た は 
OPTIONS は , ENTRY を 暗示 し て いる 。 を おち , 入口 定数 が 
バラ メー ター 属性 を も る つと と が ある 。 


3 ファ イル 属性 と , ENVIRONMPENT 属性 の オプ ショ ン と の 関 
係 は , 図 I .2 C 示 され て いる 。 な を お, ファ イル 定数 が バラ メ 
ー タ ーー 属性 を る つと と も で きる 。 


図 I.2 は , 図 I .1 の ファ イル 定数 関係 の 記入 事項 を 拡大 し た 
も の で あり , デー タ ・ セ ッ ト の 編成 メイ プ ど と (ファ イル 本 性 と 
ENVI RONMENT 属性 の オプ ショ ン と の 関係 が 示し て ある 。 また, 
この 図 (c は , 各々 の ファ イル 属性 が どの よう な 属性 を 暗 志 し て いる か 
と いら と と も ゃ も 示さ れ て いる 。 


MPEDIUM オプ ショ ン (C つ いて は , 「 第 10 章 : 入力 と 出力 ] 
で 説明 され て い る 。 と れ 以 外 の オォ オプ ショ ン に つい て は , 「 第 1 1 章 

ストリーム 方 式 の 転送 ] な よび 「 第 12 章 : レコ ー ド 方式 転 
送 ] で 説明 され て いる 。 
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BITICHARACTER 
に. 選 半 人 き .) ) 


1 
[VARYINY〕 


EXTERNAL 


AUTOMATIC, 
BASED, 
DEF INED, 
パラ メー ター 
(て 関し て は 標準 省略 
時 属性 は 
TNTERNATL,。 で あり , 
必須 の も の で ある 。 
CONTROLLED 
STATIC 
(関し て は 標準 省略 


Ne 
PICTURE ! 


ファ イル 変数 」 FILE [VARIABLE〕 


[RETURNS〕 [OPTIONS〕 
[VARIABLE ) 


が POINTER| {OFFSET 
ケー ター 全数 て (エリ テ 多 数) ) ) 


AREA〔 (サイ ズ ) 〕 


事 象 変 数 | EVENT 


FILE ENVIRONMENT 
STREAM| RPCORD 
INPUTIOUTPUTIUPDATE 
SEQUENTIALIDIRECT | 
TRANST RANT 

BUFFERED| UNBUFTFERED 
KEYED BACKWARDS 
PRINT _ EXCLUSIVE 


(VARIABLE を 除き , 


総称 入口 定数 | GENERIC 


{ INTERNAL } 
( EXTERNAL } 


INTERNAL 


条 件 定 数 | CONDITION { INTERNAL ! 


(EXTERNAL ) 


下線 は 標準 省略 時 属性 を 示し て いる 。 注 つい て は , 前 ペー ジ を 参照 の と と 。 


図 【.・1 属性 の デー タ ・ タ イプ ズブ 別 分 類 
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記載 域 ク ラス : 


AUTOMATIC 
STATIC 


INTERNAL の 場合 (Cc は 
AUTOMATIC が , 
EXTERNAL の 場合 に は 
STATIC が , それ ぞ れ 
標準 省略 時 属性 で ある 。 


[INITIAL 〕 
定義 ・ 
単純 パラ メー ター ・ 
バラ メシ グー 


相 制 御 バ パラ メータ ー : 
パラ メー ター 


HN 


境界 合せ 属性 


{ALIGNED ) 
{UNALIGNED! 


{ALIGNED ! 
{ UNALIGNED ! 


BASED 
CONTROLLED 


{ALIGNED ! 
{ UNALIGNpD ) 


DEF INED 
POSITION〕 


LCONNECTED〕 


ALIGNED 


CONTROLLED 
INI TIAL]〕 


集合 体 変数 


配列 : 変数 の 宣言 < (次 元 ) を 追加 する と と が で きる 。 


造 : 構造 の 中 の 名 前 (対し て 指定 で きる 属性 は , その 


前 が 宣言 され て いる レベ ル iC よ っ て 異な る 。 


1. 大 構造 名 の 場合 太 は , デー タ ・ タ イプ を 与え る と 
と が で き な い 。 
L IKE 属性 は , 指定 する と と が で きる 。 


2. 小 構造 名 の 場合 に は , デー タ ・ タ イプ , 有効 範囲 


属性 , お な ょ び ひび 記憶 域 属性 を 与え を る と と が で き な い 。 
L I KE 属 性 は 指定 する と と が で き る 。 


> 要素 名 の 場合 に は , 有効 範囲 属性 な ょ び 記 憶 域 悦 
性 を 与え を る こと が で き な い 。 


RECORD 


SEQUENTIAL IDIRECT 凡例 : 
デー タク ・ エ セッ ト 編 成 の タイ プ EN 1 属性 を 指定 する か , 暗示 し を けれ ば な たら な い 。 


D 省略 時 属性 
O 必要 場合 に の み 指定 する 任意 選択 属性 。 
S 属性 を 指定 し な けれ ば を ら な い 。 

有効 で を い 届 性 。 


適用 され る 履 人 性 


加 マ ロ ロロ ピピ の 〇 回 の ど 羽 CO 


ピピ ゥ ロロ の 回 加 
ピピ ゥ ロロ の 円 避 


ピ ビ ビ pp ジロ 6 回 避 


胎 と 回 婦 円 の 
ウ ワ 回 選 加 ロロ 


暗示 され る 属性 


F BACKWARDS se ドル 介 川 下り テ FILE RECORD SEQUENTTAL INPUT 
I BUFFERED 生ま あ 届 剖 放 : 計 中 完全 ご FILE RECORD SEQUENTIAL 
L DIRECT 地 4 本 * 省 容 写 第 大 由 三 S S FILE RECORD KEYED 
E ENVI RONMENT I S S S S S S S FILE 
FILE 1 1 I I I 1 1 1 
ん INPUT D [DTDIDIDIDI DD F ILE 
6 KEYED テー 【『 き 性 | な | デ | 人 I I FILE RECORD 
MR OUTPUT 0 10 10101010| -| O FILE 
R PRINT 5 6 SED 5 FILE STREAM OUTPUT 
1 RECORD 1 I I I + F ILE 
B SEQUENTTAL 5 か め | 届 立科 | = ビ FILE RECORD 
U STREAM 前 川 寺町 富川 還 の 寺川 末 具 二川 学 FILE 
6 UNBUFFERED Sel S 9 に SS 人 FILE RECORD SEQUENT TI AL 
E UPDATE デル 0 | で 1O の | 1O| ひび | @ FILE RECORD 
S 


テー プ ブ ・ フ ァイル の 場合 に は UPDATE は 有効 で を な い 。 
BACKWARDS は テー プ ・ フ ァイル の 場合 C の み 有 効 で ある 。 
INDEXED 出 力む お よび REG IONAL 出力 の 場合 に は , KEYED を 指定 し を な けれ ば な を ならない 。 


に 2 の 1.9 


岬 
忠 


図 』 .2 ファ イル 
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RECORD 
SEQUENTIAL IDIRECT 


凡例 : 
T オプション を 指定 する か 暗示 する か 
し を けれ ば な を なら な い 。 
D 省略 時 オォ オプション 。 
O 任意 選択 の オォ プション: 
必要 場合 に の み 指 定 する 。 
S オプ ショ ン を 指定 し な けれ ば な ら な い 。 


有効 で を な い オ プン ショ ジ o 


デー タ ・ モ セッ ト 編 成 の タイ ブ 


〇 ① 


該当 する オォ プション 


加 マ ロロ ご ピピ 〇 回ら ど 己 OO 
四 マ ロロ ピピ 〇 思 の 志 OO 


ビ ゥ ぁ ゅ ご ロロ の 所 
"pg み 己 OO ロ の 円 加 


1 の 
どど 1 の どの ど 1 ロト O 〇 ど 1 1 の | らら の どら の の OO の 1 1 1 1 1 の ロロ 1O 〇 FT ロロ OO ワ 如 詞 回 ワー 


"ぁみ ジ CC ロロ の 回 如 


ADDBUFF(n ) 
ASC1I 1 
BLKSIZE(n) 
BUFFERS({1121) 
BUFOFF〔 (n ) 〕 
COBOL 
CONSECUT1 VE 
CTLASAICTL360 
EXTENTNUMBER(n ) 
FIFB 
FIFBIDIDBIU 
FIFBIVIVBIU 
FIU 

FUNCTION 
GENKEY 
HIGHINDEX( n ) 
INDEXAREA( n ) 
INDEXED 
INDEXMULTIPLE 
KEYLENG TH(n ) 
KEYLOC(n) 

LEAVE 

MEDIUM 

NOLABEL 
NOTAPEMK 
NOWRI TE 
OFLTRACKS(n ) 
RPCSIZE(n) 
REGIONAL( {1,3}) 
SCALARVARYING 
UNLOAD 
VERIFY 


1| 〇 ロ らら のど は ロロ 〇 Il 


ヨン 回 区 ご 〇 ロロ マン ロロ 


1 の 〇 1 の の | 
| 


mv 和 革 


| の | 


N 


1 の 1 〇 の の どの ひひ 〇 O 〇 CO ! 


〇 | 〇 1 ロ O 〇 Il 
〇 の | 〇 ムロ lI 


CONSECUTIVE, INDEXED , お よび REGTONAL の ファ イル と 対し て は , BLKSIZE ま た は RECSTIZE の どちら か , また は と 
の 双方 を 指定 し な けれ ば な を ならない 。 
F,FB,D,DB,U は ASCII デ ー タ ・ モ セッ ト K 対 し て の み 有 効 で ある 。 
CTLASAZCTL360 は ASCTI TI デ ー タ ・ セ モット 対し て は 有効 で を い 。 
KEYLENGTH(n ) は REGIONAL( 1 ) フ ァイル 対し て は 有効 で な い 。 
REGIONAL(1) フ ァイル K 対 し て は FF だ けが 有効 で ある 。 
NOWRITE は UPDATE ファ イル 対し て の み 有 効 で ある 。 

GENKEY は INPUT また は UPDATE フ ァイル に KC 対し て の み 有 効 で ある 。 


図 T .2 ファ イル 宣言 ( 2 の 2 ) 


いひ の た の い 


と の 場合 , KRYED が 必要 で ある 。 
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ALIGNED と UNALIGNED 


省略 形 : UNALIGNEDK 対 し て は UNAL 

ALIGNED 属性 と UNALIGNPED 属性 と は , それ ぞ れ ア 
クセ ス 速 度 を 上 げた り , 記憶 域 を 節約 し た りす る 日 的 で , 記憶 域 と 
お ける デー タ 有 要素 の 位置 設定 を 指定 する た め の も の で ある 。 要素 変 
数 , 配列 変数 , また は 構造 変数 CK これら の 属性 を 与え る と と が で き 
る 。 


ALIGNDPD は , デー タ 要 素 を その デー タ ・ タ イプ の 要件 c 対 選 す る 記 
憶 域 境界 揃え る よう 指定 する た め の も の で ある 。 


UNALIGNED は , ビッ ト ・ ス トリ ング の 場合 は , 次 使用 可能 
な ビッ ト 境 界 に マッ プ し , また , ハー フワ ー ド 項目 ワー ド 項 且 
を いし ダブ プル ワー ド 項 目 の 場合 は 次 (c 使用 可能 を バイト 境界 に マッ 
プ す る よら 指定 する た め の も の で ある 。 


一 般 形 式 : 
ALIGNED]UNALIGNED 
一 般 規 則 : 


1. ALIGNED 属 性 と UNALIGNED 属性 は , 本 来 要 素 デ 
ー タ の 属性 で ある が , 任意 の 配列 お よび 構造 に これ ら の 必 
性 を 適用 する こと も で きる 。 配列 を いし 構造 この いずれ 
か の 属性 を 適用 する と いう と と は , その 中 (含ま れ て いる 
要素 の らち , ALIGNED 履 性 また は UNAL TIGNED 
属性 が 明示 的 ic 官 言 され ん てい を いす べ て の 要素 に と の 属性 
を 適用 する と と と 同じ で ある 。 


の ある 構造 が 配列 を いし 他 の 構造 を 含ん で いる 場合 に, 含ま 
れ て いる 配列 を いし 構造 ALIGNED また は 
UNALIGNED の いずれ か の 属性 が 適用 され る と , と の 
属性 が 活か され , と の 配列 を いし 構造 に 適用 され る は ず で 
あっ た , 含ん で いる 構造 の ALIGNED 属 性 また は , 
UNALIGNED 属性 は 無効 に な る 。 


る L {IKE 構造 変数 の 場合 は , その 含ま れ て いる 要素 
ALIGNED 属 性 む ょ よび UNALIGNED 属 性 が 適用 さ 
れる 前 (C, LIKE 属性 が 展開 され る 。L 1 KE 構 造 変数 
か ら と られ る ALIGNED 属性 な む な よ び UNALIGNED 
属性 は , その 構造 変数 の 小 構造 ぉ ょ ぴ 要 素 (< 対し て 明示 的 
指定 さ れ て いる も の だ け で ある 。 


4. ビッ ト ・ ク ラス ・ デ ー タ お よび 文字 クラ ス ・ デ ー タ が 関係 
し て いる オー バー レー 定義 づけ c ぉ ふい て は , 定義 され た 項 
日 $ 基 底 項 目 の オ ーー バー レー され る 部 分 も 共 K 
UNALIGNED で な を けれ ば な を なら な い 。 と れ 以 外 の すべ て 
の タイ ズブ の 定義 に な いて は , 同義 の 項目 は 共に 


ALTGNED で ある か , 共 CUNALIGNED で を けれ 
ば な ら な を な い 。 


実際 渡さ れる 引数 の ALIGNED 属 性 な む お よび 

UNAL IGNED 属 性 は , 対応 する パラ メー ター の 属性 と 一 
致し て いみ けれ ば を ら な を な い 。 も と な る 引数 の 属性 が 対応 す 
る パラ メー ター の 属性 と 合致 し て い を い 場 合 に は , 見 か け 
引数 が 作り 出さ れる 。 


の 


6. 基底 付 変数 が 他 の 変数 の ある 世代 を 参照 する の 使用 され 
て いる 場合 は , こと の 双方 の 変数 の ALTIGED 属 性 と 
UNALTIGNED 属 性 は 一 致し て い を けれ ば な を ならない 。 


カ スト リン グ ・ デ ー タ の 境界 合せ は , 与え られ て いる 
ALIGNED 属 性 ある い は UNAL TIGNED 属性 よっ て ィ て 左 
右 さ れる だ け で な く 〈, と の スト リン グ が 固定 長 で ある か 可 
変 長 で ある か に よっ て 左右 され る 。 図 K.1 ぉ ょ よび ぴ , 図 
K .2 多 , スト リン グ の 境界 合せ たつ いて の まとめ が 載っ て 
いる 。 


8. EVENT 属性 ある い は AREA 属性 を も つ デ ー タ K 
UNALIGNED 属性 を 与え ある と と は で き な い 。 


UNALIGNED 属性 を ゃ つつ 固定 長 ビ ッ ト ・ ス トリ ング が 
ADDR 関数 の 引数 と し て 使用 され て いる 場合 , また は , 
LOCATEB を いし ALLOCATE ス テー トメ ント の 中 で 使 
用 され て いる 基底 付 構造 の 最初 の 要素 と し て UNALIGNED 
属性 を も ゃ つ 固 定 長 ビ ッ ト ・ ス トリ ング が 使用 され て いる 場 
合 は , 返さ れ た ロケ ー タ ー 値 が その ビッ ト ・ ス トリ ング の 
最初 の ビッ ト 位 置 を 指し て い を いと と が ある 。 


省略 時 属性 : 


1. 省略 時 属性 は 要素 の レベ ル で 適用 され る 。 ピ ビット ・ ス トリ 
ング ・ デ ー タ , 文字 スト リン グ ・ デ ー タ , お よび 数 字 デ 
ー タ の 省略 時 属性 は UNAL IGNED で ある 。 と れ 以 外 の 
タイ プ ブ の デー タ の 省略 時 属性 は ,。 すべ て ALIGNED で あ 
る 。 


が すべ て の 洒 算 子 ,。 ぉ よび 組込み 関数 を ら び に ュー ザー 定義 
の 関数 に 関し て , その 結果 の 要素 に は 省略 時 属性 と し て 
ALIGNED また は UNAL TIGNED が 適用 され る 。 


3 定数 に は , ALIGED また は UNALIGNED の 省略 時 属 
性 が 適用 され る 。 


AREA 


AREA 属性 は , 割 振り を する 際 c, 基底 付 変数 の 割 振り の た め 
(確保 し て な くべ き 記 憶 域 を 定義 むす る た め の も の で ある 。 と の よら 
IC し て 確保 さ れ て いる 記憶 域 (と 関 し て は , ALLOCATE ステ ー ト 
メン ト お よび FREE ス テー トメ ント の IN オプ ショ ン で その エリ プア 変 
数 を 指名 する こと に ょ より, と れ を 基底 付 変 数 に 割り振る と と も , 
また これ を 基底 付 変数 か ら 解放 する と と も で きる 。 解放 され た 記憶 
域 を 再び 基底 付 変数 に 割り 振る と と も で きる 。 
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一 般 形式 : 定 する た め K 使 用 され る 。 


AREA ( (大 き さ ) 〕 > AUTOMATIC は , 記憶 域 宜 言 が その 内 部 ある プ ブロック を 入る 
た び KC 記 憶 域 を 割り 振る ょ よう 指定 する も の で ある 。 と の プ ブロック 
一 般 規 則 : か ら 外 iC 出る と , 記憶 域 は 解放 され る 。 と の ブロ ッ ク が 回 帰 的 に 呼 
び 出 され る プロシージャー で ある 場合 に は, と の ブロ ッ ク K 入 る と , 
1 確保 すべ き バ イト 数 を 指定 する 整数 値 を も つ 式 に よっ て , 先 ic 割 り 振 られ て いた 記憶 域 が 1 つの 層 ず つ 「 下 押下 げ ら れる 」。 
ェ エリア の 大 き さ を 与え る 。 また , 回 帰 的 プロ ンー ジャ ー の 各 世 代 が 終了 する を た びに, 最も 新 し 
< く 割り振ら れ た 記憶 域 が 「 上 ic 押上 げ ら れる 」 ( 積 重ね の 各層 の 
2. 静 的 記憶 域 ク ラス の エリ ア の 大 き さ を 指定 す る 場合 に は , 押上 げ と 押下 げに つい て は , 「 第 6 章 : プロ グラ ム の 構成 」 を 参 
1 0 進 整数 定数 で 指定 し な けれ ば な ら な い 。 理論 上 許さ れ 照 の と と ) 。 
る 最大 の 大 き さ は , 16,777 , 200 で ある 。 実際 は, 
上 限 は 使用 可能 を 記憶 域 の 大 き さ に よっ て 決ま る 。 STATIC は , 当該 ブ プログ ラム を ロー ド す る と き 放 憶 域 を 割り 振 
り , と の 後 プ ログ ラム の 実行 が 完了 する まで と の 旋 憶 域 を 解放 し な 
3 宣言 され て いる エリ ア 変 数 が 被 制御 変数 か パラ メー ター で い ょ りう 指定 する を た め の も の で ある 。 
ある 場合 C は , エリ ア の 大 き さ と し て 星 印 を 指定 する と と 
が で きる 。 星 印 が 指定 され て 宣言 され て いる 被 制御 エ リア CONTROLLED は , プロ グラ マー が ALLOCATE ステ ー ト メ 
変数 の 場合 は , と の エリ ア を 割り 振る た め ( て 用 いら れる ント お よび FREE ス テー トメ ント を 使っ て 記 憶 域 の 割 振り なら び K 
ALLOCATE ステ ー ト メン ト の 中 で エリ ア の 大 き さ を 指 解放 を 完全 (と 制御 する と と を 指定 する た め の も の で ある 。 同一 の 被 
定 し な けれ ば な ら な い 、。 星 印 が 指定 され て 宣言 され て いる 制御 変数 を ., 間 で 解放 せ ず kc 2 回 以上 続け て 割り 振る と ( 複数 割 
バラ メー ター の 場合 !C は , 引数 か ら ェ リア の 大 き さ が 引き 振り ), その 変数 の 各 世 代 が 積み 重ね られ る と と に な る 。 
継が れる 。 
BASED は , CONTROLLED と 同様 , ブロ グラ ャ ー の 側 で 記 
4. エリ ア ・ タ イブ の デー タ を 他 の タイ プ ブ K 変 換 す る と こと は で 憶 域 の 割 撫 り を た ら び KK 解放 を 完全 (制御 する と と を 指定 する た め の 
き な い 。 また , エリ ア は , エリ プア 変 数 (C※ し て し か 割り 当 も の で ある 。 ただし, と の 制御 方 法 は 多様 で ある 。 と の 点 (C つ いて 
て る と と が で き な い 。 は , 「 第 8 章 : 記憶 域 の 制御 ] で 説明 され て いる 。 複数 割 振り を 
行 を っ て も , 各 世 代 は 積み 重ね られ ず , いつ で も る 各 世 代 を 使用 する 
5. 演算 子 を ェ リ ア 変 数 適用 する と と は で き な い 。 と と が で きる 。 すなわち, ロケ ー タ ー 変 数 の 値 に た よっ て 特定 の 世代 


を 識別 する こと こと が で きる わけ で ある 。 
6. ェ リ プア 変数 K UNALIGNED 属 性 を 与え ん る と と は で き な を ない 。 


一 般 形 式 : 
ん ェ リ ア が BASED 属 性 を も ゃ つづ 場合 , 大 き さ の 属性 は 1 0 進 
整数 定数 で を けれ ば ならない 。 た だし, と の エリ ア が 基底 STATIC|AUTOMATIC| 
付 構造 の メン バー で あり , し か も る も REFER オプ ショ ン が 使 CONTROLLED | 
用 され て いる 場合 C は と の 限り で を な い (「 第 8 章 : 記憶 BASED〔 (要素 ロケ ー タ ー 式 ) 〕 
域 の 制御 」 を 参照 の と と ) 。 
一 般 規 則 : 
8. RECORD 入出 力 が 行 を われ て いる 場合 , エリ ア の エク 
ステ ント と 制御 情報 だ けが 転送 され る 。 1. 自動 変数 む ょ び 基底 付 変数 の 有効 範囲 は 内 部 の み で ある 。 
静 的 変数 な ょ び 被 制御 変数 の 有効 範囲 は 内 部 で も 外部 で も 
省略 時 属性 : よい 。 
1. 大 き さ が 指定 され て いな い 場 合 , 省略 時 の 大 き さ が と られ 2. 入口 定数 , ファ イル 定数 , 構造 の メン バー, お よび 
る 。 当 コン バイ ラー 関し て は , と の 省略 時 の 大 き さ は DEFINED デ ー タ 項目 に は , 記憶 域 タ ラス の 属性 を 与え 
1000 バ イト で ある 。 る と と が で き な い 。 
2. OFFSET 属性 また は IN オプ ショ ン の 中 に エリ プア 変数 が 3 バラ メー ター に K 対 し て は , 記憶 域 属性 CONTROLLED を 
ある と , と の エリ ア 変 数 は 文脈 宜 言 さ れ た と と に な る 。 明 ボ 宣言 する と と は で きる が , STATIC, BASED ま 


た は AUTOMATIC の 名 属性 は 宣言 する こと と は で き な い 。 
AUTOMATIC, STATIC , CONTROLLED , BASED 
4. 調節 可能 を 長 さと 次 元 を も つも の と し て 宣言 され て いる 変 
省略 形 : AUTOMATICK 対 し て は AUTO 数 KSTAT1IC 属 性 を 与 ん る と と は で き な い 。 
CONTROLLED 対し て は CTL 
構造 変数 に 関し て は , 大 構造 名 に 対し て だ け 記 憶 域 タ ラス 
記憶 域 ク ラス の 属性 は , デー タ 変 数 の 記憶 域 割 振り の タイ プ ブ を 指 の 属性 を 与え を る と と が で きる 。 大 構造 名 < 記憶 域 タ ラス の 


び ! 
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属性 を 与え る と , その 構造 の すべ て の 要素 ., また は 構造 の 
配列 全体 な と の 属性 が 適用 され る 。 

ある 構造 CONTROLLED 属 性 また は BASED 属 性 を 与 
えた 場合 は , プロ グラ マー の 側 で 割り 振っ た り 解 放し た り 
する と と が で き る の は 大 構造 だ な け で あり , 要素 の 割 振 りや 
解放 を する と と は で き な い 。 


基底 付 変数 を 使用 する と き は, 以下 の 規則 が 適用 され る 。 


a。 ある 基底 付 変 数 の 参照 を 完成 する た め (C ロ ケー ター 
値 が 必要 で ある が , ロケ ー タ ー 値 が 1 つも 明示 的 
指定 され て い を いと いう と き は つね た, 関連 する 
BASED 属 性 内 の ロ ョ ケー ター 式 の 値 が 使用 され る 。 
ロケ ー タ ー が 1 つも 宣言 され て い を けれ ば エラ ーK 
を る 。 


b. 基底 付 変数 が 参照 され る 場合 , 修飾 し て いる ポイ ン 
ター 変数 が デー タ の 所 在 場所 を 示す の 対し て, と 
られ る デー タ 属 往 は , その 基底 付 変数 の デー タ 必 性 
で ある 。 


c. 次 の ょ うら な 用 途 C 基 底 付 変数 を 使用 する と こと が で き 
る 。 既存 の デー タ を 識別 し , その デー タ つ いて 記 
述 す る 。 ALLOCATE ス テー トメ ント よっ て 記憶 
域 を 取得 する 。 LOCATE ステ ー ト メン ト を 用 いて 出 
力 緩衝 域 の 中 の 記憶 域 を 取得 する 。 


d. ある エリ ア の 中 割り 振ら れ て いる 基底 付 変 数 の 
ェ リ ア 内 お ける 相対 的 を 位置 は . オフ セッ ト 変 数 
の 値 に ょ っ て 識別 され る 。 


e, 基底 付 変数 の 宜 言 の 中 で EXTERNAL と 指定 する 
と と は で き な い 。 し か し , 外部 ポイ ンタ ー 変 数 【C ょ 
っ て 基底 付 変数 参照 を 修飾 する と と は で きる 。 


f. REFER オ プシ ョ ン を 使用 する と と C ょ よっ て , 調節 
可能 な エリ ア の 大 き さ , 配列 の 限界 , お と び ス トリ 
ング の 長 さ を 含め て 基底 付 構 造 を 宣言 する と と が で 
きる 。 「 第 8 章 : 記憶 域 の 制御 ] を 参照 の こと 。 


g. CHPCK 接 頭 語 リス ト の 中 の 基底 付 変数 へ の 参照 , 
また は デー タ 指 示 入 出力 用 デー タ ・ リ スト の 中 の 基 
底 付 変数 へ の 参照 を , ロケ ー タ ー で 明示 的 修飾 す 
信人 な と ば で でき な い 。 


h. BASED VARYING スト リン グ の 最大 の 長 さ は , 
重ね て 定義 され る 側 の スト リン グ の 最大 の 長 さ と 等 
し く な を けれ ば な を なら な い 。 たとえ ば, 


DECLARE A CHAR(50) VARYING 
BASED(Q), 
B CHAR(50) VARYING: 

Q= ニ ADDR( B ) : 


i. 基底 付 変数 に K INITIAL 属性 を 与え る と と が で き 


る 。 と の 値 は , ALLOCATE ま た は LOCATE ス 
テー トメ ント で と の 基底 付 変数 を 明示 的 に 割 り 振 
る と き に だ け 使 用 され る 。 同一 ウメ ン バ ーK 対 し て 
REFER オプ ショ ン と 1NITIAL 属性 と が 使用 
され て いる 場合 に は , REFER の 目標 に その 値 を 割 
り 当 て た 後 で , 初期 設定 が 行なわ れる 。 


省略 時 属性 : 


1 内 部 変数 の 省略 時 記憶 域 ク ラス は AUTOMATIC で あり , 
外部 変数 の 省略 時 記憶 域 ク ラス は STATTIC で ある 。 


2. BASED 属 性 の 中 , ある い は , LOCATE, ALLOCATE 
を いし READ ス テー トメ ント の SET オプ ショ ン の 中 (CC ポイ 
ンタ ー 変 数 が ある , また は , ロケ ー タ ーー 修 飾 語 と し て ポイ 
ン ター 変数 が 使わ れ て いる と いう 事 は その ポイ ンタ ー 変 数 
が 廊 脈 的 (C 宣 言 され た と と を 意味 する 。 


BACKWARDS 
BACKWARDS 属 性 は , 磁気 テー プ 上 の デー タ ・ セ ッ ト と 結び 
付け られ て いる SEQUENTTI AL INPUT ファ イル の レ ュ ー ド を , 
逆 の 順序 ( すなわち , 最後 の レ ュ ー ド か ら 始 め て 最初 の レコ ュー ド K 
至る 順序 ) で プク セス する + ょ 2 指定 する た め の も の で ある 。 
一 般 形 式 : 
BACKWARDS 
一 般 規則 : 
累 BACKWARDS 属性 は , RECORD フ ァイル 対し て だ け 
適用 され る 。 す な わ ち もち , と の 属性 は STREAM 属 性 と は 両 
立 し な い 。 BACKWARDS 属性 は RECORD ぉ と よび 


SEQUENTIAL を 暗示 し て いる 。 


2. BACKWARDS 属 性 は , テー プ ・ フ ァイル 対し て だ け 適 
用 され る 。 


BASED 


AUTOMATIC を 参照 の と と 。 


BINARY ,DECIMAL 


BINARY に 対し て は BIN 
DEC IMALCK 対 し て は DEC 


省略 形 : 


BINARY 属 性 と DECIMAL 属性 は , 算術 変数 CK ょ っ て 表わさ 
れ て いる デー タ 項 目 の 基 数 が , 2 また は 1 0 で ある と と を それ ぞ れ 
指定 する た め の も の で ある 。 

一 般 形式 : 


BINARYIDEC IMAL 
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一 般 規則 : 


BINARY 属性 また は DEC IMAL 属性 を , PICTURE 属性 と 
一 緒 c 指定 する と と は で き な い 。 


省略 時 属性 : 


宣言 され て いな い 議 別名 ( また は , 次 元 属性 , UNAL IGNED 

属性 ,。 ALIGNED 属性 , 有効 範囲 属性 , 記憶 域 ク ラス 属性 の い ず 
れ か 1 つま た は それ 以上 の 属性 だ け を も つも の と し て 宣言 され て い 
る 識別 名 ) は , その 頭 文 字 (C 応 し て 割り 当て られ る 属性 を ゃ つ 算術 
変数 で ある と みな され る 。 I か ら N の 間 の 文字 で 始ま っ て いる 識別 
名 の 標準 省略 時 属性 は , REAL FIXED BINARY(15,0) で 
ある 。 とれ 以 外 の 英字 で 始ま る 識別 名 の 標準 省略 時 属性 は , REAL 
FLOAT DECIMAL(6) で ある 。F IXED ま た は FLOAT お よ 
ぴ び ノ また は REAL また は COMPLEX が 宣言 され て いる 場合 に は , 
DEC IMAL で ある と みな され る 。 標準 省略 時 精度 は , シス テム 
3 60 ぉ ふ ょ び シ ステ ムン 3 7 0 の 各 コ ン バ パイ ラー ど と 定義 され て 
いる 精度 で ある 。 


BIT,CHARACTER 


CHARACTER(C 対 し て は CHAR 
VARYING に 対し て は VAKR 


省略 形 : 


B I T 属 性 と CHARAC TER 属 性 は , スト リン グ 変 数 を 指定 する 
の 使用 され る 。 B I 属性 は ,。 ビッ ト ・ ス トリ ング を 指定 する た 
め の も の で ある 。 CHARACTER 属 性 は , 文字 ネス トリ ング を 指定 
する た め の も の で ある 。 


一 般 形式 : 


BIT 
[( 長 さ )〕)〔VARYINGJ〕 
CHARACTER 


一 般 規 則 : 


1. 長 さ 属性 は , 固定 長 ス トリ ング の 長 さ また は 長 さ の 変わ る 
スト リン グ の 最大 の 長 さ を 指定 する た め の も の で ある 。 
「 長 さ 」 を 指定 し て いな い 場 合 に は , 1 で ある と みな され 
る 。 


2. VARYING 属性 は , 当該 変数 が 長 さ の 変わ る スト リン グ 
を 表わし て いる と と を 指定 する た め の も の で あり , て の 場 
合 に は 「 長 さ 」 は 最大 の 長 さ を わ す 。 現在 の 長 さ は つね 
iC 現在 の 値 の 長 さ で ある 。 長 さ の 変わ る スト リン グ じ 割り 
振ら れる 記憶 域 は , 宣言 され て いる 最大 の 長 さ より 2 ズバ 
イト だ け 長 く を っ て いる 。 と の 記憶 域 の 最初 の 2 バイト K 
は , スト リン グ の 現在 の 長 さ を バイ ト 単 位 で 表わす 数 字 が 
入る 。 


3 長 さ 属 性 を 指定 する 場合 (C は , 共通 属性 の 因数 化 に つい て 
同じ レベ ル で , CHARACTER 属性 また は B 1 T 属 性 の 直 
ぐ 後 CK「 長 さ 」 を 記入 し みな け れ ば な ならない 


342 DOS PL ノ I 最適 化 コ セン バイ ラー : 言語 解説 書 第 2 部 


( CHARACTER ま た は BIT と 「 長 さ 」 の 間 (C て は, ブラ 
ンク を 入れ て も 入れ を な く て も よい )。 


4. 式 ま た は 星 印 を 使っ て 長 さ 属性 を 指定 する と と が で きる 。 


「 長 さ 」 が 式 で ある 場合 に は , 当該 変数 の た め の 記 憶 域 が 
割り 振ら れる と き に と の 式 が 整数 に 変換 され る 。 デ ー タ 
集合 体 の た め の ペ パラメータ ー 記 述 子 の 中 で 式 を 使用 し て は 
な ら な い 。 


パラ メー ター また は 禄 制御 変数 C 対 し て は , 「 長 さき 」 と し 
て 星 印 を 記入 する と と が で きる 。 と の 場合 は , 先 の 記憶 域 
割 振り か ら 長 さ を と る と と が で き る が , 被 制 御 変数 関し 
て は 後続 の ALLOCATE ステ ー ト メン ト で 長 さ を 指定 す 
る と と も で きる 。 


スト リン グ が STATIC 属性 を も つづ 場合, その 長 さ 属性 
は 1 0 進 整数 定数 で を けれ ば な ら な い 。 


3 


6. スト リン グ が BASED 属 性 を も つ 場 合 C は , と の スト リン 
グ が 基底 付 構 造 の メン バー で あり し か も REFER オブ プシ 
ョ ン が 使用 され て いる 場合 を 除き , その 長 さ 属性 は 10 進 
整数 定数 で を な けれ ば な ら を ない ( 「 第 8 章 : 記憶 域 の 制御 」 
を 参照 の と と ) 。 


な BIT 属 性 , CHARACTER 属 性 , な ょ よび VARYING 属 
性 を PICTURE 属性 と 一 緒 K 指 定 す る と と は で き な い 。 


8. CHARACTER の か わり PICTURE 属性 を 使っ て 固定 
長文 字 ネ スト リン グ 変 数 を 宣言 する と と が で きる 
( PICTURE 属性 の 項 を 参照 の こと )。 


9 ビッ ト ・ ス トリ ング 変数 な む な よ び 文 字 ス トリ ング 変数 iC 許さ 
れる 最大 の 長 さ は , 32,767 で ある 。 ス トリ ング の 最小 
の 長 さ は ゼロ で ある 。 


BUFFERED, UNBUFFERED 


省略 形 : BUFFEREDK 対 し て は BUF 
UNBUFEF EREDK 対 し て は UNBUF 


BUFFERED 属 性 は , 補助 記憶 装置 と の 間 で 転送 が 行 を われ る 
と とき, SEQUENTTIAL RECORD フ ァイル の 各々 の レコ ー 
ド が 途中 で 緩衝 域 を 経由 し を けれ ば を ら を いと と を 指定 する も の で 
ある 。 


UNBUFFERED 属 性 は , と この よう な を レ コード が 緩衝 域 を 経由 す 
る 必要 が を いと と を 指定 する も の で ある 。 た だ し , と の 属性 は と の 
よう を な レコー ド が 緩衝 域 を 経由 し て は を ら な いと 指定 する も の で は 
な い 。 実際 (C は , UNBUFFERED と 指定 さん て いる と きけ は , 
一 般 (c, 隠れ て いる 緩衝 域 が 使用 され る 。 


一 般 形 式 : 


BUFFEREDIUNBUFFERED 


一 般 規 則 : 


BUFRFERED 属 性 また は UNBUEEERED 属性 は , RECORD 
ファ イル 対し て だ け 指定 する と と が で きる 。 


省略 時 属性 : 


DI RECT ファ イル の 場合 を 除き , 標準 省略 時 属性 は 
BUFFERED で あ る 。 DIRECT フ ァイル の 場合 , 標準 省略 時 属性 
は UNBUFFERED で ある 。 


注 : 位置 指定 方 式 の 入出 力 ス テー トメ ント で ある LOCATE ぉ 
よび READ SET を 指定 する と と が で きる の は , BUFFERED フ 
ァイル の 場合 だ け で あり , EVENT オ プシ ョ ン を 指定 する と と が 
で きる の は , UNBUFFERED ファ イル の 場合 だ け で ある 。 


BUILTIN 


BUILTIN 属性 は , ある 宣言 で 指定 され て いる 名 前 を その 宣言 
の 有効 範囲 内 で 参照 し た と き は , すべ て , 同名 の 組込み 関数 , 擬似 
変数 , また は 組込み み サ プル ー チ ン を 指し て いる も の と 解 生 す る よら 
指定 する ため の も の で ある 。 


一 般 形 式 : 
BUILTIN 
一 般 規 則 : 


和 ある ブロ ッ ク が 別 の ブロ ッ ク K 含 まれ て いる 場合 ic, 内 側 
の ブロ ッ ク で 組込み 関数 , 擬似 変数 ,) また は 組込み サブ プル 
ー チ ン の 名 前 と し て 用 いら れ て いる 議 別 名 と 同じ ゃ の が , 
外側 の ブロ ッ ク で は 別 の 意味 を も ゃ つと 宣言 され て いる と き 
は , 内 側 の ブロ ッ ク で BUILTIN を 使用 する 。 


み 、 ある 名 前 対し て BUILTIN 属性 が 宣言 され て いる 場合 
に は , INTERNAL 属性 が 暗示 され る 。 と こと の 名 前 に その 
(ほか の 属性 を 与え を る と と は で き な い 。 


3. バ パラ メー ター 対し て BUILTIN 属 性 を 宣言 する こと は 
で き な い 。 


注 : 引数 を も る た な い 組 込み 関数 (た と を えば, ONCHAR , 
ONSOURCE , DATE な ど ) を 使用 する 場合 は , BUILTIN 属 
性 を も る つも の と し て と れ ら の 組込み 関数 を 明示 的 ic 宜 言 す る か , ナ 
ル ・ ス トリ ング ・ リ スト を 使っ て と れ ら の 関数 を 交 脈 的 宣言 する 
か , また は DEFAULT ス テー トメ ント を 使っ て と れ ら の 関数 を 暗 
示 的 宣言 する か し な けれ ば な ら な い 。 


CHARACTER 
BIT の 項 を 参照 の こと 。 


COMPLEX , REAL 


省略 形 : COMPLEXK 対 し て CPL 


COMPLEX 属性 と REAL 属性 は , 算術 変数 の モー ド を 指定 
する の 使用 され る 。 REAL 本 性 は , 当該 変数 に と っ て 表わさ れ 
る デー タ 項 目 が 実数 で ある と と を 指定 する も の で ある 。 
COMPLEX 属性 は , 当該 変数 に K よ っ て 表わさ れる デー タ 項 目 が 複 
素数 で あり , し た が っ て , 各 デ ー タ 項目 が 2 つの 要素 か ら 構成 され 
て いる (最初 の 要素 が 実数 で 2 番目 の 要素 が 虚数 ), と と を 指定 す 
る も の で ある 。 


一 般 形 式 : 
REALICOMPLEX 
一 般 規 則 : 


数 字 変数 が 複素 数 値 を 表わす 場合 に は , PICTURE 属性 と 一 
緒 (C COMPLEX 属性 を 指定 し を けれ ば な ら な い 。 PICTURE 属 
性 と 一 緒 c 指定 する と と の で きる 算術 デー タ な いし スト リン グ ・ デ 
ー タ の 属性 は , COMPLEX 属性 だ け で ある 。 


省略 時 属性 : 

標準 省略 時 属性 は RE AL で ある 。 
CONDI TION 

省略 形 : COND 


CONDI TION 属 性 は , 当該 宜 言 で 指定 され て いる 議 別 名 が 条 
件 名 で ある と と を 指定 する た め の も の で ある 。 


一 般 形式 : 
CONDITION 


一 般 規則 : 


1. 条件 名 に 適用 する こと の で きる 属性 は , CONDI TION 
以外 に は , 有効 分 囲 属性 すなわち INTERNAL また 
は EXTERNAL 属性 だ け で ある 。 


2. 条件 名 を 記入 する こと が で きる の は , ON, STIGNAL, 
また は REVERT ス テー トメ ント の 中 だ け で ある 。 


省略 時 属性 : 


ON , SIGNAL, ま た は REVERT ス テー トメ ント の 中 
CONDITION 条件 を も つ 識 別名 が ある と , と の 識別 名 は 条件 名 
で ある と 文脈 的 に 宣言 され る 。 


省略 時 の 有効 範囲 は や XTERNAL で ある 。 
CONNECTED 


省略 形 : CONN 
CONNECTED 属性 は , ペラ メー ター に だ け 適 用 され る も の で , 
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当該 パテ メー ター が , 連続 し て いる 記憶 域 だ け を 参照 する も る の で あ 
る と と , し た が っ て , レ ュ ー ド 方 式 の 入出 力 に な いて 当該 パラ メー 
ター を 目標 フィー ルド な いし 原 フ ィ ー ル ド と し て 使用 し た り , スト 
リン グ を オー バー レー 定義 する 際 に 当該 バラ メー ター を 基底 と し て 
使用 し た りす る と と が で きる と と を 指定 する の KC 用 いら れる 。 


一 般 形 式 : 
CONNECTED 
一 般 規 則 : 
1. CONNECTED は , CONTROLLED 属性 を も た な い 集 
合体 パテ メー ター の 付加 的 属性 で あり , レベ ル - 1 の 名 前 
だ け C 与 える と と の で きる 属性 で ある 。 と の 属性 は , 
DECLARE を な いし DEFEAULT ステ ー ト メン ト の 中 , 


または, ENTRY 属 性 の バラ メー ター 記述 子 の 中 で 指定 
する と と が で きる 。 


グ CONNECTED 属 性 を も つ パ ラメ ー タ ー に 渡さ れる 引数 が 
連続 し て い を い 場 合 c は , 連続 し て いる 記憶 域 の 中 見 か 
け 引 数 が 作り 出さ れる 。 
CONTROLLED 
AUTOMATIC の 項 を 参照 の こと 。 
DEC IMAL 
BINARY の 項 を 参照 の と と 。 
DEFINED 
省略 形 : DEF 
DEFINED 属性 は , と と で 宣言 され て いる 変数 を , 指定 され 
て いる 基底 変数 と 結び つい て いる 記憶 域 の 一 部 た いし 全体 と 結び つ 
ける よう 9 指定 する を ため の も の で ある 。 
一 般 形 式 : 


DEFINED { 基底 変数 | ( 基底 変数 ) } 
(POSITION( 要素 式 ) 〕 


「 基 底 変 数 」 は , と と で 宣言 され て いる 変数 と 結び つけ られ る 記 
憶 域 を も つ 変 数 で ある 。 と と で 宣言 され て いる 変数 は , 「 被 定義 変 
数 」 で ある 。 


POSITION 属性 は , スト リン グ 基 底 変数 内 の 被 定義 変数 と 
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結び つけ られ る 部 分 の 最初 の 位置 を 指定 する る の で ある 。 と の 位置 
は , 基底 変数 に な いて 必要 と され る 部 分 の 最初 の ビッ ト な いし 文字 


の 位 思 で ある 。 
一 般 規 則 : 


1 ある 変数 を 他 の 変数 の 上 に 重ね て 定義 する 目的 は , 内 部 
貯え られ て いる デー タ を プロ グラ マー が 2 GO 以上 の 名 前 で 
参照 する こと と が で き る よう に する と と で ある 。 基底 変数 の 
名 前 は ,。 その デー タ K 対 し て 初め ic 宣言 され た 名 前 で ある 。 
と の 基底 変数 に 重ね て 定義 され る 各々 の 変数 は , それ ぞ れ 
異な を る 名 前 を も つ 。 内 部 (貯え 々 られ て いる デー タ が デー タ 
の 集合 体 で ある 場合 , 被 定義 変数 は その すべ て の デー タ を 
含ん で いて も ょ いし , その 特定 の 部 分 だ け を 含ん で いて も 
よい 。 被 定義 変数 は , 基底 変数 の 属性 を 引き 継が ない 。 


2. 定義 に は , 単純 定義 , 1iSUB 定義 。 ス トリ ング ・ オ ォ ー ベ 
ー レ ー 定 義 の 3 つの タイ プ が ある 。 


POSITION 属性 が 指定 され て いる 場合 , と の 定義 は ス 
トリ ング ・ オ ォ オーバー レー 定義 で ある 。 こと の 場合 に は , 基底 
変数 CK iSUB 参照 が 含ま れ て いて は を ら な い 。 基底 変数 
で 指定 され て いる 添字 (C iSUB 変数 へ の 参照 が 含ま れ て 
いる 場合, この 定義 は i SUB 定義 で ある 。 iSUB 変数 
も $ POSITION 属性 も な い 場 合 , 基底 変数 と 被 定義 変数 
と が 下 (示す 基準 の 通り 一 致し て いる を ら ば , と れ は け 単 
純 定義 で あり , 一 致し て いな いな を な ら ば スト リン グ ・ オ ー ズ ベ 
和 Nd 
・3 は この 関係 を 図 < ま と め た も の で ある 。 


POSITION |」 指 細 
底 変 数 の 添字 
時 1 SUB 
変数 へ の 参照 
一 致す る | 一 致し な い 
関係 * 
定義 の タイ プ 時 1SUB 単純 定義 オニ バー レ 
ー 定 義 定 義 


] 一 般 規 則 の 第 2 項 を 参照 の と と 。 


図 I.3 定義 の タイ プ 


基底 変数 が , 引数 と し て 渡さ れる と き , 被 定義 変数 の 

( DEFINED 属性 以外 の ) 諸 属性 を も る つ パ バラ メー ター と 
一 致し て いる 場合 は , 基底 変数 と 被 定義 変数 と は 一 致し て 
いる と いう 。 と の 際 , と の ペラ メー ター の 配列 の 限界 , ス 
トリ ング の 長 さ , お よび エリ ア の 大 き さ は すべ て 星 印 M 
っ て 指定 され て いる も の と みな され る 。 


単純 定義 な よび 1iSUB 定 義 の 場合 , ある PICTURE 属性 
と 一 致 さ せる と と が で きる の は , 繰返し 因数 以外 は 全く 同 
じ で ある ょ よう な PICTURE 属性 だ け で ある 。 スト リン グ 
・ オ ー バ ベー レー 定義 の 場合 は , 参照 に よっ て 有効 を 基底 変 
数 を 指定 する は, と の 参照 は 連続 し て いる 記憶 域 《C 対 す 
る も の で を けれ ば な ら な い 。 


実施 な あたっ て , プロ グラ マー の 側 で 上 で 述べ た 一 致 C 関 
する 規則 を と と ど と く 変 更 す る と と が で きる 。 ただし, こと 
れ を 変更 すれ ば , 望ま し く な い 波 及 効 果 が プロ グラ マー 自 
身 の プ ログ ラム MC 及ぶ 可能 性 が ある と と を 覚悟 し て お か を 
けれ ば な ら な い 。 


被 定義 変数 の 中 で , 配列 の 限界 の 値 , スト リン グ の 長 さ の 
値 , また は エリ ア の 大 き さ の 値 K つ いて 指定 され て いる か , 
推定 され る 値 は , 必ず し ゃ 基底 変数 の 対応 する 値 と 一 致し 
て いる 必要 は を い 。 し か し , 定義 され る 配列 , スト リン グ 
また は エリ アテ は, と れ と 対応 する 基底 の 配列 , スト リン グ 
また は エリ ア KC 納 まる も る の で を けれ ば な ら な い 。 


基底 変数 の 属性 の 中 に は , 被 定義 変数 の 属性 と 一 致す る 必 
要 の を いも の また は 一 致し 得 た いも る の が ある 。 基底 変数 お 
よび 被 定義 変数 に 次 の ょ うな 制約 が か ある か ら で あ る 。 


基底 変数 : 


許さ れる 属性 EXTERNAL ま た は INTERNAL 
修飾 され て い る か , また は 添字 が つ 
いて いる , また は その 両方 
パラ メー ター (スト リン グ ・ オ ー ベ 
ー レ ー 定 義 に な いて は , バラ メ 
ー タ ー は 連続 し て いる 記憶 域 を 
参照 する も る の で な けれ ば ならない) 


許さ れ を い 必 性 BASED 
DEFTINED 


被 定義 変数 : 


必ず 備 た て いな けれ ば を なら な い 必 性 
TNTERNAL 
レベ ルー 1 の 識別 名 


他 の 許さ れる 属性 
次 元 属性 
許さ れ を い 履 性 INITIAL 
AUTOMATIC ン BASED ン / 
CONTROLLED〆STATIC 
バラ メー ター 


基底 変数 が PXTERNAL 属性 を も つ 場 合 は , 被 定義 変数 
が その 内 部 iC ある プロ シー ジャー の 中 で こと の 基底 変数 が 知 


られ て いな を な けれ ば ならない 。 EXTERNAL 基底 変数 が い 
くつ か の 外部 プロ ンー ジャ ー の 中 で 知ら れ て いる と と が あ 
る 。 と の 場合 , と の 中 の ある 1 つの プロ ジー ジャ ー に お むい 
て と の 変数 の 値 が 変更 され る と , 被 定義 変数 の 値 も 同様 
変更 され る 。 


被 定義 デビ データ を 参照 し た 場合 は , 基底 変数 で は を し に い 被 定 
義 変 数 の 配列 の 限界 お よび スト リン グ の 長 さ (関し て , 
SUBSCRIPTRANGE 条 件 お ょ よび STRINGS1ZE 
条件 が 引き 起 さ れる 。 


値 の 確定 な よび 名 前 の 解釈 は , 次 の 順序 で 行なわ れる 。 


a. 被 定義 変数 が 宣言 され て いる プロ シー ジャ ーK 入 る 
と , と の 変数 の 配列 の 限界 . スト リン グ の 長 さ , な 
よび エリ ア の 大 き さ が 計算 され る 。 


b. 村 定 義 変数 へ の 参照 は , 基底 変数 の 現在 の 世代 へ の 
参照 で ある 。 見 か け 引 数 が 作成 され ず K 被 定義 変数 
が 引数 と し て 渡さ れる 場合 , 対応 する パラ メー ター 
が 参照 する の は , と の 引数 が 渡さ れる 時 点 の 基底 変 
数 の 世代 で ある 。 呼び 出さ れ た プロ シー ジャ ー の 中 
で 基底 変数 が 再 割 振り され て いる 場合 CK も と の 点 
変り は を い 。 


ec. 被 定義 変数 へ の 参照 が 行なわ れる と き は , 被 定義 変 
数 の 中 の 添字 の 値 が 計算 され , と の 値 が 整数 ic 変換 
され , その 後 で 基底 変数 の 中 の 添字 の 値 が 計算 され 
る 。 


単純 定義 


単純 定義 を 行なう と , 要素 変数 , 配列 変数 , ま た は 構造 変数 を 別 の 
名 前 で 参照 する と と が で きる よう KC を る 。 


一 般 規 則 : 


被 定義 変数 ぉ よ び 基 底 変 数 は , 任意 の デー タ ・ タ イブ の デ 
ー タ を 含む と と が で きる が , 先 に 述べ た 意味 で こと の 2 つ は 一 
致し て い を けれ ば を なら な い 。 被 定義 変数 の 中 の 要素 に 対し 
て ALIGNPED 属性 を たい し UNALIGNED 属 性 が 指定 され 
て いる 場合 に は , 基底 変数 の 中 の 対応 する 要素 に 対し て も 
同様 Cc ALIGNED 属 性 を いし UNALTIGNED 属 性 が 指定 
され て いな けれ ば な ら な い 。 


被 定義 変数 (Cc は 次 元 属 性 を 与え を る と と が で きる 。 基底 変数 
KC は 添字 を つけ る と と が で きる 。 ただし, と の 添字 が 
1 SUB 変数 で あっ て は を ら な い 。 


単純 定義 に な いて は , POSITION 属 性 を 指定 する と と 
は で き な い 。 
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4. 配列 の 単純 定義 に な いて は , 


a. 基底 変数 は , 配列 の 断面 で あっ て も よい 。 


b. 被 定義 変数 の 次 元 数 は , 基底 変数 の 次 元 数 等 し く 
な けれ ば を ら な い 。 


スト リン グ の 単純 定義 な いて は , 被 定 義 ス トリ ング の 長 
さ は , 基底 スト リン グ の 長 さ と 同じ か それ 以下 で を けれ ば 
な ら 廊 い 。 


3 


6. ェ エリア の 単純 定義 に な いて は , 被 定義 ヒエ リア の 大 き さ は , 
基底 エリ ア の 大 き さ と 同じ か それ 以下 で を けれ ば を ら な い 。 


基底 変数 は , VARYING ス トリ ング で あっ て も よい し , 
VARYING スト リン グ を 含ん で いて も よい 。 た だ し , そ 
の 場合 は , 被 定義 変数 の 対応 する 部 分 が と の スト リン グ の 
最大 の 長 さ と 同じ か それ 以下 の VARYING スト リン グ 
で な けれ ば な ら な い 。 


例 : 


DCL A(10,10,10), 


1 
8 時 DEF A, 
双 2( 1 0) DEF A(*,*,5), 
XX3 DPF 人 N) : 


X 1 は , A の 各行 , 列 , ぉ よび 面 の 最初 の 2 つの 要 
素 か ら な る 3 次 元 配列 で ある 。 双 2 は, A の 5 番目 
の 面 か ら を る 2 次 元 配 列 で ある 。 又 3 は , 丘 字 式 し , 
M, NIC よっ て 識別 され る 要素 か ら な る 要素 で ある 。 


DCL B CHAR(10), 
Y CHAR(5) DEF B: 


Y は , B の 最初 の 5 交 字 か ら な る 文字 スト リン グ で 
ある 。 


DCL C AREA(500), 
ク AREA(500) DEE C: 


ZZ は, CC 重ね て 定義 され る エリ ア で ある 。 


DCL 1 D UNALIGNED, 


2 , 
2 巴 , 
3 G CHAR(10 ) VAR, 
3 H, 
1 S UNALIGNED DFF D, 
の 2 
2 届 


3 V CHAR(10) VAR, 
3 Wi: 
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S は , DC 重ね て 定義 され る 構造 で ある 。 単純 定義 
(C お いて は , と の 2 つの 構造 の 組立 て 方 が 同じ で な 
けれ ば な を なら な い 。 FT へ の 参照 は 選 へ の 参照 で あり , 
V へ の 参照 は は へ の 参照 で ある 。 他 の 参照 も 同様 で 
ある 。 


1 SUB 定義 


iSUB 定義 を 行 を うと , プロ グラ マー は 基底 配列 内 の 指定 し た 
要素 か ら な を る 被 定義 配列 を 作成 する と と が で きる 。 村 定 義 配列 ある 
い は 基底 配列 が 構造 の 配列 で あっ て も よい 。 


一 般 規 則 : 


上 被 定義 配列 も 基底 配列 も 任意 の デー タ ・ タ イプ の デー タ を 
含む と と が で きる 。 双方 の 配列 は , (次 元 属性 を 除き ) 同 
じ 属 性 を る つも の で な けれ ば な ら な い 。 


2. 被 定 義 変数 な は 次 元 属性 を 与 を を な けれ ば な ら な い 。 基底 変 
数 は 添字 を つけ て も よい 。 ただし, 添字 を 指定 する の KK 
星 印 を 使用 する と と は で き な い 。 


3 iSUB 定義 KC お な いて は , POSITION 属 性 を 指定 する 
と と は で きみ ない 。 


4. iSUB 変数 は , 基底 配列 の た め の 添字 リ スト に お ける , 
被 定義 配列 の i 次 元 へ の 参照 で ある 。 基底 の 配列 添字 リス 
ト の 中 の 少な く と も 1 つの 添字 は , 値 の 計算 の 後 , 基底 配 
列 内 の 所 要 の 添字 を 与え る iSUB 式 で な を けれ ば ならない 。 
i の 値 の 範 胃 は は ペ 1 か ら n ま で で ある ( n は は 被 定義 配列 の 
次 元 数 ) 。 基 底 変数 の 添字 の 数 は , 基底 配列 の 次 元 数 等 
し く を けれ ば な を ならない 。 


5. 値 の 計算 に 関す る 一 般 規 則 の 外 K, 以下 の 点 に 注意 し たけ 
れ ば な ら な い 。 


a. 被 定義 配列 へ の 参照 し な いて 添字 式 が 指定 され て い 
を い 場 合 は , と の 参照 を 含む 式 を いし 割当 て の 値 が 
計算 され て いる 間 た 添字 の 値 が 計算 され る 。 


b. i の 値 は , 1 0 進 整数 定数 と し て 指定 され る 。 
iSUB 式 C お いて は , iSUB 変数 は 省略 時 精度 の 
画定 2 進 変数 と し て 取り 扱わ れる 。 


c. 基底 の 変数 添字 リス ト の 中 対応 する iSUB が を 
い 場 合 CK も , 被 定義 変数 へ の 参照 の 中 の 添字 の 値 が 
計算 され る 。 


6. iSUB 被 定義 配列 が 引数 と し て 渡さ れる 場合 , 確実 見 VARY ING 属性 を る つと と は で き な い 。 
か け 引 数 が 作成 され る よう プロ グラ マー の 側 で 特 c 配 慮 し 


な けれ ば な ら な い 。 たとえ ば, と の 95 了 数 を 括弧 で 胃 ん だ り , 2. 杜 定 義 変数 と 基底 変数 は 共に ビッ ト ・ ク ラス KK 属し て いる 
対応 する パラ メー ター CONNEBCTED 属 性 を 与え たり し か , 共に 廊 字 クラ ス C 属 し て い を けれ ば を ら な い 。 ビッ ト 
を けれ ば を ら な い 。 iSUB 被 定義 配列 の 要素 の 場合 は , ・ ク ラス 属す る も の は , 以下 の 通り で ある 。 


見 か け | 数 を 作成 する と と を く 引 数 と し て 湊 す と と が で きる 。 
a. 固定 長 ビ ッ ト ・ ス トリ ング 


例 : 
b. 固定 長 ビ ッ ト ・ ス トリ ング の 集合 体 
DCL A(100,100) CHAR(1 ), 
メ (10,10) CHAR(1) 文字 クラ ス K 属 する も の は , 以下 の 通り で ある 。 
DEF A(1SUB+20,2SUB+90): 
a. 固定 長文 字 ネ スト リン グ 
又は , 第 1 次 元 が A の 限界 2 1 - 30 の 間 の 要素 , 
第 2 次 元 が A の 限界 ? 1 - 100 の 間 の 要素 か ら b. 文字 スト リン グ と 数 値 ピ ビク チャ ー・ デ ー タ 
なる 2 次 元 配列 で ある 。 
c. a と b の 集合 体 
DE 遇 (2。5 ) 。 
Y(5,2) DEF B(2SUB, 1SUB) : し 1 ビッ ト ・ ク ラス ・ デ ー タ の 集合 体 を 配列 の 中 の 添字 を も つ 
要素 に 重ね て 定義 する と と は で き な い 。 ま た , 無 符号 の 整 
Y は , 限界 を 入れ 茜 えた B の 要素 か ら な る 2 次 元 数 定数 以外 の も の を 含む POSITION オ プシ ョ ン を 用 い 
配列 で ある 。 て , ビッ ト ・ ク ラス ・ デ ー タ の 集合 体 を 定義 むす る と と は で 
き な い 。 
DCL A(10,10) 
B(5,5) DEFE A(1+1SUBZ/5 , 4. iSUB 変数 を スト リン グ ・ オ ォ オー バー レー 定義 に な ける 基 
1+2SUB ノ 5 ) : 底 変数 と し て 使用 する こと と は で き な い 。 
と の 場合 (Cc は, A の ある 1 つの 要素 (CB の いく つか の 要 5. 基底 変数 内 の 被 定義 変数 が 始ま る ビッ ト な いし 文字 を 指定 
素 が 重ね て 定義 され る 。 する の を, POSI TION 属 性 を 使用 する と と が で きる 。 
B ( { , J ) は 次 の 要素 (< 重ね て 定義 され る 。 と の POSITION 属 性 は 次 の 形式 を と る 。 
IT ぐ く 5 か つ J ぐ 5 な を ら ば 。A( 1 。 1 ) POSITION (要素 式 ) 
I ぐ 5 か つ J ニ 5 を な ら ば , A( 1 ,2) 
5 か つの す ぐ 5 要ら ば AE2。 19 と の 式 は , 値 の 計算 の 後 , 基底 変数 の 先頭 を 基準 『/ し た 所 
I 三 5 か つ J 三 5 を ら ば , A(2,2) 要 の ビ ピット な いし 次 字 の 位置 を 与え る も る の で ある 。 この 属 
性 は DEFINED 属性 の 前 に あっ て $ 後 に と あっ て も よい 。 
I ぐ 5 か つ J ぐ 5 な ら ば 要素 B ( [, J ) は すべ と の 属性 を 指定 し を か っ た 場合 は , POSITION(1) と み 
て A ( 1 , 1 ) 人 重ね て 定義 され る か ら , こと れ ら の を され る 。 と の 式 iC よ っ て 与え られ る 値 は 1 か ら n の 間 の 
要素 の 内 の 1 つ K 値 を 割り 当て る と , と の すべ て 数 で ある 。 と と で , n は 次 の よら 定義 され る 。 
の 要素 CK 同じ 値 が 割り 当て られ る と と C な る 。 が CD SNC8)33 
小 ル ング ク グット オ と パー レー 昌義 と と で , N(b) は , 基底 変数 の ビッ ト 数 を いし 廊 字 数 で あり , 
トン の オー パー ンー 表 を 行 た うさ 。 デブ ログ チラ マー ば 。 あ N ( d) は , 被 定義 変数 の ビッ ト 数 を いし 廊 字 数 で ある 。 
る 被 定義 変数 を , 基底 変数 の た め の 記 憶 域 に 結び つけ る と と が で き 
る 。 補 定義 変数 も 基底 変数 も 共 (( ス トリ ング ・ デ ー タ な いし ピク チ 寝 定義 項目 へ の 参照 が ある た びに , と の 式 の 値 が 計算 され , 
ャ ー・ デ ー タ で な けれ ば な ら た な い 。 その 値 が 整数 変換 され る 。 と の 値 の 許容 最大 値 は 32767 
で ある 。 
一 般 規 則 : 


6 基底 変数 は 連続 し て いる 記憶 域 の 中 の デー タ を 参照 する も 
1 寝 定 義 変数 も 基底 変数 も , ALIGNED 属 往 また は の で を な けれ ば な を ならない 
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DCL A CHAR(100), 
V(10,10) CHAR(1) DEBFE Ai 


V は 交 字 スト リン グ A の すべ て の 要素 か ら な る 2 
次 元 配 列 で ある 。 


DCL B(10) CHAR(1), 
W CHAR(10) DEF B: 


W は 配列 B の すべ て の 要素 か ら を な る 文字 スト リン 
グ で ある 。 


DCE 6 (10。 す 10) BT(C4)4 
又 BIT(40 ) DEFE C PBOS(20): 


又は , C の 2 0 番 日 以降 の 4 0 の 要素 か ら を る ビッ 
ト ・ ス トリ ング で ある ( 2 0 番目 の 要素 を 含む ) 。 


DCL BE PIC'29V.299! 
Z1(6) CHAR(1) DEF E, 
Z2 CHAR(3) DEF E POS(4), 
Z3(4) CHAR(1) DEF E POS(2): 


Z 1 は, 1 0 進数 ビク チャ ーE の すべ て の 要素 か ら 
を る 文字 スト リン グ 配 列 で ある 。 選 2 は , ビク チャ 
ーE の 要素 '999' か ら な る 文字 スト リン グ で ある 。 
Z 3 は , ビク チャ ーE の 要素 「?.99 「 か ら な る 文 
字 ス トリ ング 配列 で ある 。 


次 元 属性 


次 元 属性 は , 配列 の 次 元 数 を ら び K 各 次 元 の 限界 を 指定 する た め 


の も の で ある 。 次 元 属性 で は , 限界 ( 上限 ま た は 上 限 と 下限 ) を 指 
定 す る か , また は 当該 配列 の 実際 の 限界 が ど と か 他 の 場所 か ら と ら 
れる と と を 星 印 を 使っ て 表示 する 。 


一 般 形 式 : 


( 限 界 [, 限 界 〕]・・・) 


と と で , 「 限 界 」 は , 


{〔 下 限 :〕 上 限 !|* 


で あり , 「 上 上限] と 「 下 限 」 は 要素 式 で ある 。 


一 般 規 則 : 


1. 指定 され て いる 限界 の 数 は , 当該 配列 の 次 元 数 を 表わす 。 
た だ し , と と で 宣言 され て いる 変数 が 構造 の 配列 の 中 K 含 
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まれ て いる 場合 は 別 で , と の 場合 C は , 含ん で いる 構造 か 
ら 次 元 が 引き 継が れる 。 


2. 指定 され て いる 限界 CK も と づい て , 実際 の 限界 は 次 の ょ う 
CC 定 め ら れる 。 


a.、 上 限 だ けが 指定 され て いる 場合 に は , 下限 は 1 で あ 
る と みな され る 。 


b. 下限 は , 上 限 と 同じ か それ 以下 で を けれ ば を ら を な い 。 


c. 星 印 は , 次 の ょ うな 意味 を 表わす 。 と と で 宣言 され 
て いる 変数 が CONTROLLED 属 性 を 与え られ て い 
る 場合 は , 実際 の 限界 は ALLOCATE ス テー トメ 
ント の 中 で 指定 され る 。 と の 変数 が 単純 パラ メー タ 
ー で ある 場合 は , 実際 の 限界 は と この パラ メー ター と 
対応 する 引数 の 宣言 の 中 で 指定 され る 。 と の と と か 
ら $ 分 る よう KC, 星 印 を 記入 する こと が で きる の は , 
パラ メー ター お ょ よび CONTROLLED 変 数 の 場合 だ 
・ け で ある 。 


3 限界 と し て 指定 され て いる 式 は , 配列 記憶 域 が 割り 振 
られ る と き K 計 算 さ れ , FIXED BINARY(15 0) 
変換 され る 。 単純 バラ メー ター の 場合 , 限界 は 1 0 進 整数 
定数 ( 符号 は あっ て . も を く て も よい ) また は 星 印 で を けれ 
ば な ら な い 。 


4. STATTIC と 宣言 され て いる 配列 の 限界 は , 1 0 進 整数 
定数 (符号 は あっ て も な く て も よい ) で を けれ ば な を なら な い 。 


Oi 


BASED と 宮 言 され て いる 配列 の 吸 界 は , 1 0 進 整数 定 
激 ( 符号 は あっ て も な く て も よい ) で な けれ ば な ら な い 。 
を ただし, と の 配列 が 基底 付 構造 の 一 部 で あり , し か も 
REFER オプ ショ ン が 使用 され て いる 場合 C は と の 限り 
で な い 。 (人 (第 8 章 : 記憶 域 の 制御 」 を 参照 の こと 。 ) 


6. 次 元 属性 は 配列 名 ( また は , 共通 属性 が 因数 化 さ ん れ て いる 
場合 は , 括弧 で くく られ た 名 前 の リス ト ) の 直ぐ 後 C 置 か 
を けれ ば を ら を な い 。 両者 の 間 に は ブラ ンク が あっ て も な く 
て も よい 。 


/ 許容 され る 最大 の 次 元 数 は 1 5 で ある 。 下限 の 許容 最小 値 
は ー32,768 で ある 。 上 限 の 許容 最大 値 は 32,.767 
で ある 。 


DIRECT, SEQUENTIAL 


省略 形 : SEQUENTTIALK 対 し て SEQL 


DIRECT 属性 と SEQUENTI AL 属性 は , RPCORD ファ イル 
の レコ ー ド へ の アク セス 方 法 を 指定 する た め の も の で ある 。 
SEQUENTTI AL 属性 は , 当該 デー タ ・ セ ッ ト (C お ける レコ ー ド 


の 物理 的 を 順序 また は 論理 的 順序 に 従っ て レコ ー ド (CC アクセス す 
る ょ うら 指定 す る た め の も の で ある 。 DI RECT 属性 は , キー を 使っ 
て , 当該 ファ イル の レコ ー ド を アク セス する よう 指定 する た め の も ゃ も 
の で ある 。 し た が っ て , 直接 ファ イル の 中 の 各々 の レコ ュ コード は ある 
キー と 結び 付い て いな けれ ば を ら な い 。 を な お, いずれ の 属性 も 
RECORD 属 性 を 暗示 し て いる 。 


SEQUENTI AL 属性 も DIRECT 属 も , ファ イル の 現在 の 
使用 方 法 を 指定 する だ け で あっ て , 当該 ファ イル と 結び 付い て いる 
デー タ ・ エ セッ ト の 物理 的 性質 を 指定 する る の で は を いと いう と と 
て 注意 し て いた だ きた い 。 実際 CC は, SEQUENTTIAL フ ァイル 
お いて , デー タ と いっ し ょ (CC キー が 記録 され て いる と と も ある の で 
ある 。 また , DIRECT フ ァイル は 殆 ん どの 場合 , SEQUENTTAL 
ラフ ラ ァ イル と し て 作成 され る 。 


一 般 形 式 
SEQUENTIALIDIRECT 
一 般 規 則 : 


1. DIRECT フ ァイル は , KEYED 属性 を も っ て いな を けれ 
ば た ら な い 。 KEYED 属性 は DIRECT 属 性 に よっ て 暗示 
され る 。 SEQUENTIAL フ ァイル は , KEYED 属 性 を も 
っ て いて も いな く て も よい 。 


の DI RECT 属 性 や SEQUPENT 1 AL 本 性 を , STREAM 
属性 と 一 緒 に 指定 する と と は で き な い 。 


省略 時 属性 : 
RECORD ファ イル の 省 員 時 属性 は , SEQUENTTAL で ある 。 


ENTRY 


ENTRY 属性 は , こと で 宣言 され て いる 識別 名 が 外部 入口 定数 
また は 入口 変数 で ある と と を 指定 する た め の も の で ある 。 また , 
ENTRY 属 性 は , 入口 点 の パラ メー ター の 履 性 に つい て 記述 する 
の に も ゃ 使用 され る 。 


一 般 形 式 : 
ENTRY [ ( バラ メー ター 記述 子 の リス ト ) 〕 
と と で , 「 ぷ パラ メー ター 記 述 子 の リス ト 」 は 次 の 形式 を と る 。 


[ パラ メー ター 記述 子 し , パラ メー ター 
記述 子 ]・・・〕 


パラ メー ター 記述 子 の リス ト に 関す る 規則 


上 ペラ メー ター 記述 子 の リス ト は , 結び つけ られ て いる 外部 入 
口 定数 また は 入口 変数 の バラ メー ター の 属性 に つ いて 記述 
する た め の も の で ある 。 
パラ メー ター 記述 子 の リス ト を 与え を い 場 合 に は , 引数 が 
バラ メー ター と 合致 し て いる も の と み を され る 。 バラ メー 
ター 記述 子 の ウリ スト が 与え られ て いる 場合 に は , 引数 と べ バ 
ラメ ー タ ー を 突き 合わ せ た り , 見 か け 引 数 を 作成 し た りす 


る の に と の リス ト が 使用 され る 。 引数 が パラ メー ター と 合 
致し て いな い 場 合 に は , パラ メー ター 記述 子 の リス ト を 与 
えな けれ ば な ら な い 。 


記述 子 は , 1 個 の バラ メー ター の 属性 (つい て 記述 する た 
め の も の で ある 。 たとえ ば, 次 の よう を ブロ ジー ジャ ー が 
ある も の と し ょ う 。 


TEST:PROCEDURE (A,B,C,D,E,F): 


DECLARE A FIXED DECIMAL (5), 
B FLOAT BINARY (15), 
C POINTER, 
1 D 
2 P, 


2 Q, 
3 R FIXED DPCTMAL, 


1 E, 
2 
2 Y, 
5. の, 
F(4) CHARACTER (10): 


END TEST: 
と の プロ シー ジャ ー 内 の パラ メー ター の 記述 子 は , 次 の よ 
ら て 宣 言 す る と と が で きる で あろ う 。 
DECLARE TEST ENTRY 


( DECIMAL FIXED (5), 
BINARY FLOAT (15), 


1 
M 


》 


3 DECIMAL FIXED, 
(4 ) CHARACTER (10)): 

パラ メー ター 記述 子 は , と れ ら が 記述 し て いる バラ メー ター 

ょ 同じ 順序 (< 並 ん で いな けれ ば な ら な い 。 あ る 記述 子 が 抜 

け て いる 場合 は 。 引数 が バラ メー ター と 合致 し て いる も の 

と みな され る 。 

ある バラ メー ター 対応 する 記述 子 が 必要 で を い 場 合 は , 

次 の いずれ か の 方 法 で その 記述 子 が 省略 され て いる と と を 

明示 し な けれ ば な ら な い 。 


コン マ ぞ を 1 つの 好 入 する 


ENTRY(CHARACTER(10) , ,,FTXED 
DEC IMAL ) は バラ メー ター が 4 つ あ る と と を 示 
し て いる 。 


星 印 を 1 つ 記 入 し , その 後 CK コ ンマ また は パラ メー タ 
ー・ リ スト の 右 括 弧 を 記入 する : ENTRY (* ネ ) は 
バラ メー ター が 1 つ あ る と と を 示し て いる 。 


カン マ の 後 ic 記 述 子 を 記入 せ ず に バラ メー ター が つづ 
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く と き は , 右 括弧 を と じ て , 記述 子 の 省略 を 示す : 
ENTRY(FLOAT BINARY, ) は バラ メー タ 
ー が 2 つ あ る と と を 表わし て いる 。 


ENTRY( ) と 言 宮 言 は バラ メー ター 記述 子 を る 
た を い ENTRY と 等 し い の で , と の 入口 名 (引数 を 
与え を て は な らい 。 


上 の 第 3 項 C 示 し た 例 で は , パラ メー ターC も 構造 べ 
ラメ ー タ ーBE も る 記述 子 を も た な い 。 


一 般 iC, ベラ メー ター 記述 子 の 中 で は , 任意 の 順序 ic 属性 
を 記入 する と と が で きる 。 し か し , 配列 パラ メー ター の 記 
述 子 の 場合 は , 最初 jc 次 元 属性 を 記入 し な けれ ば な ら な い 。 
また , 構造 ラテ メータ ー の 記述 子 の 場合 は , 対応 する バラ 
メー ター の レベ ル 番 号 と 同じ 順序 CK レベ ァ 番 号 を 記入 し た 
けれ ば な ら ず , 各 レ ベル の 属性 を 記入 する 前 iC 各々 の レベ 
ル 番 号 を 記入 し を けれ ば なら な い 。 記述 子 の レベ ル 番 号 は 
バラ メー ター の レベ ル 番 号 と 同じ で ある 必要 は を い が , 構 
造 の 組立 て 方 は 同じ で な けれ ば なら な い 。 ある 特定 の レベ 
ル ( て お いて は 任意 の 順序 ic 属性 を 記入 する と と が で きる 。 


注 : 記述 子 の レベ ル 番 号 と その レベ ル で 指定 され て いる 
属性 は それ ぞ れ , カン マ で 区 切ら れる ( 上 の 例 を 参照 する 
と と た 、。) 。 


バラ メー ター 記述 子 の 中 属性 ま た は レベ ル 番 号 が 指定 さ 
れ て いな い 限 り , その 記述 子 省略 時 属性 が 適用 され る と 
と は な を い 。 記述 子 の 中 (と レベ ル 番 号 な よび ノン また は 次 元 属 
性 だ けが 指定 され て いる 場合 は , FLOAT DECIMAL 
( 6) REAL で ある と みな され る 。 


バラ メー ター 記述 子 の 中 で エク ステ ント ( 長 さ , 大 き さ る , 
お よび 限界 ) を 指定 する と き は , 1 0 進 整 数 定数 また は 星 
印 し か 使用 する と と が で き な い 。 被 制御 バラ メー ターK 対 
する 記述 子 の 中 で エク ステ ント を 指定 する と き は , 星 印 し 
か 使用 する と と が で き な い 。 


DEFAULT ス テー トメ ント と DESCR TPTORS オプ シ 
ョ ン を 結び つけ て 使用 すれ ば , バラ メー ター 記述 子 の リュ 
ト で 与え る 属性 を 暗示 的 (設定 す る と と が で き る 。 し か し . 


省略 され て いる 記述 子 バ は , これら の 属性 は 適用 され な い 。 


一 般 規 則 : 


1. 
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RETURNS 属 性 な よび OPTIONS 属性 は , パラメータ 
記述 子 の リスト を も ゃ た な い PNTRY 性 を 暗示 する 。 


BUTILTIN 属 性 また は GENERIC 属性 と 一 緒 
ENTRY 属 性 を 指定 する と と は で き な い 。 
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入口 定数 引数 または 入口 変数 引数 を 表わす バラ メー ターK 
は , 明示 的 また は 暗示 的 CC, ENTRY 属 性 を 与 を な けれ 
ば を ら な を い 。 ENTRY 悦 性 の ネス ティ ング に つい て 許容 
され る 最大 の 深 さ は 2 で ある 。 た と えば , 


DCL E ENTRY(ENTRY(FIXED) ) 

は 許さ れる が , 

DCL E ENTRY(ENTRY(ENTRY(FIXED ) ) ) 
は 許さ れ な い 。 


ENTRKY 司 性 を 指定 する と き /C, パラ メー ター 記述 子 の リ 
スト の 中 で 共通 属性 の 因数 化 を 行なう と と は で き な い 。 


外部 入口 定数 は , ENTRY 属 性 を $ ぉ つも の と し て 明示 的 
C 宣 言 し を た けれ ば な を らい 。 と の 明示 的 宣言 を 行なわ た い 
と , 外部 入口 定数 は , BUILTIN 属 性 を も つも る の と し て 
文脈 的 に 宣言 され , 組込み 関数 の 名 前 た し て 取り 扱わ れる 。 


意 選 択 属性 の VARIABLE は , 付加 的 属性 で ある 。 

と の 属性 が 与え られ て いる と , と と で 宮 言 され て いる 識別 
名 が 入口 変数 で ある と 指定 され る と と CC な る 。 次 KC 挙げ る 
属性 の いずれ か が 宮 言 され て いる と , その 議 別 名 は, 
VARI ABLE 属 性 が 暗示 的 宣言 され る 。 


ALIGNET) 次 元 
AUTOMATTIC INITIAL 
BASED バラ メー ター 
CONTROLLED STATIC 
DEFINED UNALTIGNED 


CALL ステ ー ト メン ト ま た は 関数 参照 の 中 で 入口 変数 が 
使用 され て いる 場合 は , 対応 する 入口 点 は 実行 時 * で わか 
ら を い 。 ズ バラ メー ター 記述 子 の リュ ト を つけ ず 宣言 され 
た 入口 変数 が , 引数 の 受渡 し を 行なう CALL ス テー トメ 
ント の 中 か , また は , 引数 の 受渡 し を 行 な 2 関数 参照 と し 
て , 出 て きた 場合 は , 引 | 数 と 参照 され る 入口 点 の パラ メー 
ター と が 合致 し て いる る も る の と みな され る 。 しかし, 入口 変 
数 の 宣言 の 中 で バラ メー ター 記述 子 の リス ト が 与え られ て 
いる 場合 に は , 参照 され る 入口 点 の バラ メー ター は ベラ メ 
ー タ ー 記 述 子 の リス ト で 与え られ て いる 属性 を も つも の と 
今 を され , 必要 < 応じ て, 見 か け 引 数 が 作成 され る 。 


入口 式 へ の 参照 に 引数 リス ト (ナル 引数 リス ト で ある と と 
も ある ) が 含ま れ て いる 場合 は , つね , と の 式 C よ っ て 
表わさ れる プロ シー ジャ ー が 呼び 出さ れる 。 


入口 式 へ の 参照 c 引 数 リス ト が 含ま れ て いい) 場合 は , 次 


ヘー 


の よう な 廊 脈 CK お いて は , と の 式 (C よ っ て 表わさ れる プロ 
シー ジャ ー は 呼び 出さ れ を い 。 


a. 入口 変数 へ の 割当 て の 右辺 

b. 入口 式 と の 比較 。 

ec. 総称 入口 名 < 渡さ れる 引数 。 

d. 入口 バラ メー ター 渡さ れる 引数 。 
e. UNSPEC 組込み 関数 渡さ れる 引数 。 


f. 変数 を 必要 と する すべ て の 文脈 ( 入口 変数 の み K 該 
当 す る ) 。 


10. CALL ステ ー ト メン ト の 中 で 合用 され る 入口 変数 の 値 は , 
その CALL ステ ー ト メン ト が 実行 され る 時 点 に な いて 活 
用 状態 KC ある ブロ ッ ク の 入口 点 を 表 わし て いな けれ ば な ら 
を な い 。 


11. 比較 演算 子 ま た は コー を 使っ て 2 つの 入口 式 の 値 を 比較 
する と と が で きる 。 活用 状態 CK を た ない ブロ ッ ク の 人 和信 口 点 を 表 
わす 値 を も つ 入口 変数 が 比較 演算 の 中 で 指定 され て いて $, 
ェ エラー で は な い 。 


12. 同一 の PROCEPDURDE ステ ー ト メン ト ま た は 同一 の 
ENTRY ス テー トメ ント の 中 CC ある いく つか の 入口 名 を 比 
較 し て も ゃ も, 「 等 し い 」 と い 9 結果 (/C は を な ら な い 。 


省略 時 属性 : 


暗示 的 (Cc ENTRY 属 性 を 指定 する と と が で きる 。 PROCEDURE 

ステ ー ト メン ト ま た は ENTRY ス テー トメ ント の ラベ ル 接 頭 語 と し 
て 識別 名 を 記入 する と , と の 識別 名 は 入口 定数 と し て 明示 的 (宣言 
され たと と に な る 。 と の 識別 名 の 属性 は , この 明示 的 宣言 と . さら 
(C, DBPCLARE ステ ー ト メン ト で 宣言 が 行なわ れ て いる 場合 iC は , 
と の 宣言 か ら ゃ と られ る 。 次 の よう iC し て 属性 が 取得 され る 。 


有効 範囲 属性 : 外部 入口 定数 は EXTERNAL 属性 を も つも 
の と みな され る ( INTERNAL 属 性 は 有効 で を ない ) 。 入口 変 
数 の 省略 時 有効 役 囲 諸 性 は , 1 NTERNAL で ある 。 
RETURNS 属 性 : DECLARE ステ ー ト メン ト の 中 
RETURNS 属 往 が あれ ば , この 属性 が と られ る 。 
ENVIRONMENT 
省略 形 : ENV 
ENVI RONMENT 属 は , PL ノン 1 言語 iC 含ま れ て いな い 種 


々 の ファ イル 特性 を 指定 する た め C 各 コン パイ ラー ど と KK 定義 され 
る 属性 で ある 。 


一 般 形 式 : 


ENVIRONMENT (オプ ショ ン の リス ト ) 


「 オ ブ プション の リス ト 」 の 中 で は プラ ンク また は コン マル よっ て 個 
々 の オプ ショ ン を 区 切る 。 オプション の リス ト は , PL ノン 1 の 各 コ 
ン バ イ ラー ど と と 個々 KC 定義 され る 。 次 に 示す の は 当 コ ン バ イ ラー 
の オプ ショ ン の リス ト で ある 。 


MEDIUM 

[ FUNCTIONJ 

し ASSOCIATE( フ ァイル 名 ) ] 

[ RCE]〕 

[ OMR 〕 

[COLBINJ 

[ STACKER(n ) 〕 

[ レコ ー ド 形式 〕[ BUFFERS(n)〕 
[ デー タ ・ セ ッ ト の 編成 〕 

[ 磁気 テー ブ の 取扱 い 〕 

[ 印刷 装 軸 ・ 空 孔 装 置 の 制御 〕 

し COBOL〕] (データ 管理 の 最適 化 ] 

[ キー の 文 類 ] 

[ KEYLENGTH(n ) 〕 

[ KEYLOC(n ) 〕 

[ SCALARVARYING 〕 

[ 直接 アク セス 装置 の 使用 方 法 〕 

[ ASCII - デー タ 変 換 コ ー ド 〕 

し BUFOFF((n)〕 - 緩衝 域 オ フ セ ッ ト 〕 


と れ ら の オプ ショ ン は どの よう みな か な 順序 で 記入 し て も と よい 。 と れ ら の 
オプション の 指定 方 法 と 用 途 ) と つい て は , 「 第 10 章 : 入力 と 出 
力 」 , 「 第 1 1 章 : スト リー ム 方 式 の 転送 」, 「 第 12 章 : レ 
コー 方 式 の 転送 」 を 参照 され た い 。 


一 般 規 則 : 


ENVI RONMENT 属性 は , DBCLARE ステ ー ト メン ト の 中 で 
訪 和 人 し を けれ ば を ら な い 。 OPEN ステ ー ト メン ト の オプ ショ ン と 
し て , と の 属性 を 指定 する と と は で き な い 。 CLOSE ス テー トメ ン 
ト の ボリューム 後 始末 オプ ショ ン LEBAVE KC 対す る オプ ショ ン と 
し て , と の 属性 を 指定 する と と が で きる 。 


EVENT 
EVENT 履 性 は , と の 属性 を も つ 識 別名 が 事象 名 と し て 使用 さ 
れる と と を 指定 する も る の で ある 。 事象 名 は , 非同期 入出 力 操作 の 現 


在 の 状態 を 調べ る の 使用 され る 。 また, 事象 名 を プロ グラ ム ・ ス 
イッ チ と し て 使用 する と と も で きる 。 


一 般 形式 : 


EVENT 
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一 般 規 則 : 


Oi 


DECLARE ステ ー ト メン ト の 中 で EVENT 属性 を も 
つも の と し て 識別 名 を 明示 的 に 宣言 する と と が で きる 。 
WAIT ステ ー ト メン ト , DISPLAY ス テー トメ ント , ま 
た は 種々 の 入出 力 ス テー トメ ント の 中 識別 名 を 記入 する 
と と に よっ て , その 識別 名 に 対し て EVENT 属性 を 文脈 的 
(て 宣言 する と と も で きる ( 「 第 10 章 : 入力 と 出力 」 を 
参照 の と と ) 。 


以下 の 属性 を 事象 名 < 与え る と と が で きる 。 

次 元 属性 

有効 範囲 属性 ( 省略 時 属性 は INTERNAL で ある ) 
記憶 域 ク ラス 属性 ( 省略 時 属性 は AUTOMATIC で ある ) 


DEFINED 属性 (事象 名 を 他 の 事象 名 重ね て 定義 する 
こと も か で き な い ) 


INI TI AL 属性 また は INITTIAL CALL 属性 
事象 変数 は , 次 の よう な 2 種類 の 値 を も っ て いる 。 


a. と の 変数 の 完了 値 を 表わす 1 つの ビッ ト 。 と これが 
し 1 ) B で あれ ば 完了 で あり , !「 0 !「B で あれ ば 
未完 了 で ある 。 


b. と の 変数 の 状況 値 を 夷 わ す 精 度 が (15, 0 ) の 固 
定 小数 点 2 進数 値 。 こ の 値 が か ぞ ロ で あれ ば 正常 な 状 
況 で あり , ゼロ 以外 の 値 で あれ ば 異常 な 状況 で ある 。 


COMPLETION 組 込み 関数 な よび STATUS 組込み 関数 
を 使用 する と , 事象 変数 の と の 2 つの 値 が 別々 iC 返さ れる 。 
COMPLETION 組 込み 関数 は , 事象 変数 の 完了 値 を 表 わ 
す ビ ピッ ト ・ ス トリ ング 値 を 返す 。 STATUS 組込み 関数 は , 
事 角 変数 の 状況 値 を 表わす 固定 小数 点 2 進数 値 を 返す 。 


ある 事象 変数 を 他 の 事象 変数 (c 割り 当て る こと は 許さ れる 。 
し か し , 事象 変数 と 他 の デー タ ・ タ イプ の デー タ と の 間 で 
変換 を 行なう と と は で き な い 。 

事象 変数 は デー タ 集 合体 の 要素 で あっ て も よい 。 また, 事 
象 デー タ へ の 変換 な たい し 事象 デー タ か ら の 変換 を 伴 た わた 
い 限 り , 事象 変数 を 含ん で いる デー タ 集 合体 を 割当 て (c 使 
用 し て も る よい 。 


以下 の いずれ か の 方 法 に よっ て , 事象 変数 の 値 が セッ ト され る 。 


&. 完了 値 の モッ ト 一 COMPLETION 擬 似 変数 
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を 使用 する 。 


b. 状況 値 の セット 一 STATUS 擬似 変数 を 使用 す 
る 。 


c. 事象 変数 の 割当 て 。 


d 、 EVENT オプ ブ プション を も つ ス テー トメ ント て よ っ 
で も 


e. 入出 力 事 象 を えな いし DISPLAY ステ ー ト メン ト と 結 
び 付 いて いる 事象 変数 を 対象 と する WAIT ステ ー 
トド メド 粒 半 っ 。 


f. EVENT オ ォ オプション を 用 いて いる 入出 力 繰 作 が , 進 
行 中 の ファ イル を 閉じ る と と に よっ て 。 


割り 振ら れ た 後 の 事 象 変数 の 状況 値 は , 定義 で き な い 。 


ステ ー ト メン ト の 中 で EVENT オ プシ ョ ン を 指定 する と と 
によって, 事象 変数 を 入出 力 繰 作 ic 結び 付け る と と が で き 
る 。 この 変数 は , その 事象 が 完了 する まで 事象 と 結び 付け 
られ て いる 。 入出 力 事象 C 関 し て 言え 々 ば, 事象 変数 と 結び 
付け られ て いる 事象 を 対象 と する WAIT を 実行 し て いる 間 
(C と の 事象 が 完了 する 。 と の 間 , と の 事象 変数 は 活用 状態 
(C あ る と いう 。 活用 状態 た ある 事象 変数 を 他 の 事象 と 結び 
付け た り , 活用 状態 C ある 事象 変数 の 完了 値 を 事象 変数 の 
割当 て (C よ っ て 変更 し た りす る の は 誤り で ある 。 


入出 力 ス テー トメ ント を 用 いて , 活用 状態 ある 事象 変数 
( 配列 , 構造 , また は エリ ア の 中 ある 事象 変数 も 含む ) 
K 値 を 割り 当て る の は 誤り で ある 。 


EVENT オ プシ ョ ン を $ ゃ O つ 入 出力 ステ ー ト メン ト な が 実行 さ 
れ る と , 対応 する 事象 変数 が 非 活用 状態 ある を ら ば その 
状況 値 が ゼロ に セッ ト さ れる 。 と の 繰 作 の 間 割 込み が 起 
と る と と は な く , 転送 が 行なわ れる 前 (CC ( し か し 暗示 的 な 
開放 関連 する すべ て の 処置 が 完了 し た 人 後 ) この 操作 は 完 
了 す る 。 当該 ブロ グラ ム が 終了 する まで は , ある い は 入出 
力 事 象 変数 の 指定 され て いる WAIT ステ ー ト メン ト み が 実 
行 さ れる まで は , と の 入出 力 事象 変数 の 完了 値 が 「 完 了 」 
(C と モット され る と と は な い 。 WAIT は , と の 事象 関連 
する 転送 が 終了 する まで 当該 プロ グラ ム の 実行 を 延期 する 。 
と の 操作 関連 する 入出 力 条 件 が 引き 起 さ れん を か っ た と き 
は , と の 事象 変数 の 完了 値 が 「 完 了 」 セッ ト さ れ , と の 
事象 変数 は 活用 状態 で なくなる 。 入 出力 条件 か 引き 起 さ れ 
た 場合 に は, 事象 変数 の 状況 値 お が 1 に セッ ト さ れ た 人 後 で 該当 
する 条件 が 引き 起 さ れる 。 と れ ら の 条件 が 引き 起 さ れ た 結 
果 い くつ か の オン ・ ユ ニッ ト C 入 り そ の 最後 の オン ・ ュ ユニ 
ッ ト か ら 正 常 な 状態 で 戻る と , ある い は , ある 1 つの ォ ン 
・ ユ ニッ ト か ら 異 常 た 状態 で 戻る と , 事象 変数 の 完了 値 が 


ーー 


「 完 了 」 に セッ ト さ れ , こと の 事象 変数 は 活用 状態 で な く な 
き 


10. 事象 変数 Cc UNALIGNED 属 性 を 与え る と と は で き な を ない 。 


EXTERNAL, INTERNAL 
省略 形 : EXTERNAL(C 対 し て は BBXT 
INTERNAL 人 対し て は 1NT 


EXTERNAL 属 性 と INTERNAL 属性 は , 名 前 の 有効 範囲 を 指 
定 す る の 使用 され る 。 INTERNAL 属 性 は , と の 属性 を も つ 
名 前 が , と の 名 前 の 宣言 され ん て いる プ ブロック お よび と れ に 含ま れ て 
いる ブロ ッ ク の 中 で だ け 知 られ て いる と と を 指定 する も の で ある 。 
EXTERNAL 属性 は , 外部 名 と し て その 名 前 が 宣言 され て いる 他 
の ブロ ッ ク C お いて も その 名 前 が 知ら れ て いる と と を 指定 する も の 
で ある 。 


一 般 形 式 : 
EXTERNAL | INTERNAL 


一 般 規 則 : 


1. 2 つ 以 上 の ブロ ッ ク お いて 大 構造 名 を EXTERNATL と 
し て 宣言 する 場合 , どの 宣言 で も その 構造 の メン バー の 属 
性 は 同じ で を けれ ば な を ならない ( INI TI AL 属性 を 2 回 以 
上 指定 する 必要 は を いか ら 1INITIAL 属性 だ け は 例外 ) 。 
を お , 対応 する メン バー 名 は 同じ で あぁ る 必要 は を い 。 


2. 構造 の メン バー は つね (Cc INTPERNAL 属性 を も っ て いる の 
で , 有効 範囲 属 條 を 与え る と と は で き な い 。 し か し , 外部 
構造 の メン バー を 参照 する と き (C, その 参照 が 含ま れ て い 
る ブロ ッ ク に 知ら れ て いる メン バー 名 を 使っ て 参照 する と , 
事実 上 , これ と 対応 する メン バー 名 が 同じ で ある か 否 か (c 
か か わり を く , と の 外部 名 が 知ら れ て いる すべ て の プロ ッ 
ク C て お いて と の メン バー を 参照 し た と と に な る 。 


省略 時 属性 : 

内 部 プロ ンー ジャ ー の 入口 和 名 の 有効 範囲 属性 , な ぉ ょ よび 記憶 域 ク 
ラス が 与え られ て いる 変数 の 有効 範囲 属性 は , INTERNAL と み 
な され る 。 ファ イル 定数 の 有効 範囲 属性 , な よび 外部 プロ シー ジャ 
ー の 入口 定数 の 有効 午 囲 属性 は , EXTERNAL と みな され る 。 プ 
ログ ラマ ー の 定義 C を る 条件 名 の 有効 革 囲 属性 は , EXTERNAL 
と み を され る 。 

FILE 


F I LE 属性 は , と と で 宣言 され て いる 議 別名 が か ファ イル 定数 ほ 
た は ファ イル 変数 で ある こと と を 指定 する る の で ある 。 


一 般 形 式 : 


FILE 


一 般 規 則 : 


1. ファ イル 変数 KK は , ファ イル 属性 ( RECORD, INPUT 
な ど ) を 適用 する と と は で き な い 。 


2. ファ イル 式 と は , ファ イル 定数 , ファ イル 変数 , また は あ 
る ファ イル 値 を 表わす 関数 参照 で も る 。 フ ァイル 式 C は 次 
の よら な 用 途 が ある 。 


a. FILE オ プシ ョ ン へ の 引数 と し て 使用 する 。 


b. 関数 また は サ プ ブルー チン へ 渡さ れる 引数 と し て 使用 
する 。 


c. ON, SIGNAL, お よび REVERT ステ ー ト メン ト 
の 入出 力 条 件 名 へ の 引数 と し て 使用 する 。 


d. RETURN ス テー トメ ント へ の 引数 と し て 使用 する 。 


e. COPY オプ ショ ン へ の 引数 と し て 使用 す る 。 


3 ある ファ イル 定数 の 値 を 表わす ファ イル 変数 を 使用 する と 
と よって, その ファ イル 定数 (対す る オン ・ ユ ニッ ト を 
設け る と と が で きる 。 た と * ぴ ば , 


DCL F FILE, 
G FILE VARIABIE: 
Gー ド : 
L1: ON ENDFILE(G): 
「 ほ 2 ON ENDFILE(F): 


L1 とい クラ ベル の ステ ー ト メン ト と 2 と いら ラベ ル の 
ステ ー ト メン ト は , 同じ 指示 を 行なっ て いる 。 


4. CALL ス テー トメ ント また は け 関 数 参照 の 引数 と し て ファ 
イル 定数 が 指定 され て いる と , と れ M 代 えて 見 か け 引 数 が 
作成 され る 。 


9 CHECK 接 頭 語 リス ト の 中 で ファ イル 変数 を 指定 する と と 
が で きる 。 CHECKK リ スト の 中 (CC ある ファ イル 変数 iC 対す 
る シス テム の 標準 処置 は 。 この ファ イル 変数 の 議 別 名 を 印 
刷 す る と と で ある 。 ON, SIGNAL , お よび REVERT ス テ 
ー ト メン ト の FILE オプ ショ ン と し て と の + ょ うな 変 数 が 
出 て き て いる 場合 は , と の 変数 (C 対 し て CHECK 条 件 は 引 
き 起 され な い 。 


6 レコ ー ド 方 式 転送 ステ ー ト メン ト (C て よっ て ファ イル 変数 の 
値 を 転送 する と と が で きる 。 し か し , 転送 後 の 値 は 有効 で 
な いと と る も ある 。 


/ 比較 演算 子 = ミ また は ーー を 用 いて 2 つの ファ イル 式 の 値 を 
比較 する と こと が で きる 。 2 つの 式 が 表わす ファ イル 値 が す 
べ て の 部 分 つい て 等 し い 場合 に の み , と の 比較 の 結果 は 
等 し いと され る 。 


省略 時 属性 : 
ファ イル 定数 CK「 フ ァイル 属性 ] の いずれ か を 与 を る と , と の フ 


テ ァイル 定数 暗示 的 ICF ILE 属 性 を 与え る と と が で きる 。 ファ イ 
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ル 属 柏 民 つい て は , 「 第 10 章 : 入力 と 出力 」 を 参照 され た い 。 
また , 入力 ステ ー ト メン ト あ る い は 出力 ステ ー ト メン ト の FILE 
オプ ショ ン の 中 , また は , 入出 力 条 件 の た め の ON ス テー トメ ント 
の 中 識別 名 を 記入 する と と に よって, その 鐘 別 名 を ファ イル 定数 と 
し て 文脈 的 !C 宜 言 す る と と が で きる 。 


F I LE 属性 を も ゃ つ 識 別名 が 構造 の 要素 で あっ た り , 以下 の い ず 
れ か の 付加 的 属性 を も っ て いる 場合 は , と の 議 別 名 は ファ イル 変数 
で ある と みな され る 。 


記憶 域 ク ラス の 属性 

次 元 属性 

バラ メー ター 

ALIGNED また は UNALIGNED 
DEF INED 

INITTIAL 

VARIABLE 


FIXED,FLOAT 


FIXED 属 性 と FLO AT 属性 は , と こと で 宣言 され て いる 算術 変 
数 の スケ ー ル を 指定 する も の で ある 。 FIXED 属 性 は , と の 変数 が 
固定 小数 点 デ ー タ 項目 を 表 わす と と を 指定 する た め の も の で ある 。 
FLOAT 属性 は , と の 変数 が 浮動 小数 点 デ ー タ 項目 を 表わす と と 
を 指定 する た め の も の で ある 。 


一 般 形 式 : 
FIXEDIFELOAT 
一 般 規 則 : 


PICTURE 属性 と 一 緒 に , F 1 XED 属 性 また は FLOAT 属 竹 を 
指定 する と と は で き な い 。 


省略 時 必 性 : 


宣言 され て いな を い 識 別名 (また は , 次 元 属性 ,。 ALIGNED 属性 
を いし UNALIGNPD 属 性 , 有効 範 因 属 性 , 記憶 域 ク ラス 属性 の 
ら うち いずれ か 1 つ 以 上 の 属性 だ け を も つも の と し て 宣言 され て いる 
識別 名 ) は , その 頭 文字 応じ し て 決 め ら れる 属性 を も つ 算 術 変数 で 
ある と み を され る 。 すなわち , と の 識別 名 が TI か ら N の 間 の 文字 で 
始ま きっ て いる 場合 , 標準 省略 時 属性 は REAL FIXED BINARY 
( 1 5 , 0 ) で ある 。 と れ 以 外 の 英字 か ら 始 まっ て いる 場合 , 標準 
省略 時 属性 は REAL FLOAT DECTIMAL (6 ) で ある 。 BINARY 
を いし DEC IMAL お よび プ ま た は REAL を いし COMPLEX が 指 
定 さ れ て いる 場合 に は , FLOAT で ある と みな され る 。 標準 省略 
時 精度 は , シス テム 3 6 0 の 実施 上 定義 さき 8 れ て いる 精度 で ある 。 


FLOAT 
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FIXPED の 項 を 参照 の と と 。 


GENERIC 


GENERIC 属 性 は , 一 群 の 入口 式 の 総称 で ある 入口 名 を 定義 する 
の 使用 され る 。 (その 各々 は , と と で 宣言 され て いる 名 前 に よっ て 
参照 され る ) 。 と の 総称 が 参照 され る と , 参照 の 中 で 総称 に 対し て 
指定 され て いる 引数 を も と に し て 1 つの 入口 式 が 選ば れる 。 


一 般 形 式 : 


GENERIC (入口 式 WHEN 
( 総称 記述 子 の リス ト ) 
(入口 式 WHEN 
( 総称 記述 子 の ウリ スト ) 〕・・・) : 


と と で , 総称 記述 子 の リス ト は 次 の 形式 を と る 。 
(〔 記述 子 〔 , 記述 子 ] ・・・〕) ) 
一 般 規則 : 


GENERIC 属性 が 与 を られ る 名 前 (Cc 対し て 指定 で きる 属 
性 は , INTERNAL 属性 だ け で ある 。 


が GENERIC の 後 IC 記 入 す る 入口 式 は 各々 , 当該 総称 グ 
ルー ププ KC 属す る メン バー 1 つ ず つ 対 応 し て いる 。 と の 入 
口 式 は , 入口 定数 また は 入口 変数 で を けれ ば な ら な い 。 と 
の 入口 式 は , 基底 付 , 被 定義 。 また は 添字 付 の も ゃ の で あっ 
て は な ら な い 。 


3 異な る 記述 子 の ウリ スト を つけ る の で あれ ば , 同じ 入口 式 を 
1 つの GENERIC 宣 言 の 中 で 2 回 以上 記入 し て も よい 。 


4. 総称 名 へ の 参照 CK 含ま れ て いる 引数 に C も と づい て , ある い 
は , 総称 名 へ の 参照 IC 引 数 が 全く 含ま れ て いな いと 言 事 
実 C も と づい て , ある 特定 の 入口 式 が 選び 出さ れる 。 あ る 
総称 が 参照 され る と , 引数 の 数 と 各 引 数 の 属性 が , 左 か ら 
右 の 竹 C 各 々 の 総称 記述 子 の リス ト と 比較 され , ある 総称 
訪 述 子 の ウリ スト の すべ て の 属性 が 引数 の 属性 と 一 致し て い 
る と わか っ た と こと ろ で こと の 比較 が 終わ る 。 そ の 結果 , と の 
参照 は , 一 致し た 総称 記述 子 の リス ト を も つ メ ン バ ー へ の 
参照 で ある と 解釈 され る 。 


許さ れる 属性 は , 特定 の 入口 式 の 選定 関係 する も の だ け 
で あ る 。 そ の よ ょ うな を 本 性 は , 以下 の 通り で ある 。 


Oi 


ALIGNED 
AREA (大 き さ を 指定 する と と は 
で き な い ) 
基 底 
BIT ( 長 さ を 指定 する と と は で き な い ) 


CHARACTER ( 長 さ を 指 定 す る と と は できない ) 


ENTRY ( 記述 子 の リス ト を 指定 する と と は 
で きい ) 
EVENT 
FILE 
LABEL ( ラベ ル の リス ト を 指定 する と 
と は で き な い ) 
モー ド 次 元 数 (限界 を 指定 する と と は で き な い ) 
OFESET ( エリ アプ 変数 を 指定 する と と は 
で き な い ) 
PICTURE )「 ピ ビ ピクチャー 指定! 
POINTER 
精 度 ( 桁 数 を 指定 し を けれ ば な ら な い 。 


FIXED の 場合 , さら C, スケ ー 
ル 央 数 も 指定 し を た けれ ば を ならない ) 


ス ケー ル 
UNALTIGNED 
VARYING 


総称 記述 子 の リス ト の 中 で は , 星 印 また は コン マ C よ っ て 
訪 述 子 の 省略 を 示す と と が で きる 。 


ある 総称 値 へ の 参照 の 中 で 引数 と し て 使用 され て いる 入口 
式 は , ENTRY タイ プ ブ の 記述 子 と だ け 合 致す る 。 と の ェ エ 
う な 記述 子 が ない 場合 | と の プロ グラ ム は 誤り で ある 。 


GENERIC 属性 を も つ 引 数 は , 総称 記述 子 の リス ト の 中 
の ENTRY 属性 と 合致 する 。 


総称 記述 子 の リス ト の 中 で ロケ ー タ ー 属 性 ( POINTER 
また は OFFSET) が 指定 され て いる 場合 は , 対応 する 
バラ メー ター$ 同 じ 属 性 を も っ て いな けれ ば な ら な い 。 と 
の 入口 点 が 呼び 出さ れ た を た とき, 一 方 の タイ プ か ら 字 方 の 
タイ プ へ の 変換 を 行なう と と は で き な い 。 


総称 記述 子 の 中 で は レベ ル 番 号 を 指定 し て は ならない 。 集 
合体 を 引数 と し て 総称 入口 名 < 六 す こと は で きる が , 見 か 
け 引 数 は 作成 され を い 。 


総称 名 ( 参照 で は を い ) を 非 総称 入口 名 へ の 引数 と し て 指 
定 す る と と が で きる 。 


と の 非 総称 入口 名 が 入口 変数 また は 外部 入口 定数 の 場合 ic 
は , パラ メー ター 記述 子 の リス ト を つけ て と れ を 宣言 し な 
けれ ば な を なら な い \。 総称 引数 の 記述 子 は 。 バラ メー ター 記述 
子 の リス ト を も つ PENTRY で を けれ ば を ら な い 。 と の よう 
(て ネス ト さ れ た リスト は , 受け 湊 す 引数 を 選定 する の K 使 
用 され る 。 を た と えば ば, 


AA: PROC 


DCL B GENERIC (C WHEN 
(FIXED), 
D WHEN 
(FLOAT)) 
E ENTRY (ENTRY(FIXED ) ) : 
CALL E(B): 
END Aij 


プロ シー ジャ ーE が 呼び 出さ れる と , C が 選び 出さ れ , 
引数 と し て 渡さ れる 。 とれ は , 入口 名 パラ メー ター の 指定 
する バ パラ メー ター が TFT XRED で ある と, 記述 子 C に よっ て 
指定 され て いる た めで ある 。 


非 総称 入口 名 が 内 部 入口 定数 の 場合 に は , パラ メー ター 記 
述 子 の リス ト を も つ ENTRY と し て , 対応 する パラ メー 
ター を 宣言 し を けれ ば な を ならない 。 と の リス ト は , 受け 渡す 
引数 を 選び 出す の 使用 され る 。 た と えい ゆ , 


A: PROC}: 
DCL B GENERIC (C WHEN(FIXED ), 
D WHEN(FLOAT) ) : 
CALL F(B): 
E: PROC(P): 
DCL P ENTRY(FIXPD ) : 


END E: 
END Ai: 


プロ シー ジャ ーE が 呼び 出さ れる と , C が 選び 出さ れ , 引 
数 と し て 渡さ れる 。 と れ は , 入口 名 パラ メー ター が 
FIXED で ある と 宣言 され て いる た めで ある 。 


INITTAL 


省略 形 : INIT 


INITIAL 属性 (と は 2 つの 形 が ある 。 第 1 の 形 は , ある デ 
ー タ 項目 < 記憶 域 が 割り 振ら れる と き C そ の デー タ 項 目 光 割り 当 
て る 値 を も つ 初 期 定 数 , 式 , また は 関数 参照 を 指定 する た め の も の 
で ある 。 第 2 の 形 は , 割 振り の 際 z 初期 設 定 を 行なう た め , 
CALL オ プシ ョ ン を 介 し て , ある ブロ シー ジャ ー を 呼び 出す と と を 
指定 する た め の も の で ある 。 呼び 出さ れ を た ルー チン を 実行 し て いる 
間 M< 割 当て に よっ て 変数 の 初期 設定 が 行なわ れる ( と の ルー チン は 
呼出 し 点 C 値 を 返す 関数 と し て 呼び 出さ れる も の で は な い ) 。 


一 般 形 式 : 


8 INITIAL (項目 , 項 目 〕 ...) 


2. INITIAL CALL 入 口 式 
[ 引数 の リス ト 〕 
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一 般 規 則 : 


定数 , 被 定義 デジ データ, 構造. また は バラ メー ター 
(CONTROLLED バ ラメ ー タ ー を 除く ) (CINITIAL 属 
性 を 与え を る と と は で き な い 。 


第 1 形 の INITIAL 属性 に 関す る 規則 : 


1. リス ト の 中 の 各々 の 項目 は , 定数 , 括弧 で くく られ た 式 , 
参照 , 星 印 ( ある 特定 の 項目 の 初期 設定 を 行なわ を ない と と 
を 示す ), また は 反復 指定 の いずれ か の 形 を と る と と が で 
きる 。 


と の 説明 iC お いて は , 「 定 数 」 は 次 の いずれ か 1 つ を 表 わ 
ずら 


[| - 算術 定数 

文字 スト リン グ 定 数 

ビッ ト ・ ス トリ ング 定数 

[+| 一 〕 実 定数 { 十 | 一 } 虚 定数 

ラ ベル 定数 

入口 定数 

ファ イル 定数 
「 式 ]」 は , 初期 設定 され る デー タ 項 目 K 割 り 当 て られ る 初 
期 値 を 与え を る た め の 要 素 式 を 表わす 。 INITIAL 属性 の 
中 で 式 を 指定 する 場合 に は , つね KC, 式 を 括弧 で 囲む 。 
「 参 照 」] は , デー タ 項 目 の 初期 値 と し て 使用 する こと と の で 


きる 変数 ま た は 関数 へ の 参照 を 表わす 。 


b3 INITIAL 属性 が 適用 され る 時 点 は , 当該 変数 の 記憶 域 
クラ ス に よっ て 異 を る 。 


STATIC: 当該 変数 が 宣言 され て いる 外部 プロ シー ジ 
ャ ー に KK 入っ た と き 。 


AUTOMATIC: 当該 変数 が 宜 言 さ れ て いる ブロ ッ ク K 人 人 
つ た と き 。 


CONTROLLED: ALLOCATE ステ ー ト メン ト が 実行 
きだ とき 。 


BASED: 当該 変数 を 対象 と する ALLOCATE ステ ー ト 
メン ト が 実行 され た と き 。 当該 変 数 か 
ポイ ンタ ー を セッ ト す る と と よっ て 
参照 され る も の で , ALLOCATE ステ 
ー ト メン ト の 中 で は 指定 され て い を い 
と いら 9 場合 は , DECLARE ステ ー ト 
メン ト の 中 で INITIAL 属性 が 指定 
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10. 


され て いて も こと の 必 性 は 適用 され を い 。 


1 つの 要素 変数 に 対し て , 初期 値 は 1 つ し か 指定 する こと と 
が で き な い 。 配列 変数 KC 対し て は , 2 つ 以 上 の 初期 値 を 指 
定 す る と と が で きる 。 構造 変数 を 初期 設定 する と き は , そ 
の 基本 項目 の 名 前 ( これ が 要素 変数 で あっ て も 配列 変数 で 
あっ て も ) を 個々 初期 設定 し を けれ ば を ら な い 。 


ある 配列 (C 対 し て 指定 され て いる 初期 値 は , この 配 別 の 夏 
素 (c, 行 を 主 と し た 順序 で ( 最後 の 添字 が 最も 速く 変化 す 
る ) , 連続 し て 割り 当て られ る 。 


ある 配列 に 対し て 指定 され て いる 初期 値 の 数 が 多 す ぎる 場 
合 iC は, 余分 の 初期 値 は 無視 され る 。 指定 され て いる 初期 
値 の 数 が 不足 し て いる 場合 IC は . 配列 の 残り の 部 分 は 初期 
値 化 され を い 。 


STATIC 変数 対し て は , INI TIAL 属性 の 中 で 定数 
値 し か 指定 する と と が で き な を な い 。 ただし, STATIC ポイ 
ンタ ー 変 数 を 初期 値 化 する と き は , NULL 組込み 関数 を 
使用 する と と が で きる 。 


反復 指定 は , 次 の 一 般 形 式 の いずれ か 1 つ を と る 。 


(反復 因数 ) 

参 照 | 定数 |( 式 ) 
( 反復 因数 ) 

項 目 〔, 項 全 汰 0 却 6 


( 反復 央 数 ) * 


「 反 復 因数 」 は , 配列 の 要素 を 初期 値 化 する と き K 繰 返し 
使用 すべ き 定 数 , 式 , また は 項目 リス ト の 繰返し 回 数 を 指 
定 す る た め の も の で ある 。 反復 央 数 の 後 C 定 数 また は 式 が 
訪 人 され て いる 場合 C は 指定 され て いる 数 だ け の 要素 が , 
と の 値 IC ょ っ て 初期 値 化 され る 。 反復 因数 の 後 K 項 目 の リ 
スト が 記入 され て いる 場合 (た は , 各 項 日 が 配列 の 要素 を 1 
つ ず つ 初 期 値 化 し を が ら , 指定 され て いる 回 数 だ け と の リ 
スト が 繰り 返さ れる 。 反復 央 数 の 後に 星 印 が 記入 され て い 
る 場合 C は , 初期 値 化 の 際 (C, 指定 され て いる 数 だ け の 要 
素 が スキ ッ プ され る 。 


STATIC デ ー タ の 場合 を 除き , 反復 央 数 は 要素 式 で も よい 。 
STATIC デ ー タ の 場合 に は , 反復 因数 は 無 符号 の 10 進 整 
数 定数 で な けれ ば を ら な い 。 配列 対し て 記憶 域 が 割り 振 
られ る と き に し, 式 の 値 が 計算 され . 繰返し 回 数 を 表わす 整 
数 が 与え られ る 。 


反復 因数 と し て 負 の 値 ま た は ゼロ を 指定 する と , 初期 値 化 
は 行 を われ な い 。 


11. スト リン グ か ら な る 配列 の 初期 値 化 で は , スト リン グ 線 返 
し 因数 と 反復 央 数 の 両方 を 含め て も よい 。 ど ちら か 一 方 だ 
けが 与え を られ て いる 場合 は , スト リン グ 定 数 が 括弧 で くく 
られ て いな い 限 り , と の 因数 は スト リン グ 繰 返し 因数 で あ 
る と みな され る 。 ス トリ ング 繰返し 因数 は , 無 符 号 の 10 
進 整数 定数 で な けれ ば な ら を な い と と 注意 され た い 。 た と 
え を えば, 次 の 例 C つ いて 考え て みよ 2。 


(2)!A') は (「'AA' ) 等 し い 。 
AA うう 紙 (1A'、 リ AA ) う Mc 等 し い 。 
'「A') は (!「A',「A! ) 等 し い 。 


12. 反復 を ネス ト す る と と が で きる 。 


13. 初期 値 の た め の 式 な よび 関 数 参照 の 中 で 使用 され て いる 名 
前 は , 初期 値 化 され る 項目 が 宣言 され て いる ブロ ッ ク の 中 
で 知ら れ て いる も の で な けれ ば を ら な い 。 


14. STATIC ラ ベル また は 入口 変数 KC INITI AL 属性 を 与 
える と こと は で き な い 。 


15. STAT1C 属性 を も た を い ス テー トメ ント ・ ラ ベル 変数 
か ら な る 配列 の 要素 の 初期 値 化 に は , 別 の 方 法 を 使用 する 
と と が で きる 。 すなわち, ラベ ル 配 列 の 要素 を ステ ー ト メ 
ント 接頭 語 と し て 使用 する 方 法 で ある 。 た だ し , と の 場合 
添字 は すべ て 1 0 進 整数 定数 で を けれ ば な を ら な い ( 符号 は 
任意 選択 ) 。 と の よう する と , 配列 の その 要素 は , 添字 
付き の 参照 を 接頭 主として も つ ス テー トメ ント の ラズ ベル ん 定 
数 の 値 i 初 期 値 化 され る 。 こと の ステ ー ト メン ト は , 配列 の 
宣言 を 含ん で いる ブロ ッ ク の 直ぐ 内 部 (C と を な けれ ば な ら な い 。 
1 つの ラベ ル 配 列 の 初期 値 化 に は , いずれ か 一 方 の 方 法 し 
か 使用 する と と が で き な い 。 と の 種 の 妨 列 に 対し て 
CHECK が 指定 され て お り , し か も 上 述 の 方 法 で と の 配列 
の 要素 が 初期 値 化 さ れる 場合 , 初期 値 化 の 際 /C は CHECK 
条件 は 引き 起 さ れ を な い 。 


16. INITIAL 属性 の 中 の ある 項目 の 属性 が , その 項目 目 体 
の 属性 と 異な る 場合 、 と れ ら の 属性 が 両立 し 得る る の で あ 
る な ら ば , 変換 が 行 を われ る 。 


17 2 つ 以 上 の 宣言 の 中 で ある STATIC EXTERNAL 項 目 
(CINITIAL 履 性 を 与え る 場合 は , どの 宣言 た お いて $ 
値 は 同じ で を けれ ば を ら な い 。 


第 2 形 の INITIAL 属 性 関す る 規則 : 


1 受け 渡さ れる 「 入 口 式 」 お よび 「 引 数 の リスト 」 は, 「 第 
6 章 : プロ グラ ム の 構成 」 で 説明 し た プロ ロー グ た 関す 
る 条件 を 満足 する る の で を けれ ば を な ら な い 。 


2. 第 2 形 を 使っ て STATIC デー タ の 初期 設定 を 行なう と と 
は で き な い 。 


例 : 
a. DECLAREP SWITCH BIT (1) 
INITIAL (「1!H): 


b. DECLARE MAXVALUE INITIAL (99) , 
MINVALUE INITIAL (-9292): 


c・ DECLARE A (100,10) INITIAL 
(22 。 っ (209) ((5)5.92 う 5) 


d. DECLARE TABLE (20,20) INITIAL 
CALL SET_UP (区,Y): 


e・ DECLARE 1 A(8), 
2 B INITIAL (0), 
2 C INITIAL ((8)0): 


f. DECLARE Z(3) LABEL : 


Z(1): IF メニ テ Y THEN GO TO EXIT: 
Z(2): A ニ A+ BC キキ D: 

Z(3): A = A 十 10: 

GO TO (1 ): 

EXIT: RETURN : 


例 C の 結果 は 次 の よう C な る 。A の 最初 の 9 2 0 個 の 要素 は , 各 
各 0 (て セッ ト され る 。 次 の 8 0 個 の 要素 に 関し て は , 5,.5,5,9 
が 2 0 回 繰り 返さ れる 。 


例 q の 中 の SPDT_UP は TABLE 内 の 諸 要 素 の 初期 値 を セッ ト 
する た め の プ ロ シ ジ シー ジャー の 名 前 で ある 。 と Y は , SET_LUPC 
渡さ れる 引数 で ある 。 

例 e C な いて, B と C は (8 ) と 言う 次 元 を 引き 継ぐ 。 ただし, 
B (関し て は 最初 の 要素 だ けが 初期 値 化 され る の 対し て , CK 関 
し て は すべ て の 要素 が 初期 値 化 され る 。 

最後 の 例 C な いて , 1IC1,2, ある い は 3 と い 9 値 を 与え を る と 
と て よ っ て , 配列 の 特定 の 要素 (転送 が 行なわ れる 。 


INPUT, OUTPUT, UPDATE 


INPUT 属 性 , OUTPUT 属性 , お よび UPDATE 属性 は , ファ 
イル の 機能 を 指示 する の 使用 され る 。 [INPUT 属性 は , 補助 記憶 
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装置 か ら りら プ ログ ラム ヘ へ デー タ を 転送 する ょ うら 指定 する を ため の も の で 
ある 。 OUTPUT 属 性 は , 新しい デー タ ・ モ キット を 作成 する た め , 
ある い は 既存 の デー タ ・ セ ッ ト を 拡張 する た め (C, ブロ グラ ム か ら 
補助 記憶 装置 へ デー タ を 転送 する よら 指定 する も の で ある 。 
UPDATP は , いずれ の 方 向 (C も デー タ を 転送 で きる と と を 指定 す 
る も の で ある 。 し た が っ て , UPDATE フ ァイル は , 入力 ファ イル 
で ある と 同時 に 出力 ファ イル で も ある 。 


一 般 形 式 : 
INPUTIOUTRUTIUPDA TE 
一 般 規則 : 


1 INPUT 属 性 を も & つ ファ イル MCPRINT 属 性 を 与え る と 
と は で き いい 。 


と OUTPUT 属 性 を も る つ フ ァイル MC BACKWARDS 属 性 を 
与え る と と は で き な い 。 


に UPDATE 属 性 を も る つ フ ァイル (CC STREAM 必 性, 
BACKWARDS 属 性 , ある い は PR INT 属 性 を 与え を る と と は 
で き な い 。SQUENUT AL ファ イル 対し て UPDATE 属 
性 が 宣言 され て いる 場合 は , 「 そ の 場 で 更新 」 方 式 が と ら 
れる と と を 示し て いる 。 と の 種 の ファ イル に アク セス する 
と き は , READ の 次 (C REWRI TE が つづ く と いう 順序 
で な けれ ば な ら な い 。 


省略 時 属性 : 


省略 時 属性 は INPUT で ある 。 PRINT 属性 は OUTPUT 履 性 を 
暗 志 する 。 


INTERNAL 


EXTERNAL の 項 を 参照 の と と 。 


IRRBDUCIBLE , REDUCIBLE 


省略 形 : IRREDUCIBLEK 対 し て は TKRKRED 
REDUCIBLEC 対 し て は RED 


と れ ら は け は 最適 化 (< 関す る 属性 で ある 。 DOS PL プ { 最適 化 コ ン 
パイ ラー よっ て 処理 され る ブロ グラ ム の 中 (て と れ ら の 属性 が 出 て 
来 た 場合 は , その 記入 方 法 が 構文 法 に か を っ て いる か 否 か チェ ッ ク 
され る だ け で , と れ ら の 属性 は 無視 され る 。 と の よう を な ブログ ラム 
(て と れ ら の 恒 性 が 記入 され て いて $, 誤り で は な い 。 


KEYED 

KEYFD 属性 は , 当該 ファ イル の 中 の レコ ュー ド を アク セス する 際 
(C, オブ ショ ン KEY, KPYTO, お よび KEYFROM が 使用 され 
る と と が ある と 指定 する た め の も の で ある 。 と れ ら の オォ オプション は , 
ラテ ァイル の 中 の レコ ー ド (C て アク セス する の MC キー が 使用 され る と と 
を 示し て いる 。 
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一 般 形 式 : 
KEYED 
一 般 規 則 : 


MM KEYED フ ァイル は , STREAM 属 性 まほ た は PRINT 属 性 
を も つこ と は で き な い 。 


2. KEYED 属 性 は , RECORD ファ イル 対し て だ け 指 定 す 
る と と が で きる 。 KEYED 属 性 は , 直接 アク セス 装置 と 結 
び 付 いて いな を けれ ば な を ならない 。 


3. オプ ショ ン KEY , KEYTO, お よび KEYFROM の いずれ 
か が 使用 され て いる ファ イル 対し て は , 必ず , KEYED 
属性 を 指定 し を な けれ ば な を なら な い 。 対応 する デー タ ・ セ ッ ト 
C 実 際 に は 記録 され た キー が 含ま れ て いる 場合 も, 上述 
の オプ ショ ン を 何 も 使 用 し て いな けれ ば , KEYED 属 性 を 
指定 する 必要 は を い 。 


省略 時 属性 : 
DI RECT 属 性 は KEYED 属 性 を 暗示 する 。 
LABEL 


LABEL 属 性 は , と と で 宣言 され て いる 識別 名 は ラベ ル 変 数 で あ 
り , その 値 が ステ ー ト メン ト ・ ラ ベル で ある と と を 指定 する た め の 
も の で ある 。 目的 プロ グラ ム の 最適 化 の 一 助 と し て , LABEL 履 性 
の 指定 の 中 に , 当該 プロ グラ ム を 実行 し て いる 間 C と の 名 前 が と り 
得る 値 を 記入 する と と も で きる 。 


一 般 形 式 : 


LABEL 〔( ス テー トメ ント ・ ラ ベル 定数 
[ , ス テー トメ ント ・ ラ ベル 定数 ) ・・・) 〕 


一 般 規 則 : 


1. ステ ー ト メン ト ・ ラ ベル 定数 の リス ト が 与え られ て いる 場 
合 は , GO TO ステ ー ト メン ト ま た は Rー 形 式 項目 の 中 で 
使用 され る と き の 変 数 の 値 は . その リス ト の メン バー で な 
けれ ば な を ならない 。 リス ト の 中 に ある ラベ ル 定 数 は , この 宣 
言 を 含ん で いる ブロック の 中 で 知ら れ て いる も の で な けれ 
ば な ら な い 。 リス ト の 中 記入 する と と の で きる ラベ ル 定 
数 の 数 は , 最高 1 2 5 で ある 。 


2. ラベ ル ァ 配 列 (CC 対し て LABEL 属性 を 指定 する 場合 に は , 
括弧 で 囲ん だ ステ ー ト メン ト ・ ラ ベル 定数 の リス ト を 使用 
する と と が で きる 。 


3. PROCEDURE ス テー トメ ント また は ENTRY ステ ー ト 
メン ト を 識別 する た め に ラベ ル 変 数 を 使用 する と と は で き 
な い 。 ま た, ラベ ル 変 数 に 入口 定数 を 割り 当て る と と は で 
き な い 。 


4. ラベ ル 変 数 が STATIC 属性 を も っ て いな い 場 合 C に は , ラ 
ベル 配列 の 要素 を 指定 し て いる 添字 付 ラ ベル を ステ ー ト メ 
ント ・ ラ ベル 接頭 語 と し て 指定 する と と が で きる 。 し か し , 
END ス テー トメ ント の END と いう キー ワー ド の 後に と 


の と うら な ラベ ル を 記入 する と と は で きい 。 さら K 詳 し い 
と と は , INITIAL 属 性 の 項 を 参照 の と と 。 


5. STATIC ラ ベル 変数 KC INI TIAL 属 性 を 与え る と と は 
で き を い 。 


6. GO TO ステ ー ト メン ト の 中 で 使用 され る ラベル 変数 の 値 
は , その GO TO ステ ー ト メン ト が 実行 され る と き に 活用 
状態 KC ある ブロ ッ ク の 中 で 用 いら れ て いる ラベ ル 定 数 で を 
けれ ば な ら な い 。 と の よう な ラベ ル 変 数 の 値 が 有効 で ない 
場合 チェ ッ ク ア ウゥ ト ・ コ ン バ パイ ラー は ERROR 条 件 を 
引き 起す 。 しかし, 最適 化 フ セン バイ ラー の も と で は , と の 
よう な エラ ー が 検出 され る か どう か は 保証 で き を い 。 


/ ラベ ル と ラベ ル を 比較 する と と が で きる 。 ラ ベル の 比較 演 
算 で 使用 する と と の で きる 演算 子 は , ニ と コー で ある 。 比 
較 演 算 (CC ない て , 活用 状態 で を まい プ ロッ ク で 使用 され て い 
る ラベ ル ァ 定 数 を 値 と する ラベ メル 変数 を 指定 し て も , 誤り KC 
は な ならない 。 


8. ナル ・ ス テー トメ ント の 接頭 語 と し て 指定 され て いる ラベ 
ル と と の ナル ・ ス テー トメ ント の 直後 の ステ ー ト メン ト の 
接頭 語 と し て 指定 され て いる ラベ ル と は 比較 し て も $ も 等しく 
を ら を な い 。 た と えば , 
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ラベ ル A は ラベ ル BK 等 し く を い 。 

% FEORMAT ステ ー ト メン ト の 接 台 語 と し て 指定 され て いる 
ラベ ル と と の 後 IC と ある ステ ー ト メン ト の 接頭 語 と し て 指定 
され て いる ラベ ル と は , 比較 し て も 等 し く を な ら な い 。 

10. END ス テー トメ ント の 接頭 語 と し て 指定 さん て いる ラベ 
ル と と の 人 後 の ス テー トメ ント の 接頭 語 と し て 指定 され て い 


る ラベ ル は , 比較 し て も 等 し く な を ならない 。 


11. IF ステ ー ト メン ト の ラベ ル は その 後 の THEN 廊 節 の ラ 
ベル と は , 比較 し て も 等 し く な ら な い 。 


長 さ 属 性 
BITTT の 項 を 参照 の こと 。 


LIKE 


L IKE 属性 は , と と で 宣言 され て いる 名 前 は , LIKE の 人 後記 入 
され て いる 名 前 と 同じ 組立 て 方 の 構造 変数 で ある と と を 指定 する た 
め の も の で ある 。 LIKE 属性 を 与え る と , 小 構造 名 , 要素 名 , ぉ 
よび , 小 構造 名 を ら び KK 要素 名 の 属性 が 同じ に を る 。 


一 般 形 式 : 


LIKE 構造 変数 


一 般 規 則 : 


1. 「 構 造 変数 」 は 大 構造 名 で も 小 構造 名 で も よい 。 と れ は け 修 
飾 さ れ た 名 前 で も よい が , 活字 付 の 名 前 で あっ て は を ら な い 。 


PA 「 構 造 変 数 ]」 は , LIKE 属 性 の 指定 を 含ん で いる ブロ ッ 
ク の 中 で 知ら れ て いる 名 前 で を な けれ ば を ら な い 。 L IKE 
属性 が 展開 され る 前 C, すべ て の L IKE 属性 の 中 の 構造 
名 が , 宣言 され て いる 構造 と 結び 付け られ る 。 た と えば , 


DECLARE 1 A, 2 C, 3 EE, 3 P, 
1 D, 2 C, 3 G, 3 理 : 


BEGIN: 
DECLARE 1 A LIKE D ,1B LIKE A.C: 


END: 
この 宣言 の 結果 は , 次 の ょ うな る 。 
1 A LIKE D は 次 の ょ う K 展 開 さ れる 。 
内 ぶる 65 8.@。 さき 拓 
1 B LIKE A.C は 次 の よう K 展 屋 され る 。 
1 B。。 3 芯 。 3 平 


委 「 構 造 変数 ) も その 小 構造 も LIKE 属性 を 使っ て 宣言 さ 
れ た も の で あっ て は な ら な い 。 また , 「 構 造 変数 」 を 含ん 
で いる 構造 が LIKE 属性 に よっ て 完成 させ られ た も の で 
あっ て は な ら な い 。 


4. 作成 され 構造 に 小 構造 や 要素 名 を 追加 する と と は で き な 
い 。 DECLARE ス テー トメ ント で LIKE 属性 を 指定 する 
と き 「 構 造 変数 」 の 直人 後に 記入 する レベ ル 番 号 は , 
LIKE 属性 を 使っ て 宣言 され て いる 名 前 の レベ ル 番 号 よ り 
代数 的 小さ いか 等 し く を けれ ば な ら な い 。 


らち 「 構 造 変数 ] 自体 の 属性 が 新た tc 作成 され る 構造 IC 引 き 継 
が れる わけ で は な を ない 。 た と えば , 記憶 域 ク ラス の 属性 は 引 
き 継が れ を い 。 キー ワー ド LIKE の 人 和俊 の 「 構 造 変数 」 が 
構造 の 配列 を 表わし て いる 場合 は , その 次 元 属性 は 引き 継 
が れ な い 。 
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し か し , 小 構造 名 と 要素 名 の 属性 は 引き 継が れ る 。 また , 
含ま れ て いる 次 元 属性 と 長 さ 属 性 は 再 計算 され る 。 た だ し , 
ステ ー ト メン ト K 接 頭 語 を つけ る と と に よっ て 初期 設定 さ 
れ た ラベ ル ん 配列 の 要素 IC 対 する INITIAL 属性 に は , と 
れ は 適用 され ない 。 


6. LIKE を 使っ て 宣言 され て いる 構造 を 記述 《 し た が っ て 
組み 立て る と レベ ル 番 号 の 続き 方 が 正確 で を く を る 場合 は 
( た と を えば, レベ ル 3 の 小 構造 が レベ ル 1 の 大 構造 と 
LIKE で ある と 宣言 され て いる 場合 ), LIKE 属性 を 
適用 する 前 定数 CC よっ て レベ ル ん 番号 が 修正 され る 。 


の 構造 含ま れ て いる 要素 の ALIGNED 属性 な ょ よび 
UNALTIGNED 属 性 が 引き 継が れる 前 (C, LIKE 属性 が 
展開 され る 。 


8. 標準 省略 時 属性 また は DEFAULT ステ ー ト メン ト が 適用 
され る 前 (C, LIKE 属性 が 展開 され る 。 


OFEFSET, POINTER 


省略 形 :、 POINTERC 対 し て PTR 


OFFSET 属 性 と POINTER 属 性 は , ロケ クー ター 変数 KC つい て 


記述 する た め の も の で ある 。 基底 付 変数 の ある 特定 の 紀 代 を 参照 す 
る た め MC, 基底 付 変数 参照 の 中 で ログ ケー ター 変数 を 使用 する と と が で 
きる 。 オフセット 変数 は , エリ ア の 最初 の 場所 を 基準 に し て , ある 
場所 を 識別 する た め の も の で ある 。 ポ イン ター 変数 は , 任意 の 場所 
( エリ ア の 中 の 場所 を 含む ) を 識別 す る た め の も の で ある 。 


一 般 形式 : 


POINTERIOFFSET 
( (要素 ェ エリア 変数 ) 〕 


一 般 規 則 : 


1. ポイ ンター 変数 の 宣言 に た は , DECLARE ステ ー ト メン ト 
の 中 で 明示 的 に 宣言 する 方 法 , ポイ ンター 修飾 語 と し て 指 
定 す る と と よっ て 六 脈 的 に 宣言 する 方 法 , BASED 属 性 
の 中 で 指定 する と と に よっ て 文脈 的 に 宣言 する 方 法 , SET 
オプ ショ ン の 中 で 指定 する と と C よ っ て 文脈 的 ic 宣言 する 
方 法 が ある 。 


2. オフ セッ ト 変 数 を 廊 脈 的 に 宣言 する と と は で き な い 。 エリ 
ア 変 数 を 指定 し て を い 場 合 は , オフ セット 変数 の 用 途 は 
PQINTER 組込み 関数 を 利用 し て ロケ ー タ ーー 修飾 語 と し 
て 使用 する と と だ け で ある 。 


3. ポイ ンタ ー 変 数 の 値 は , 次 の いずれ か の 方 法 で セッ ト す る 
と と が で きる 。 
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a. READ ステ ー ト メン ト の SET オ プシ ョ ン を 利用 する 。 
b. LOCATE ス テー トメ ント を 利用 する 。 
ec. 。 ALLOCATE ス テー トメ ント を 利用 する 。 


d,. 他 の ログ ケー ター 変数 の 値 を 割り 当て る , また は , > 
ー ザ ー 定 義 の 関数 か ら 返 され ん た ロケ ー タ ー 値 を 割り 
当て る 。 


e. ADDR, NULL , また は POINTER 組込み 関数 
の 値 を 割り 当て る 。 


4. オフ セッ ト 変 数 の 値 は , 次 の いずれ か の 方 法 で セ モッ ト す る 
と と が で きる 。 


a. ALLOCATE ス テー トメ ント を 利用 する 。 


b. 他 の ロケ ー タ ー 変 数 の 値 を 割り 当て る , また は , = 
ー ザ ー 定 義 の 関数 か ら 返 され た ロケ グー ター 値 を 割り 
に 合 つか 


c. NULL また は OFFSET 組 込み 関数 の 値 を 割り 当 
て る 。 


比較 演算 子 一 お ょ びー つ ー 以 外 の 演算 子 の オペ ベラ ンド と し て 
ログ ケー ター 変数 を 使用 する こと は で き な い 。 
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6 ロケ グー ター・ デ ー タ を 他 の デー タ ・ タ イプ の デー タ 変換 
する あと を と よ は で き な い 。 し か し 。 ボ イシ スー を オフ キッ ト 
変換 し た り , オフ セッ ト を ポイ ンター に KC 変換 し た りす る と 
と は で きる 。 


の ロケ ー タ ー 値 は . ロケ クー ター 変数 C し か 割り 当て る と と が 
で き な い 。 オフ セッ ト 値 が オフ セッ ト 変 数 割り 当て られ 
る と き , OFFSET 属性 の 中 で 指名 され て いる ェ エリ プア 変数 
は 無視 され る 。 


8. STREAM 入 出力 を 用 いて ロケ クー ター・ デ ー タ を 転送 する 
と と は で き 友 い 。 


9 ポイ ンタ ー と オフ セッ ト と の 間 で 暗示 的 を 変換 が 行 を た われ 
る と き は いつ で も , OFFSET 属 性 の 中 で 指定 され て い 
る エリ ア 変 数 を 用 いて その 値 が 確定 され る 。 


省略 時 属性 : 


OFFSET 属性 の 中 で 指定 され て いる 変数 は , AREA 属性 を も 
つも の と し て 文脈 的 に 宣言 され る 。 


OPTIONS 
OPTIONS 属 性 は , 入 ロ デー タ の 特性 を 指定 する た め の も の で 
ある 。 OPTIONS 属 性 は 付加 的 属性 で あり , PBNTRY 属性 を 暗示 
し て いる 。 OPTIONS 属性 は , 渡さ れる 引数 や 総称 で 表わさ れ て 
いる 名 前 の 選定 !C は , 何 の 効果 も 及ぼ さ な い 。 


一 般 形 式 : 
OPTIONS( オプ ショ ン ・ リ スト ) 
と これ は 次 の ょ ら み な 方 法 で 使用 され る 。 


DECLARE 識別 名 
[ ERNTRY( パ パラ メー ター 記述 子 リ スト ) ] 〕 
[VARIABLEJOPTIONS( オ プシ ョ ン ・ リ スト ) : 


オプ ショ ン と オプ ショ ン の 間 (C は プラ ンク を 置く 。 当 コン パイ ラー 
の オプ ショ ン は 次 示す 通り で ある 。 


COBOL [追加 オプ ショ ン 〕 
FORTRAN 〔 追 加 オ プシ ョ ン 〕 
{ ASSEMBLERIASM) INTER 


COBOL ま た は FORTRAN の 指定 と 共 C 追 加 オ プシ ョ ン を 1 つ 
以上 任意 の 順序 で 指定 する と と が で きる 。 と れ ら の オプ ショ ン は 次 
の 通り で ある 。 


NOMAP [0 引数 リス ト )〕 
NOMAPIN 〔( 引 数 リス ト )] 
NOMAPOUT 〔 (引数 リス ト ) 〕 


INTER 


と と で は , COBOL , FORTRAN , お よび 追加 オプ ショ ン に つい 
て 簡単 (Cc 説明 する に と ど め る 。 と これら の 用 途 お よび 働き に つい て の 
詳細 は , 「 第 1 7 章 : 言語 間 の 連絡 機能 」 を 参照 され た い 。 


一 般 規則 : 


N OPTIONS 属性 は , 入口 宣言 の 中 で し か 使用 する と と が 
で き な い 。 また , 外部 入口 定数 を いし 外部 入口 変数 , な よ 
び バ パラ メー ター に 対し て し か OPTIONS 属性 を 与え る と 
と が で き な い 。 


2. オォ プシ ョ ン を 記入 する 順序 は 任意 で ある 。 


あ COBOL オ プシ ョ ン は , 指示 され て いる 入口 点 が COBOL 
サブ ブロ グラ ム の 中 の 入口 点 で ある と と を 指定 する た め の 
も の で ある 。 


4. FORTRAN オプ ショ ン は , 指示 され て いる 入口 点 が 
FORTRAN ルー チン の 中 の 入口 点 で ある と と を 指定 する 
た め の も の で ある 。 


ASSEMBLER オ プシ ョ ン は , 指示 され て いる 入口 点 が ア 
セン プラ ー・ ル ー チ ン の 中 の 入口 点 で ある と と を 指定 する 
を ため の も の で ある 。 と の オブ ショ ン は , 以下 の 規則 従っ 
て , PL プエブロ グラ ム か ら 入 口 点 を 呼出 す た め の 便宜 を 
提供 する 。 
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a. OPTIONS(ASSEMB LER ) 属 性 が 宣言 され て い 
る 入口 名 を , 関数 参照 と し て 使用 する と と は で き な 
いい o 


b. 入口 点 を 呼び 出す CALL ステ ー ト メン ト の 中 で , 
意 の 数 の 引数 ( ぞ ロ か ら 入 口 宣言 で 暗示 され て い 
る 数 まで ) を 渡す と と が で きる 。 た だ し , 途中 の 引 
数 を 省略 する こと と は で き な い 。 


ec. INTER オ プシ ョ ン ( 第 7 項 の 規則 を 参照 の と と ) 
が 省略 され て いる 場合 は , 警告 の 診断 メッ モー ジ が 
出さ れ , INTER オ プシ ョ ン が 指定 され て いる も の 
と みな を され る 。 あ る 種 の PL 1{ 規則 準拠 し て い 
れ ば , アセ ンプ ラー・ ル ー チ ン が 処理 し な い 割 込み 
は PL ノブ 1 割込み 取扱 い 機能 C よ っ て 処理 され る 。 
( 当 コ ュ ン パイ ラー の プロ グラ マー の 手引 き を 参照 の 
ee 


NOMAP , NOMAPIN, また は NOMAPOUT オプ ショ ン 
を 指定 する と , PL/1I と COBOL を いし FORTRAN と 
の 間 の イン ター フェ ー ス CC お いて デー タ 集 合体 の 取扱 い が 
行なわ れ を な く を な る 。 同一 の OPTIONS 属性 の 指定 の 中 で , 
と これら の オプ ショ ン を 1 つま た は それ 以上 記入 する と と が 
3 の 


オプ ショ ン ・ キ ー ワ ー ド の 後 C あ る 任意 選択 の 「 引 数 の リ 
スト 」 の 中 で , 各 オ プシ ョ ン が 適用 され る 引数 を 指定 する 
と と が で きる 。 「 引 数 の リス ト 」 の 形式 は 以下 の 通り で あ 
る 。 


(ARGi(,ARGj〕・・・) 


と と で , ji, j, ・・・ は 1 0 進 整数 で ある 。 オ プシ ョ ン 
は それ ぞ れ , ブロ シー ジャ ー 参 照 の 引数 の リス ト C あ る ji 
番目 , } 番 昌 の *5 の 項目 (適用 され る 。 


引数 の リス ト の 中 に は , オプ ショ ン を 適用 すべ き 引 数 だ け 
を 記入 す る 。 引数 を 記入 する 順序 は 任意 で ある 。 


オプ ショ ン の 引数 の リス ト が 指定 され て いな い 場 合 は , 当 
該 入 口 名 が 呼び 出さ れる と き 渡 され る すべ て の 9 引数 に そ 
の オプ ショ ン が 適用 され る 。 


ある 1 つの OPTIONS 属性 の 指定 の 中 で , 指定 また は 想 
定 さ れる 2 つ 以 上 の 引数 の リス ト の 中 同じ 引数 が あっ て 
は な を なら な い 。 


INTER オ プシ ョ ン は , PL 以外 の ルー チン また は サ 
プ ブ ログ ラム の 実行 中 に 発生 し た 割込み の うち , 呼び 出さ 
れ を た ブロ グラ ム ま た は その 関連 機能 に よっ て 処理 され を い 
割込み を , PL{ 割込み 取扱 い 機能 で 処理 する よう 指定 
する を ため の も の で ある 。 


PL ノン 1 KC よっ て 割込み が 正しく 処理 され る よう (C す る た 
め 光 は , ASSEMBLER INTER オ プシ ョ ン の も ゃ も と で 実 
行 さ れる ルー チン は PL ノ [の 規則 ic 準拠 し を けれ ば な ら 
な い , と いう 点 K 注 意 さ れ た い 。 

( 当 コ ン バ ペイ ラー の プロ グラ マー の 手引 を 参照 の こと )。 
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耳 oe 


例 : 


DCL COBOLA OPTIONS(COBOL NOMAP(ARG1 ) 
NOMAPOUT(ARG3) ) : 


CALL COBOLA(X,Y,) ) ノン キネ X)Y) 包 ARE 
STRUCTURES * ネ ン 


。 ・ 
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DCL FRTRNA OPTIONS(FORTRAN INTER ) : 


ノ * 上 AND M ARE 
ARRAYS ネン 


CALL FRTRNA(L,M): 


DCL ASSEMA OPTIONS(ASM INTER ) 
ENTRY (FIXED DEC , , ,FLOAT) : 


CALL ASSEMA(A,B,CD): ノン * ネ VALID ネン 


CALL ASSEMA(A,B): ノ ** VALTID * ン 
CALL ASSEMA: ノ * ネ VALID * ブ 
CALL ASSEMA(A,,,D): ノン ネ INVALID * ン 
OUTPUT 

INPUT の 項 を 参照 の こと 。 

ラメ ー タ ー 選 人 性 


パラ メー ター 属性 は , 呼び 出さ れる プロ シー ジャ ー の 中 の 名 前 が , 
その ブロ シー ジャ ー へ 渡さ れる 引数 を 赤 わし て いる と と を 指定 する 
た め の も の で ある 。 


一 般 規 則 : 
1. ある 議 別 名 を パラ メー ター の リス ト の 中 記入 する と , と 
の 識別 名 は バラ メー ター 必 性 を も つも の と し て 明示 的 宣 
言 さ れる 。 と の 識別 名 添字 を つけ た り , 修飾 し た り し て 
は な ら な ない 。 


2. バラ メー ター の リス ト は , PROCEDURE ま を た は ENTRY 
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ステ ー ト メン ト で 指定 され る 。 バ パラ メー ター・ リ スト の 中 
の バラ メー ター は , 左 か ら 右 向かっ て 順 K, 引数 リス ト 
の 中 の 引数 と 対応 し て いる 。 引数 の 数 と バラ メー ター の 数 
は 同じ で を な けれ ば な を ならない 。 


に 当該 プロ シー ジャ ー の 内 部 ある DECLARE ステ ー ト 
メン ト (C て よっ て , バラ メー ター 属性 以外 の 属性 を 与え る こと 
と が で きる 。 ただし, FILE 以外 の ファ イル 属性 を パラ 
メー ター 対し て 宣言 する こと と は で き な い し , STATIC 
属性 , AUTOMATIC 属 性 , BASED 必 性, BUILTIN 
属性 , EXTERNAL 属性, GENERIC 属 性 , ある い は 
DEF INED 属性 を パラ メー ター に 対し て 宣言 する と と も 
で き な い 。 


4. スト リン グ ・ オ ー バ ベー レー 定義 の 基底 項目 と し て パラ メー 
ター を 使用 する 場合 , また は , レコ ー ド 方 式 の 転送 C ぉ な い 
て バラ メー ター を 指定 する 場合 に は , 明示 的 
CONNECTED 属 性 を 与 を を けれ ば を ら な い 。 


5. 星 印 また は 定数 K よ っ て , 単純 バラ メー ター の 限界 , 長 さ 
お よび 大 き さ を 指定 し な けれ ば な ら な い 。 INITIAL 属 
性 を 与え る と と が で きる の は 枝 制 御 バ パラメーター だ け で あ 
る 。 


6. ある 引数 の 属性 が と の 引数 対応 する パラ メー ター の 属性 
と 一 致し を い 場 合 ,. バラ メー ター の 属性 ic 合致 する 属性 を 
も つ 見 か け 引 数 が 作り 出さ れる 。 と の 後 , 本 来 の 引数 が , 
変換 され , 見 か け 引 数 割り 当て られ る 。 内 部 入口 定数 
関し て は , 自動 的 に この 変換 が 行なわ れる 。 外 部 入口 定数 
お よび 入口 変数 ic 関し て は , 変換 が 必要 で ある な ら げ , 該 
当 す る 入口 宣言 た な いて バラ メー ター 記述 子 の リス ト を 与 
えな けれ ば な ら な い 。 


引数 と バラ メー ター の 関係 に つい て は , 「 第 9 章 : サ プ 
ルー チン と 関数 」 を 参照 され た い 。 


省略 時 属性 : 


DECLARE ステ ー ト メン トペ で 属性 が 与え られ て いな い 場 合 , パ 
ラメ ー タ ー 議 別名 の 頭 文字 を と び 対 応 す る DEBFAULT ス テー トメ 
ント CC も と づい て , 省略 時 属性 が 適用 され る 。 バ ベラ メー ター の 省略 
時 属性 は INTERNAL で ある 。 


PICTURE 
省略 形 : PIC 


PICTURE 属性 は , 文字 スト リン グ ・ デー タ お よび 数 字 デ ー 
タ の 内 部 形式 を ら び 外部 形式 を 定義 し , デー タ の 編集 方 法 を 指定 
する の に 使用 され る 。 数 字 デ ー タ と は , 算術 値 を も っ て いる が , 
計算 機内 部 で は 文字 形式 で 受 え られ る デー タ で ある 。 数 字 デ ー タ 
は , 算術 演算 が 行 を われ る 前 C, 算術 コー ド K 変 換 さ れる 。 


ピク チャ ー 廊 字 C に つい て は , 第 H 部 の 「 ピ クチ ャ ー 指 定 用 の 文字 」 
を 参照 され た \ Yo 


一 般 形 式 : 


PICTURE 


「 廊 字 ビ クチ ャ ー 指 定 ' 1 

「 数 値 ピ クチ ャ ー 指 定 
「 文 字 ビ クチ ャ ー 指 定 」 も 「 数 値 ピ ど ク チャ ー 指 定 ]」 も , ビク チャ ー 
文字 の スト リン グ を 単 一 引用 待 で 胃 ん だ も の で ある 。 個々 の ビク チ 
ャ ー 文 字 の 前 C 繰 返し 因数 を 記入 し て も よい 。 繰返し 因数 は 1 0 進 
弟 数 定数 。 n, を 括弧 で 囲ん だ も の で , ビク チャ ー 娘 字 を + 回 繰 返 す 
こと を 表わす 。 1 が ぞ ロ の 場合 , と の ビク チャ ー 廊 字 は 無視 され る 。 
ビク チャ ー 文 字 の 集 ま り は いく つか の フィ ー ル ド K 分 けら れる と み 
な され る 。 さら MC, フィ ー ル ド が いく つか の サ プ フ ィ ー ル ド K 分 か 
れ て いる と と も ある 。 


一 般 規 則 : 


し [用 字 ピクチャー 指定 」 は 。 交 字 スト リン グ ・ デ ー ク 項目 
iC つ いて 記述 する の 使用 され る 。 


区 [数 値 ど クチ ャ ー 指 定 」 は , その 用 途 < 応 し て , 算術 数 値 
また は 文字 スト リン グ 値 を 表わす 文字 項目 C つ いて 記述 す 
る の 使用 され る 。 


3. 数 字 デ ー タ 項目 の 基数 は 10 で な けれ ば な を な ら な い 。 数 
字 デ ー タ 項目 の スケ ー ル と 精度 は , ビ ピクチャー 次 字 (C よ っ 
て 指定 する 。 基数 属性 , スケ ー ル 属性 , また は 精度 属性 と 
組合 わせ て PICTURE 属 性 を 指定 する と と は で き な い ゝ 
た だ し , 数 字 デ ー タ の モー ド が COMPLEX で ある 場合 
て は , 明示 的 に KCOMPLEX 属性 を 指定 し を けれ ば な ら 
を い 。 


4. 教 値 ピク チャ ー 変 数 は , 算術 デー タ ま た は 算術 数 値 を 表 
わす 文字 スト リン グ ・ デ ー タ し か 割り 当て る と と が で き な 
いい o 
POINTER 


OFFSET の 項 を 参照 の こと 。 


POSITION 


DEFINED の 項 を 参照 の と と 。 


精度 属性 


精度 属性 は , 当該 デー タ 項 目 の 値 を 表わす の に 必要 た 有効 数 字 の 最 
低 桁 数 や , スケ ー ル 因数 ( 2 進 小数 点 を いし 1 0 進 小数 点 の 仮想 位 


置 ) を 指定 する の 使用 され る 。 精度 属性 は 2 進 デ ー タ Cc も 10 進 
デー タ に も 適用 され る 。 


一 般 形 式 : 
( 桁 数 [, スケ ー ル 因数 〕 ) 


「 桁 数 ]」 は 無 符号 の 1 0 進 整 数 定数 で あり , 「 ス ケー ル 央 数 」 は 
1 0 進 整 数 定数 ( 必要 ic 応じ し て 符号 を つけ る ) で ある 。 精度 属性 の 
指定 は , ( p , q ) と 略記 され る と と も ある 。 ( p は 「 桁 数 」 を 表 
わし , q は 「 ス ケー ル 央 数 」 を 表わす ) 。 


一 般 規 則 : 


1. 精度 属性 は , 同じ 表示 レベ ル で 因数 化 さ れ て いる スケ ー ル 
属性 ( FIXED ま た は FLOAT ) , 基数 属性 (DECIMAL 
また は BINARY ), ある い は モー ド 属 性 (REAL 
また は COMPLEX ) の 直ぐ 後記 入 し を けれ ば な を ならない 。 
と の 間 (C キー ワー ド や 名 前 が あっ て は な を なら な い o 


2. 桁 数 は , 当該 変数 ic 割り 当て られ る デー タ 項 日 の た め K 保 
持 す べき 桁 数 を 指定 する た め の も の で ある 。 ス ケー ル 因 数 
は 小数 部 分 の 桁 数 を 指定 する た め の も の で ある 。 な お , ス 
ケー ル 因 数 で 指定 され た 位置 (実際 に 小数 点 が 挿入 さ れる 
わけ で は な く , その 位置 に 小数 点 が ある と 想定 され る に す 
ぎ な い 。 


ky スケ ー ル 因数 は , 固定 小数 点 変数 対し て だ け 指 定 す る と 
と が で きる 。 桁 数 は , 固定 小数 点 変数 に 対し て も る 浮動 小数 
点 変数 CK 対し て も 指定 する と と が で きる 。 


4. スケ ー ル が FIXED で , スケ ター ル 因 数 が 指定 され て いな 
い 場 合 は , スケ ー ル 因数 は ゼロ で ある と みな され る 。 す な 
わ ち , 当該 変数 は 整数 を 表わす と みな され る 。 


Oi 


変数 の スケ ー ル 因数 , また は , タイ プ が FIXPED で ある 中 
間 結 果 の スケ ー ル 因数 は , ー128- 填 127 の 範囲 CK を けれ 
ば な ら な い 。 


6 スケ ー ル 因数 は 負 で も ょ いし , 桁 数 より 大 きく て も よい 。 
負 の スケ ー ル 因数 ( - q ) は つね 整数 を 表わす 。 と の よ ょ 
ゥ うな スケ ー ル 因数 を 指定 する と , 実際 の 右端 の 桁 よ り q 桁 
右 < 小 数 点 が ある も の と みな を され る 。 桁 数 より 大 きい 正 の 
スケ ー ル 因数 ( q ) は つね 小数 部 分 を 表わす 。 と の よ ょ よう 
を スケ ー ル 因数 を 指定 する と , 実際 の 右端 の 杵 より ? 桁 左 
小数 点 が ある も の と みな を され る 。 い ずれ の 場合 に も, 小 
数 点 と 実際 の 数 字 桁 と の 間 に ゼ ロ が ある と みな を され る が , 
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と の ぞ ゼロ ョ は 貯え られ な い 。 実際 貯え られ る の は 指定 され 
て いる 桁 数 だ け で ある 。 


/ PICTURE 属性 と 一 緒 精度 属性 を 指定 する と と は で き な い 。 


8. 許容 され る 最大 の 桁 数 は , 1 0 進 固定 小数 点 デ ー タ の 場合 


は 15, 2 進 固定 小数 点 デ ー タ の 場合 は 1, 1 0 進 浮動 
小数 点 デ ー タ の 場合 は 1 6, 2 進 浮動 小数 点 デ ー タ の 場合 
は 5 3 で ある 。 

省略 時 属性 : 


標準 省略 時 精度 は 次 に ぶす 通り で ある 。 


DECIMAL FIXED (5,0) 
BINARY FIXED (15,0) 
DECIMAL FLOAT (6 ) 
BINARY FLOAT 2 に) 


PRINT 


PRINT 属性 は , 当該 ファ イル の デー タ が 最終 的 に は 印刷 され 
る も の で ある と と を 指定 する も る の で ある 。 PUT ス テー トメ ント の 
PAGE,LINE 両 オプ ショ ン お よび OPEN ステ ー ト メン ト の 
PAGESIZE オ プシ ョ ン は , PRINT 属性 を も る つ フ ァイル KK 対し 
て だ け 使 用 する と と が で きる 。 と れ ら の オプ ショ ン て ついては, 
「J 節 : ステ ー ト メン ト 」 を 参照 され た い 。 


一 般 形 式 : 
PRINT 
一 般 規 則 : 


1. PRINT 属 性 は , OUTPUT 属 性 む ょ び STREAM 属 性 を 
暗示 し て いる 。 


2. PRINT 属 性 と RECORD 属性 と は 両立 し ない 。 ( た だ 
し , RECORD ファ イル を 印刷 装置 と 結び 付け る と と は 
で きる 。 「 第 12 章 : レコ ー ド 方 式 の 転送 」 を 参照 の と と 。) 


る PRINT 属 性 を 指定 する と , ANS 印 刷 装置 制御 文字 を 入 
れる た め (C, 各 レ コー ド の 最初 の デー タ ・ バ イト が 確保 さ 
れ る 。 と の 制御 文字 は , PAGE, SKIP, また は LINE 
形式 項目 えな いし オプ ショ ン (C よ っ て セッ ト さ れる 。 


省略 時 届 性 : 


PUT ス テー トメ ント で FEILE も STRING も 指定 され て いな い 
場合 に は , 標準 出力 フ テ ァイル SYSPRINT で ある と みな され る 。 
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REAL 


COMPLEX の 項 を 参照 の と と 。 


RECORD, STREAM 


RECORD 属 性 と STREAM 属性 は , 当該 ファ イル 対し て 用 
いら れる デー タタ 転送 方 式 を 指定 する た め の も の で ある 。 STREAM 
属性 は , 当該 ファ イル の デー タ が , スト リー ム か ら 変 数 へ ある い は 
式 か ら ス トリ ー ム へ と 割り 当て られ る 交 字 形式 の , 連続 する デー タ 
項目 の 流れ で ある , と み を され る こと と を 表わす 。 RECORD 属 性 は , 
当該 ファ イル が 物理 的 分 離し て いる レコ ー ド の 集 り か ら な っ て お 
り , 各々 の レコ ー ド は 任意 の 形式 の 1 つ 以 上 の デー タ 項 目 か ら を っ 
て いる と と を 表わす 。 各 レコ ー ド は , 独立 し た も の と し て 変数 
( ある い は 変数 か ら ) 転送 され る 。 


一 般 形 式 : 
RECORDISTREAM 
一 般 規 則 : 


1. STKEAM 属 性 を も つ フ ァイル は , OPEN, CLOSE , 
GET,PUT ,ON の 各 ス テー トメ ント お ぉ お ょ よび 割当 て ステ ー 
トメ ント の 中 で だ け 指 定 す る と と が で きる 。 


2. RECORD 属 性 を も る つ フ ァイル は , OPEN , CLOSR , 
READ , LOCATE , WRITE , REWRITE,ON の 各 ス 
テー トメ ント お よ ょ よび 割当 て ステ ー ト メン ト の 中 で だ け 指 定 
する と と が で きる 。 


3 STREAM 属性 を る も る つ ファ イル に 以下 の 属 性 を 与え る と と 
は で きたな い 。 UPDATE ,DIRECT , SEQUENTTAL, 
BACKWARDS , BUFFERED , UNBUFFERED , 


KEYED。 これ ら の 属性 は いずれ も RECORD 属 性 を 暗 
示し て いる 。 


4. RECORD 属 性 を も る つ フ ァイル PRINT 属 性 を 与え る と 
と は で き な い 。 


省略 時 属性 : 


省略 時 属性 は STREAM で ある 。 
REDUCTI BLE 
ITRREDUCTIBLE の 項 を 参照 の と と 。 


RETURNS 


RETURNS 属性 は , 入口 変数 を いし 外部 プロ ンー ジャ ー よ 


っ て 表わさ れる 関数 が 返す 値 の デー タ 必 性 を 定義 むす る た め , 入口 
宮 言 の 中 で 使用 され る 。 


一 般 形 式 : 
RETURNS (属性 ・・・) 
と の 属性 は 次 の ょ うな 方 法 で 使用 され る 。 


DECLARE 識別 名 
( ENTRY (ペラ メー ター 記述 子 の リス ト ) 〕 
[ VARIABLE〕) RETURNS (属性 ・・・) 


一 般 規 則 : 


能 キー ワー ド RETURNS の 後記 入 す る 括弧 で 囲ん だ リス 
ト の 中 の 属性 は , 各々 プラ ンク で 区 切ら を けれ ば な を なら な い 
( た だ し , 精度 属性 の ょ う K 括 弧 で 囲む 必 性 は と の 限り で 
な い ) 。 とれ ら の 属性 は , 当該 入口 名 が 接頭 語 と し て つい 
て いる PROCEDURE を いし ENTRY ス テー トメ ント の 
RETURNS オプ ショ ン で 明示 的 に 指定 され て いる 属性 ま 
た は 省略 時 属性 と 一 致し て いな を けれ ば を ら な い 。 


NN っ 2. とれ ら の 属性 は , 当該 入口 が 関数 と し て 呼び 出さ れ た と き 
返さ れる 値 の デー タ 特 性 を 指定 する た め の も の で ある 。 


3. と と で 指定 する と と の で きる 属性 は , スト リン グ 属 性 な い 
し 算術 属性 ( VARYING を 含む ) , ま た は ,ALIGNED, 
UNALIGNED , POINTER , OFFSET, AREA,F TLE, 
EVEN な ぉ とび LABEL だ け で ある 。 OFTSET 属性 た は 
ェ リ ア 名 を 記入 する と と が で き る が , と の 場合 , と の 名 前 
は 添字 付 の 名 前 , 修飾 され た 名 前 , ま た は 被 定義 名 で あっ 
に て は を ら な い 。 また , AREA 属性 C は エリ ア の 大 き さ を 
記入 する と と が で きる し , LABEL 属性 (は ラベ ル 定 数 
の リス ト を 記入 する と と が で きる 。 


4. 外部 関数 プロ シー ジャ ー の , 明示 的 宣言 され て いる 入口 
定数 jc 対し て RETURNS 属性 が 指定 され て いな い 場 合 (C 
は , その 入口 定数 の 識別 名 に も と づい て 省略 時 属性 が 適用 
され る 。 標準 省略 時 属性 C つ いて は 以下 で 説明 する 。 


注 : プロシージャー 関 数 参照 か ら 返さ れる 値 の 属性 は , 
RETURNS で 指定 され て いる 属性 と 一 致し て いな けれ 
ば を たら な い 。 一 致し て い を いと , 変換 は 行なわ れ を な い の で 
誤り に な る 。 


スネ ストリング の 長 さ な よび エリ ア の 大 き さ は , 1 0 進 整数 定 
数 で 指定 し を な けれ ば を ら な を い 。 返さ れる 値 は , こと で 指定 


され て いる 長 さ また は 大 き さ で ある 。 


省略 時 属性 : 

外部 入口 点 に 対し て RETURNS 属性 が 指定 され て いな を い 場合 は , 
省略 時 属性 を も つ RETURNS 属性 が 指定 され て いる も の と みみ を さ 
れる 。 省略 時 属性 は , DERFAULT ステ ー ト メン ト で 指定 され て い 
る 属性 また は 標準 省略 時 属性 で ある 。 I か ら N の 間 の 交 字 で 始ま る 
入口 の 標準 省略 時 属性 は REAL FIXED BINARY(15,0) で 
あり , と れ 以 外 の 入口 の 標準 省略 時 属性 は REAL FLOAT 

DEC IMAL( 6 ) で ある 。 


SEQUENTIAL 


DIRECT の 項 を 参照 の と と 。 


サイ ズ 属 性 


AREA の 項 を 参照 の と と 。 


STATIC 


AUTOMATIC の 項 を 参照 の と と 。 


STREAM 


RECORD の 項 を 参照 の こと 。 


UNALIGNED 


ALIGNED の 項 を 参照 の と と 。 


UNBUFFERED 


BUFFERED の 項 を 参照 の こと 。 


UPDATE 


INPUT の 項 を 参照 の と と 。 


VARIABLE 


VARIABLE 属 性 は , ENTRY 属 性 と 一 緒 に 使用 し た と き は その 
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識別 名 が 入口 変数 の 名 前 で ある と と を 指定 し , FILE 属性 と 一 緒 
KC 使用 し た と き は その 識別 名 が ファ イル 変数 で ある と と を 指定 し , 
LABEL 属性 と 一 緒 c 使 用 し た と き は その 議 別名 が ラベ ル 変 数 で 
ある と と を 指定 する る の で ある 。 


一 般 形式 : 


VARIABLE 
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一 般 規 則 : 


1. VARTABTLE 属性 は , 入口 変数 , ファ イル 変数 また は 
ラベ ル 変 数 の 宣言 の 中 で だ け 指 定 す る こと が で きろ る 。 


VARYING 


BI 和 T の 項 を 参照 の と と 。 


に 
ーーーー 


と の 節 で は , PL の 個々 の ステ ー ト メン ト つい て テル フィ で 
ッ ト 順 C 説 明 す る 。 (プリ プロ セッ サー・ ス テー トメ ント は , と 
の 節 の 末尾 で アル ファ ベッ ト 順 (C 取 り 上 げ る 。 ) ステ ー ト メン ト の 
説明 は 大抵 の 場合 , 次 の ょ うな 項目 か ら 構 成 さ れ て いる o 

1 ステ ー ト メン ト の 意味 と 用 法 に つい て の 科 単 を 説明 。 

2. 一 般 形 式 -- ステ ー ト メン ト の 構文 法 。 


3 構 区 法 細則 - - 一 般 形 式 の 項 で 触れ られ て いな い 構 文法 細 
則 。 


4.。 一 般 規則 - - PL ルプ T プ ログ ラム の 中 で の ステ ー ト メン ト 
の 用 法 な よび 意味 に 関す る 規則 
ALLOCATE 


ALLOCATE ネ テー トメ ント は , 指定 され て いる 被 制 御 デ ー タ ま 
た は 基底 付 デ ー タ (Cc 記憶 域 を 割り 振る た め の も の で ある 。 


一 般 形 式 
ALLOCATEB オ ォ オプション 〔[ , オ ブシ ョ ン 〕)・・・ 5 
と と で 、 「 オ プシ ョ ン ]| は 次 の いずれ か の 形式 を と る o 
オプ ショ ン 1 : 
「 レ ベル 」 識別 名 | 次元 
[属性 ] ・ 
ォ オプション 2・ 
基底 付 変数 識別 名 
[SET ( 要素 ロケ ー タ ー 変 数 ) 〕 
[ 1 N ( 要素 ェ リ ア 変 数 ) 〕 
構文 法 細 則 1 6 は , オプ ショ ン 1 C だ け 適 用 され る o 
1 「 レ ベル | の と と ろ C は レベ ル 番 号 を 記入 する 。 キー ワー ド 
ALLOC AT P の 後 の 最初 の 識別 名 は , レベ ル 1 の 識別 名 で 


な けれ ば な ら な を ない 。 


2. 各 識 別名 は , 被 制 御 記憶 域 ク ラス の デー タ を 表わし て いる か , 
想 制 御大 構造 の 要素 で を な けれ ば ならない 。 


る [次 元 |」 の と と ろ C と は 次 元 属性 を 記入 する 。 「 属 性 」 の と と 
ろ C は BIT,CHARACTER ,AREA, また は 


INITTIAL を 記入 する 。 


4. 次 元 属性 を 記入 する 場合 , その 次 元 の 数 は 対応 する 識別 名 の 
宣言 で 指定 され て いる 次 元 の 数 と 等 し く な けれ ば な ら な い ゃ 


5. BI 属性 は , BIT 識 別名 に 対し て だ け 与 える と と が で き 
る 。 CHARACTER 属 性 は CHARACTER 識 別名 に 対し 
て だ け 与 を る と と が で きる 。 AREA 属 性 は , エリ テア 識別 名 
(C 対 し て だ け 与 える と と が で きる 。 


6 あぁ る 要素 を 含ん で いる 大 構造 全体 の 相対 的 を 組立 て 方 が , こ 
の 構造 対す る DECLARE ステ ー ト メン ト の 指定 と 同じ 
で ある 場合 (限り , その 構造 メン バー 名 ( 大 構造 名 は 除く ) 
を 記入 する と と が で きる 。 と の 場合 , 次 元 属性 を も ぉ つも の と 
し て 宣言 され て いる すべ て の 識別 名 に 対し て その 次 元 属性 を 
指定 し を な けれ ば を ら な い 。 


構文 法 細 則 7 8 は , オプ ショ ン 2 に だ け 適 用 され る o 


7 ALLOCATE ステ ー ト メン ト KC 記 入 す る 基底 付 変数 は 要 
素 変数 , 配列 , 大 構造 の いずれ で あっ て も よい 。 と れ が 大 構 
造 で ある 場合 , 大 構造 名 だ け を 指定 する 。 


8 SET ォ オプ ション を 指定 する 場合 , と れ は IN オプ ショ ン の 
前 に あっ て も \ 後 C あ っ て も $ も よい o 


一 般 規 則 


一 般 規 則 1 6 は , オプ ショ ン 1 と だ け 適 用 され る o 


1 ォ プ ショ ン 1 を 使用 する 場合 Cc, ALLOCATE ステ ー ト 
メン ト で 指定 し て いる 識別 名 の 記憶 域 が す で C 割 り 振ら れ 
た も の で 。 まだ 解放 され て いな いな を ら ば , と の 識別 名 の 記 培 
域 は 押し 下げ られ る ( す を わ ち も, 積 人 重ね られ る )o。 と いう 
こと は , と の 議 別名 の 新 し い 世代 の デー タ が 作ら れる と いう 
と と で ある 。 と の 後 , TREE ステー トメ ント を 使っ て と の 
識別 名 の 記載 域 を 解放 する と , 記憶 域 は 押し 上 げ ら れる ( す 
な わ ち , 積み 重ね た 記憶 域 が 取り 除 か れる )。 


の 配列 の 限界 , スト リン グ の 長 さ , お よび エリ ア の 大 き さ は 
ALLOCATE ステ ー ト メン ト の 実行 の と き 《 確 定 さ れる o 


a. ALLOCATE ステ ー ト メン ト の 中 で 限界 , 長 さ , ま 
た は 大 き さ が 明示 的 に 指定 され て いる 場合 に は , その 指 
定 が と られ , DECLARE ステ ー ト メン ト の 中 で の 指 
定 は 無効 に を なる 。 
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b. ALLOCATEE ステ ー ト メン ト の 中 で 限界 , 長 さ , * 一 般 規 則 7 1 1 は オプ ショ ン 2 (と だ け 適 用 され る 。 


を は 大 き さ と し て 星 印 を 記 人 し た 場合 は , 現在 の 世代 の 
限界 , 長 さ 。 また は 大 き さ が と られ る 。 変数 の 世代 が 存 


在 し を い 場 合 は , 限界 , 長 さ 。 また は 大 き さ は 定義 で き ん 


を い の で , その プロ グラ ム は エラ ーC な る 。 


c. ALLOCATE ステ ー ト メン ト , また は DECLARE 


を いし DEFAULT ステ ー ト メン ト の 中 で , 識別 名 !C 8. 


与 を る べき 次 元 の 大 き さ ま た は 長 さ 属 性 を 指定 し を けれ 
ば な ら な を な い 。 DECLARE な いし DEFAULT ステ 
ー ト メン ト か ら と られ た 式 の 値 は , 割 振り の 時 点 で , 
ALLOCATE ステ ー ト メン ト で 解禁 され た 条件 を 用 
いて , 計算 され る 。 ただし, 識別 名 は , DBCLARE 
な を いし DEFAULT ステ ー ト メン ト の 環境 MC な いて 解 
釈 され る 。 


d. ALLOCATE ステ ー ト メン ト ま た は DECLARE 
ステ ー ト メン ト の 中 で , 割り 振り の 行なわ れる 変数 へ の 
参照 を 含ん で いる 式 (C よ っ て 限界 , 長 さ ふ ,。 また は エリ ア 
の 大 き さ が 指定 され て いる 場合 は , その 変数 の 一 番 新 し 
い 世 代 の 値 を 使っ て その 式 の 値 が 計算 され る 。 


3 ある 識別 名 が ALLOCATEE ステ ー ト メン ト ま た は 
DECLARE ステ ー ト メン ト の 中 で INITIAL 属性 を 
与え られ て いる 場合 は と の 議 別 名 が 割り 振ら ちら れる と き K 
と れ に 初期 値 が 割り 当て られ る 。 INITIAL 属性 の 中 の 
式 ま た は CALL オプ ショ ン は , 割 振り の と き 
ALLOCATE ステ ー ト メン ト で 解禁 され た 条件 を 使っ 
て , 実行 され る 。 た だ し , 識別 名 は その 宣言 の 環境 に な いて 
解 息 さ れる 。DECLARE, ALLOCATE 両 ス テー トメ 


ント で INITIATL 選 性 が 指定 され て いる 場合 は , 10. 


ALLOCATE ステ ー ト メン ト の INITIAL 属性 が 使 
用 され る 。 初期 値 化 を 行なう の 今 記憶 域 の 割 振 り を 行なっ 
て いる 変数 を 参照 する 必要 が ある 場合 , その 変数 の 新 し 世 
代 が 参照 され る 。 


4 ALLOCATTON 組 込み 関数 を 使用 する と , ある 識別 名 の 11. 


記憶 域 が 割り 振ら れ て いる か 否 か 確か め た り , その 議 別 名 
の 世代 が いく つ あ る か 調べ た りす る と と が で きる 。 


5 CONTROLLED が 宣言 さん て いる パラ メー ター を , 
ALLOCATE ステ ー ト メン ト の 中 で 指定 する と と が で き 


る o 12. 


6 ALLOCATE ステ ー ト メン ト の 実行 の 時 点 で 行なわ れる 
いく つか の 式 の 値 の 計算 ( た と を ば , INITIAL 属性 の 
中 に ある いく つか の 式 の 値 の 計算 ) は , 互い 依存 関係 に あ 
っ て は な ら な いら 。 
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オォ オプション 2 を 使用 する 場合 は , 記憶 域 は 押し 下げ られ な い 
( つま り , 積み 重ね られ な い ) 。 と の 場合 は , ロケ ター ター 変 
数 を 用 いて 基底 付 変数 の どの 世代 で も 参照 する こと が で きる 。 


基底 付 変 数 の 割り 振り (C は 割り 振る べき 基底 付 変数 , 新 し 
い 世 代 を 識別 する た め の ロ ケー ター 変数 。 な よび ( エリ ア の 
中 に 新しい 世代 を 割り 振る 場合 に は ) エリ テ が 関係 する 。 
SE オプ ショ ン を 指定 し な いと , SET ォ プ ショ ン は 基底 
付 変数 の 宣言 の BAS ED 属性 で 与 を られ て いる ロケ グー ター 
変数 を 指定 し て いる も の と みな され る 。 と の 場合 , と の 
BASED 属性 で = ケー ター 変数 が 指定 され て いな けれ ば , 
誤り (と を る 。 SET オ プシ ョ ン で オフ セッ ト 変 数 を 指定 し て 
お り , IN オプ ショ ン を 指定 し て いな い 場 合 に は , I N ォ プ 
ショ ン は オフ セッ ト 変 数 の 宣言 の OFFSET 属性 で 与 を ら 
れ て いる エリ ア を 指定 し て いる も の と み を され る 。 と の 場合 , 
と この OFFSET 属性 で エリ アブ 変数 が 指定 され て い を けれ ば , 
誤り (て な る 。 


SET オ ォ オプ ション で オフ セッ ト 変 数 を 指定 し た 場合 は 。 新 し 
い 世 代 を 表わす ログ ケー ター 値 が この オフ ャ ッ ト 変 数 割り 当 
て られ る 。 と の 場合 , IN オプ ショ ン を 指定 する か , 1 N+ 
プシ ョ ン が 想定 さん る よら (C し な けれ ば を ら な い 。 また , こと 
の IN オプ ショ ン で は , オフ セッ ト 変 数 の 宣 斉 の OFFSET 
属性 で 指定 され て いる エリ ア と 同じ も ゃ の を 指定 する か , と の 
エリ アア 含ま れ て いる か と の エリ ア を 含む エリ ア を 指定 し な 
けれ ば な ら な い 。 


TIN ォ プシ ョ ン が 指定 され て お ら ず , し か も IN オプ ショ ン 
の 指定 が 想定 され を い 場 合 は , とこ の ALLOCATE ステ ー 
トメ ント を 実行 する プロ グラ ム と 結び 付け られ て いる 記憶 域 
(C 新 し い 世 代 が 割り 振ら れる 。 と の 場合 , S ET ォ プ ショ 
ン で ボイン ター 変数 を 指定 し を な けれ ば を ならない 。 


ALLOCATE ステ ー ト メン ト で TIN ォ プシ ョ ン を 指定 し 
て いる 場合 , また は TI N オ プシ ョ ン の 指定 が 想定 され る 場合 
(C は , 基底 付 変数 の 記 起 域 は こと で 指示 され て いる エリ ア 
割り 振ら れる 。 この エリ ア K 充 分 た 大 き さ の 記憶 域 が か ない 
場合 は , AREA 条件 が 引き 起 され る 。 


ある 基底 付 変 数 に 割り 振ら れる 記憶 域 の 量 は , 割 振り の 時 
点 で その 変数 に 適用 され て いる 必 性 , 次 元 の 指定 , 長 さ の 指 
定 , お よび 大 き さ の 指定 に よっ て 決ま る 。 と れ ら の 属性 は , 
基底 付 変数 の 宣言 に た も る と づい て 決定 され る 。 

ALLOCATE ステ ー ト メン ト で 属性 を 追加 ナ る と と は で 
き な い 。 基底 付 構造 に , 調節 可能 を 配列 の 限界 , スト リン グ 


オプ ショ ン 1  ( 要素 割当 て ) 
素 変 数 


似 変 数 


( 配列 割当 て ) 


列 変数} 〔 , 


( 構造 割当 て ) 


造 変 数 E 数 構 : に し,BY _ NAME] 


似 変 数 


図 J.1 割当 て ステ ー ト メン ト の 一 般 形 式 


の 長 さ , ま を た は エリ ア の 大 き さ が 含ま れ て いて も よい (第 1 1. 集合 体 割当 て (オプ ショ ン 2 と 3 ) は , 一 般 規 則 5 一 8 K 従 
部 , 「 記 憶 域 の 制御 |] の 「REFER オォ オプション] を 参照 の っ て , 一 連 の 要素 割当 て と 展開 され る 。 

と と 。 ) 基底 付 変数 の 限界 , 長 さ , 大 き さ を 指定 する の 《C 星 

印 を 使用 する と と は で き な い 点 (と 注意 さ れ た い 。 2. 要素 割当 て は 次 の よう CC し て 行なわ れる 。 


a. 目標 変数 の 添字 と ロケ ー タ ー 修 飾 語 の 値 , な よび , 
割当 て ステ ー ト メン ト SUBSTR 擬似 変数 参照 の 2 番目 と 3 番目 の 引数 の 値 
が 計算 され る ( 犬 字 の 値 が 計算 され る 順序 は 不定 で ある 。 ) 
割当 て ステ ー ト メン ト は , 式 の 値 を 計算 し , その 値 を 1 つ 以 上 の 日 


標 変数 に 割り 当て る の 刀 使 用 され る 。 日 標 変 数 は 要素 変数 , 配列 変 b. 次 いで , 割当 て 符号 の 右側 に あぁ ある 式 の 値 が 計算 され る 。 

数 構造 変数 の いずれ で あっ て も よい 。 また , 日 標 変数 が 擬似 変数 

で あっ て も よい 。 c. 各 目 標 変 数 ど と C( 左 か ら 右 に 向かっ て ) , デー タ 変 換 
規則 MC 従っ て , 式 が 目標 変数 の 特性 (C 変 換 さ れる (た だ 

一 般 形式 : し , 算術 デー タ の 基数 の 変換 が 行 た われ る 場合 は つね, 
値 が , 直接 , 目標 変数 の 精度 に 変換 され る )。 と の 後 , 

割当 て ステ ー ト メン ト C は , 3 つの 一 般 形式 が ある 。 これ を 図 J. 変換 され た 値 が 目標 変数 に 割り 当て られ る 。 

1 と 示 す 。 


3 以下 の 規則 が , スト リン グ 有 要素 割当 て 適用 され る 。 


構文 法 細 則 : 
a. 割当 て は , 左端 の 桁 か ら 始ま り 右 多 向 か っ て 進め られ る 。 


1 オプ ショ ン 2 で は , 各々 の 目標 変数 は 配列 で を けれ ば な ら な 


い 。 割当 て 符号 の 右側 構造 の 配列 が あ る 場合 , 目標 変数 も b. 目標 変数 が 固定 長 ス トリ ング で ある 場合 , 式 の 値 が 長 す 
すべ て 構 告 の 配列 で を けれ ば を ら な い 。 割当 て 符号 の 右側 ぎる を ら ば その 右 の 方 が 切り 捨て られ る ( 切捨て が 行 を 
少な を たく と も 1 つの 構造 が ある 場合 に だ け , BY NAME ォ われ る と , STRTINGS 1 ん E 条 件 が 解禁 状態 C あれ ば 
プシ ョ ン を 与え る と と が で きる 。 と の 条件 か 引き 起 さ れる ) 。 また , 式 の 値 が 短 か す ぎる な 


2. オプ ショ ン 3 で は , 各々 の 目標 秦 数 は 構造 で を けれ ば な を な ら な いら 。 


一 般 規 則 : 
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ら ば , 右 の 方 に バディ ング が 行なわ れる ( 文字 スト リン 
グ の 場合 C に は , プラ ンク の バディ ング が 行なわ れ , ビッ 
ト ・ ス トリ ング の 場合 に C に は ゼロ の バディ ング が 行なわ れ 
る )。 (スト リン グ 擬 似 変数 は , 固定 長 ス トリ ング で あ 
る と みみ を され る 点 人 注意 さん たい )。 こう し て 得 ら れ た 
値 が 目標 変数 に 割当 て られ る 。 


c. 目標 変数 が VARYING スト リン グ で あり , と の 変数 
の 宣言 で 指定 され て いる 最大 の 長 さ より ゃ 式 の 値 が 長い 
場合 に は , 値 の 右 の 方 が 切り 捨て られ る (STRINGSTZB 
条件 が 解禁 状態 に あれ ば , と の 条件 が 引き 起 さ れる )。 
目標 スト リン グ の 現時 点 の 長 さ は , その 最大 の 長 さ に を 
る 。 式 の 値 が 最大 の 長 さ より 長く を い 場 合 C に は , その 値 
が 割り 当て られ る 。 と の 場合 , 目標 スト リン グ の 現時 点 
の 長 さ は 値 の 長 さ C 等 し く な る 。 


その 他 の 要素 割当 て に は , 以下 の 規則 が 適用 され る 。 


a. 日 標 変数 が エリ ア 変 数 で ある 場合 C は , 式 は エリ プ 変 数 
か 関数 で を な けれ ば な ら な い 。 割り 当て られ る エリ ア の 現 
時 点 の 範囲 に くら べ て 目標 エリ ア の 大 き さ が 不 充 分 で あ 
る 場合 は , と の 割当 て (と よっ て AREA 条件 が 引き 起 さ 
れる 。 


b. 目標 変数 が ポイ ンタ ー 変 数 で ある 場合 C は , 式 は ポイ ン 
ター 変数 ( を た いし オフ モット 変数 ) また は ポイ ンタ ー 関 
数 参照 ( な た い レ オフ セッ ト 関 数 参照 ) で も けれ ば な ら な 
い 。 式 が オフ セ モット ・ タ イプ で ある 場合 は , その 値 が ポ 
イン ター 変換 され る 。 


c. 目標 変数 が オフ セッ ト 変 数 で ある 場合 に は , 式 は オフ セ 
セッ ト 変 数 ( た いし ポイ ンタ ー 変 数 ) また は オフ セッ ト 
関数 参照 ( を いし ポイ ンタ ー 関 数 参照 ) で な けれ ば な ら 
な い 。 式 が ポイ ンタ ー・ タ イプ で ある 場合 は , その 値 が 
オフ セッ ト K 区 変換 され る 。 


d. 目標 変数 が ラベ ル 変 数 で ある 場合 に は , 式 は ラベ ル ん 式 で 
な けれ ば な ら な いら 。 環境 情報 ( プロ ッ ク の 呼出 し を 識別 
する た め の 情 報 ) は , つね C, ラベ ル 変 数 と 割り 当て ら 
れる 。 


e. 目標 変数 が 事象 変数 で ある 場合 に は , 式 も 事象 変数 で を 
けれ ば な ら な い 。 と の 割当 て の 間 C 割 入 み が 起こ る と と 
は た なく , 完了 値 と 状況 値 の 双方 が 割り 当て られ る 。 事 旬 
変数 は , 活用 状態 に ある 事象 変数 が 割り 当て られ て いる 
間 !C, 活用 状態 に な る と と は な じい 。 活用 状態 に ある 事象 
変数 C 割 当て を 行なう と 誤り に な る 。 
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f . 日 標 変数 が STATUS 擬似 変数 で ある 場合 に は , 事象 
変数 が 活用 状態 C あ る か 否 か に か か わり な く , 値 を 割り 
当て る と と が で きる 。 名 前 を 指定 し た 事象 変数 が 活用 状 
態 C あ る と き (CCOMPLET ION 擬似 変数 割り当て 
を 行なう と 誤り (C な る o 


g。 日 標 変数 が 入口 変数 で ある 場合 C に は, 式 は 入口 式 で なけ 
れ ば な ら な い 。 


h. 日 標 変数 が ファ イル 変数 で ある 場合 に は , 式 は ファ イル 
式 で を な けれ ば な を ならない 。 


。 集合 体 割 当て の 最初 の 目標 変数 は , マス ター 変数 と 呼ば れる 。 


マス ター 変数 が 配列 で ある 場合 に は , 配列 展開 (規則 6 ) が 
行なわ れる 。 と れ 以 外 の 場合 C は , 構造 展開 (規則 7 , 8 ) 
が 行なわ れる 。 日 標 変数 へ の 割当 て と 関 する CHECK 条件 
が 解禁 状態 KC あれ ば , 各 要 素 へ の 割当 て の 後 CHECK 条件 
が 引き 起 さ れる 。 BY NAME 割当 て の 場合 に は , ある 項 
目 C 値 が 割り 当て られ た か 否 か に か か わり な く , 日 標 変数 に 
関し て CHECK 条件 が 引き 起 さ れる 。 も と の ステ ー ト メン 
ト の ラベ ル 控 融 語 は , 生成 され た 他 の ステ ー ト メン ト の 前 と 
ある ナル ・ ス テー トメ ント 克 適 用 され る 。 


オプ ショ ン 2 で は , すべ て の 配列 オペ ラン ド の 次 元 数 な よび 


限界 が 同じ で な を けれ ぱな ら な い 。 配列 割当 て は 次 の よう みな 形 


式 の ルー プ に 展開 され る 。 


LABEL: DO j1 = LBOUND( マス ター 変数 , 1 ) TO 


HBOUND( マス ター 変数 , 1 ): 


DO j2 = テ LBOUND( < スタ ー 変 数, 2 ) TO 
HBOUND( マスター 変数 , 2 ) : 


DO jn = LBOUND( テス ター 変数 , n ) TO 
HBOUND( マス ター 変数 , n ): 
生成 され た 割当 て ステ ー ト メン ト 
END LABEL: 
と の 展開 (と ない て , n は 割当 て 関与 する マス ター 変数 の 次 


元 の 数 で ある 。 生成 され た 割当 て ステ ー ト メン ト お いて は 
配列 オペ ラン ド C は すべ て , ( 左 か ら 右 (CC 向かっ て 順 (C ) 見 


か けり 変数 j 1 一 jn を 用 いて :, 完全 を 形 の 添字 が つけ られ 
る 。 配列 キオ ペラ ンド 添字 が つい て いな いと き は , と の 配列 
オペ ラン ド は j1 一 jn の 添字 だ け を も つと と に て な る 。 


楠 新 面 表記 が 使用 さ れ て いる 場合 (と は , 星 印 が }1 一 jn 
C 儲 き 換 を られ る 。 も と の 割当 て ステ ー ト メン ト ( と れ が 規 
則 7 また は 規則 8 I 人 準じ て 生成 され た ステ ー ト メン ト で ある 
と と も ある ) が 条件 接頭 語 を も つ 場 合 に は , 生成 され た 割当 
て ステ ー ト メン ト に も る と の 条件 接頭 語 が つけ られ る 。 も と の 
割当 て ステ ー ト メン ト ( とれ が 規則 8 (と 準 じ て 生 成 さ れ た も 
の で ある と と も ある ) が BY NAM オプ ショ ン を も る つ 場 
合 C は , 生成 され た 割当 て ステ ー ト メン ト C も BY NAME 
オプ ショ ン が 与え られ る 。 生成 され た 割当 て ステ ー ト メン ト 
が 構造 割当 て で ある 場合 C に は , この ステ ー ト メン ト は 以下 の 
よう とし て 展開 され る 。 


オプ ショ ン 3 な いて BY NAMEP オプ ショ ン が 指定 され 
て いな らい 場合 (に は , 次 の よう な 規則 が 適用 され る 。 


2. どの オペ ラン ド も 配列 で あっ て は を ら を な い 。 た だ し , オ 
ベラ ンド が , 配列 を 含ん で いる 構造 で あっ て も よい 。 


b. 構造 オペ ラン ド K 直 接 含ま れ て いる 項目 の 数 ( k ) は , 
すべ て の 構造 オペ ラン ド K 関 し て 同じ で を けれ ば な ら な 
い 。 


e. 割当 て ステ ー ト メン ト ( と れ が 規則 6 に 準じ て 生成 され 
た ステ ー ト メン ト で ある と と も ある ) は , k 個 の 生成 さ 
れ た 割当 て ステ ー ト メン ト K 置 き 換 えら れる 。 生成 され 
た 割当 て ステ ー ト メン ト の 1i 番目 の も ゃ の は , も と の 割当 
て ステ ー ト メン ト C お いて 各々 の 構造 オペ ベラ ンド を その 
中 に 含ま れ て いる 1i 番目 の 項目 で 置き 換え る と と (C よ っ 
て 得 られ た 割当 て ステ ー ト メン ト で ある 。 と の よら し 
て 生成 され た 割当 て ステ ー ト メン ト を , さら K, 規則 6 
また は 規則 7 従っ て , 展開 し な けれ ば な ら な いと と も 
ある 。 生成 され た すべ て の 割当 て ステ ー ト メン ト と は , 
も と の ステ ー ト メン ト の 条件 接頭 語 が つけ られ る 。 


オプ ショ ン 3 ぅ な いて BY NAME オプ ショ ン が 与え られ 
て いる 場合 に は , 構造 割当 て ( これ が 規則 6 (C 準 し て 生成 さ 
れ た 割当 て で ある と と ゃ も ある ) は, 以下 の a <dK 従 っ て 展 
開 さ れる 。 と の 場合 , どの オペ ラン ド も 配列 で あっ て は を ら 
を い 。 


4. マス ター 変数 直接 含ま れ て いる 最初 の 項目 が 検討 され 
る o 


b. 各 和 構造 オペ ラン ド お よび 目標 変数 に 直接 含ま れ て いる 項 
目 の 中 同じ 識別 名 を る つも の が あ る 場合 に は , 次 の よ 
らし て 割当 て ステ ー ト メン ト が 生成 され る 。 各々 の 構 
造 オ ペラ ンド お よび 日 標 変数 を , 各々 (直接 含ま れ て お 
り し か も この 識別 名 を も つ 項 目 に よっ て 置き 換え る と と 
(て より , 割当 て ステ ー ト メン ト が 得 ら れる 。 と の よう な 


識別 名 を 含ん で いな い 構 造 が か あ る と , 割当 て ステ ー ト メ 
ント は 生成 され な い 。 生成 され た 割当 て が 機 告 割当 て ま 
た は 構造 の 配列 割当 て で ある 場合 に は , BY NAME 
が つけ られ る 。 最初 と 生成 され た 割当 て C は , も と の 割 
当て ステ ー ト メン ト の ラベ で ベル 接頭 語 が 与え を られ る 。 また , 
生成 され た すべ て の 割当 て ステ ー ト メン ト て も と の 割当 
て ステ ー ト メン ト の 条件 接頭 語 が 与え られ る 。 


c. マス ター 変数 直接 含ま れ て いる 各々 の 項目 に つい て , 
b の 操作 が 繰り 返さ れる 。 マスター 変数 に 含ま れ て いる 
項目 の 順に , 割当 て ステ ー ト メン ト が 生成 され る 。 


d. a か ら c の 操作 に よっ て , さら , 配列 割当 て や 構造 割 
当て が 生成 され る と と が ある 。 こと れ ら の 割当 て は , 規則 
6 >8 従っ て , 展開 され る 。 


BEGIN 


BEGIN ステ ー ト メン ト は , 開始 プロ ッ ク の 冒頭 に あっ て 開始 プ 
ロッ ク を 識別 する た め の も の で ある 。 


一 般 形式 : 


BEGIN [ORDERIREORDER 〕 : 


構文 法 細 則 : 


1 BEGIN ステー トメ ント の ラベ ル は 添字 付き の も ゃ の で も よ 
い o し か し , END ス テー トメ ント と と の よう な ラベ ル を 記 
入 す る と と は で き な い 。 


一 般 規 則 : 


1 BEGIN ステ ー ト メン ト は , END ス テー トメ ント と 対 
を る も の で , ある 1 つの 開始 アデ ロック を 区 切る の 使用 され 
る 。 開始 ブロック と つい て の 詳細 は , [第 6 章 : プロ グラ 
^ の 構成 ] を 参照 の こと 。 


2. ORDER と REORDER は 最適 化 に 関す る オプ ショ ン で あ 
る 。 す な わ ち , ORDER と REORDER は , どの 程度 まで 
当該 ブロ ッ ク を 最適 化す べき みか 指定 する た め の も の で ある 。 
一 般 C, ORDER を 指定 する と , ある ブロ ッ ク お お いて セ 
ッ ト さ れ た 変数 の 最も 新しい 値 は せ は. その ブロ ッ ク の 実行 中 

意 の 場所 か ら 入 っ た 計算 関係 の オン ・ ユ ニッ ト の 中 で 使用 
する と と が で きる , と いう 程度 まで 最適 化 が 進め られ る 。 
REORDER を 指定 する と , と れ 以 上 MC 最適 化 が 進め られ 
る 。 し た が っ て , REORDER が 指定 さん て いる と , ある ブ 
ロッ ク の 実行 中 に C 入 っ た オン ・ ユ ニッ ト に お いて , その プ ブロッ 
ク で セッ ト さ れ た 変数 の 最も 新しい 値 が 使用 で き な い と と も ある 。 


り 節 : ステ ー ト メン ト 37 1 


CALL 


CALL ステ ー ト メン ト は , プロ シー ジャ ー を 呼び 出し , その プロ 
シー ジャ ー の 中 の 指定 され て いる 入口 点 K 制 御 を 渡す ょ 指示 する 
た め の も の で ある 。 


一 般 形 式 : 


CALL {入口 式 | 総 称名} 
[ ( 引数 [ , 引数 })・・・)〕) 


構文 法 細 則 ・ 


1. 入口 式 総称 名 を いし 組込み 名 に よっ て , 呼び 出さ れる サ ズ 
ルー チン の 入口 点 を 指示 する 。 


2. 入口 式 が 表 わ し て いる 入口 定数 が , 外部 入口 定数 で あり , 当 
該 C じ ALL ス テー トメ ント を 含ん で いる ブロ ッ ク の 中 で 知ら れ 
て いな いも の で ある と , 誤り (と な る 。 し た が っ て , 当該 プロ 
ッ ク の 外部 に ある と の ょ うな 入口 定数 を 使用 する 場合 に は , 
当該 ブロ ッ ク と な いて と れ ら す べ て を 明示 的 宣言 し た な けれ 
ば な ら な を い 。 


一 般 規 則 : 


1. RETURN ステート メン ト ( RETURN 式  ) に よっ て 呼出 し 
プロ シー ジャ ーM 制 御 が 戻さ れる 場合 に は , プロ シー ジャ ー 
の 呼出 し (CC ALL ステ ー ト メン ト を 使用 し て は を ら な い 。 


2. 引数 と , 呼出 され た プロ シー ジャ ー の 中 で と の 引数 を 表 わ 
す パ ラメ ー タ ー と が 相互 C ど の よら と 影響 を 及 信 し 合 2 か に 
つい て は , 「 第 9? 章 : サブ ルー チン と 関数 ] を 参照 の こと 。 


CLOSE 


CLOSE ステ ー ト メン ト は , と と で 指定 され て いる ファ イル 式 と 
当該 ファ イル が 開か ふれ た と き (C て と の ファ イル 式 結 び 付 けら れ た デ 
ー タ ・ セ ッ ト と の 関係 を 断ち 切る た め の も の で ある 。 


一 般 形式 : 


CLOSB FEILE( フ ァイル 式 ) 
[ ENVIRONMENT (LEAVEIUNLOAD ) 〕 
( ,FILE (ファ イル 式 ) 
[ ENVI RONMENT (LEAVE1UNLOAD )〕 ] ・・・: 


一 般 規 則 : 


1. FILE オ プシ ョ ン は , どの ファ イル を 閉じる か を 指定 する た 
め の も の で ある 。 1 つの CLOSE ス テー トメ ント で 2 つ 以 上 
の ファ イル を 閉じ る と と が で きる 。 た だ し , 各 フ ァイル KK 対 
し て FILE オ ォ オプ ショ ン を 1 つ ず つ 指 定 し を な けれ ば な を ならない 。 


372 DOS PL ノ 1 最適 化 フ セン パイ ラー : 言 語 解説 書 第 2 部 


2. 閉じ られ た ファ イル を 再び 開く と と が で き る o 


3 開か れ て いな い フ ァイル を 閉じ た り , す で を 閉じ られ て いる 
ファ イル を 再び 閉じ る よう 指定 し て も , 何 も 行 を われ な ゆい o 


4. CLOSE ス テー トメ ント (と ょ よっ て 閉じ られ て いな い フ ァイル 
が ある と, 当該 プロ グラ ム が 完了 し た と き 自 動 的 に と の ファ 
イル が 閉じ られ る o 


5. 当該 ファ イル と 結び 付け られ て いる 入出 力 事象 の うち 当該 フ 
ァイル が 閉じ られ る と き 状 況 値 が 0 で ある も の は , すべ て , 
状況 値 1 に セッ ト さ れる 。 


6 LEAVE オプ ショ ン ま た は UNLOAD ォ プ ショ ン を つけ て , 
ENVIRONMENT 属性 を 与え る と と が で きる 。 


DECLARE 


省略 形 : DG 


DECLARE ステ ー ト メン ト は , 名 前 の 属性 を 明示 的 (C 宣 斉 す る 
た め の 主 要 を 手段 で ある 。 


一 般 形 式 : 


DBECLARE 
[ レベ ル 〕 識 別名 [属性 〕・・・ 
SYSTEM ) 

[ ,〔[ レベル 〕 識別 名 〔 属性 〕) ・・・ 
SYSTEM]]・・・: 


構文 法 細 則 : 


1 1 つの DEBCLARE ステ ー ト メン ト の 中 で , 識別 名 を いく つ 
で も る 宣言 する と と が で き る 。 


2. 「 レ ベル | は , ぞ ら 以外 の 無 符号 の 1 0 進 整 数 定数 で ある 。 
レベ ル 番 号 を 指定 し な た いと, 要素 変数 な よび 配列 変数 は すべ 
て レベル 1 で ある と みな され る 。 大 構造 名 を 宣言 する 場合 
は 、 つ ね に レベ ル 1 を 指定 し な けれ ば を ら な い 。 な お , レベ 
ル 番 号 と その 後 の 識 別名 と の 間 に は プラ ンク を 1 つ 置 か を け 
れ ば な ら な い 。 


3 DECLARE ステ ー ト メン ト で 指定 する 属性 と 属性 の 間 に は , 
プラ ンク を 人 か を けれ ば な を ならない 。 次 元 属性 , 長 さ 必 性 , な 
よび 精度 属性 以外 は , 任意 の 順序 で 属性 を 記入 する と と が で 
き る 。 次 元 属性 は , 配列 名 の 直ぐ 後に 書か を けれ ば な ら な い 。 
長 さ 属性 と 精度 属性 は , と れ ら と 結び 付い に て いる いずれ か の 
属性 の 後に な けれ ば な ら な い 。 ある 特定 の 名 前 に 対し て 指定 
され て いる 最後 の 属性 の 後に と は, コン マ を 記入 し な けれ ば な 
ら な い ( 属性 を 1 つ ゃ 指定 し な い 場 合 C は , 名 前 の 後 C コ ン 
マ を 記入 し な けれ ば を ら な い ) 。 た だ し , DECLARE ステ 
ー ト メン ト の 最後 の 名 前 の 最後 の 属性 の 後に は , コン マ で は 
な く セ ミコ ロン を 記入 する 。 


4. [SYSTEM | は , 対応 する 識別 名 に 標準 省略 時 属性 を 適 
用 する よう 指定 する た め の も の で ある 。 


ペン 


と の 場合 ,」 DEFAULT ステ ー ト メン ト か ら 必 性 が と られ る 
わけ で は な い 。 | SYSTEM | は , 他 の 属性 の 前 , 後 , 間 の 
ど と 低 あ っ て も よい 。 


共通 属性 の 因数 化 


宣言 の 中 に ある いく つか の 名 前 と 共通 を 属性 を 因数 化し て くく り 出 
す と と が で きる 。 と の よう する と , 多く の 識別 名 (と 対 し て 同じ 属 
性 を 繰り 返し 指定 する 必要 が を な く な る 。 共通 属性 の 因数 化 と は , 具 
体 的 に は , 名 前 を 括弧 で 囲ん で , と の 後に と れ ら の 名 前 に 適用 され 
る 属性 を 記入 する と と で ある 。 因数 化 さ れ た 属性 は すべ て , 括弧 で 囲 
まれ て いる すべ て の 名 前 (て 適用 され る も の で を けれ ば な ら な い 。 因 
数 化 さ れ た 属性 を ある 特定 の 名 前 (に 関し て だ け 取 り 消 すこ と と は で き 
を い 。 た だ し , 括弧 で 囲ん で ある どの 名 前 に も ( 因数 化 さ れ て いる 
属性 と 両立 し 得る ) 他 の 属性 を 与え を る こと と が で きる 。 共通 属性 の 因 
数 化 は , DECLARE,DEFAULT 両 ス テー トメ ント で だ け 許 
され る も の で あり , ENTRY 属 性 の 宣言 た な いて と れ を 行 を うと と 
は できない 。 次 元 属性 を 因数 化す る と と も で きる 。 精度 属性 む よ び 
長 さ 属性 に 関し て は , と れ ら の 属性 の キー ワー ド 属 性 と いっ し ょ と 
と れ ら の 属性 を 因数 化す る 場合 限り, 因数 化 が 認め られ る 。 次 の 
4 番目 の 例 C 示 す よ うら!C, 共 靖 属性 の 因数 化 を ネス ト す る と と が で 
きる 。 


括弧 の 中 の 名 前 と 名 前 の 間 に は , コン マ を 記入 す る 。 


注 : 構造 の レベ ル 番 号 を 因数 化す る こと と も で きる 。 を ただし, と の 
場合 , 括弧 で 囲ま れ た 名 前 の 前 に レベ ル 番 号 を 記入 し を な けれ ば な ら 
な い 。 


DECLARE(A,B,C,D) BINARY FIXED (51): 


DECLARE(E DECIMAL(6,5), 
F CHARACTER( 10 ) ) STATIC: 


DECLARE 1 A, 2(B,C,D) (3,2) BINARY 
FIXRED (15),・・・: 


DECLARE ((A,B) FIXED(10), C FLOAT (5)) 
EXTERNAL : 


一 般 規 則 : 


1. レベ ル の 1 識別 名 は , 特定 の ブロ ッ ク 内 の 1 つの DECLAR 
ステ ー ト メン ト の 中 で だ け 指 定 し な けれ ば な ら な い 。 し た が 
っ て , その 識別 名 に 明示 的 に 与え る 必要 の ある すべ て の 属性 
を その DECLARE ステ ー ト メン ト の 中 で , 宣言 し を た けれ ば 
な ら な い 。 ( た だ し , FILE 属 性 を も ゃ つ 識 別名 に は OPEN 
ステ ー ト メン ト の 中 で $ 属 性 を 与え る と と が で きる 。 詳し く 
は , と の 節 の [OPEN ステ ー ト メン ト |] お よび 「 第 1 0 章 
入力 と 出力 」 を 参照 の こと 。 ) 


2. いろ いろ な プ ブロック お よび コン パイ レー ショ ン に お ける 外部 
名 の 属性 は , 首尾 一 人 綱 し て い を けれ ば な ら な い ( INITIAL 
属性 は , 1 度 与 を る だ け で よい か ら , と の 適用 外 に ある )。 


3 DECLARE ステ ー ト メン ト 婚 ラベ ル ん 接頭 語 を つけ る と と が 
で きる 。 た だ し , と の よう を ラベ ル へ の デラ ンチ は ,。 ナル : 
ステ ー ト メン ト へ の プラ ンチ と みな され る 。 DECLARE ス 
テー トメ ント CC 条件 接頭 語 を つけ る と と は で き な い 。 


DEFAULT 


省略 形 : DFT 


DEFAULT ステ ー ト メン ト を 利用 する と , プロ グラ マー の 側 で , 
属性 の 一 部 また は すべ て を 暗示 的 に 宣言 する 必要 の ある 識別 名 と 適 
用 され る 省略 時 属性 を 指定 する と と が で きる 。 DEEFAULT ステ 
ー ト メン ト を 使用 する と , 次 の 1 て 4 の 省略 時 属性 を 指定 する と と 
が で きる 。 


1. 明示 的 宣言 され て いる 識別 名 。 
2. 文脈 的 多 宣 言 さ れ て いる 識別 名 。 
3 る ペラ メー ター 記述 子 の 中 に 入れ る 属性 。 


4. 暗示 的 に 宣 言 さ れ て いる 識別 名 と 関数 プロ シー ジャ ー か ら 返 
され る 値 。 


一 般 形式 ・ 図 す .2 を 参照 の と と 。 


一 般 規 則 : 


1. 不 完全 な と と ろ の ある 明示 宣言 を た いし 文脈 宣言 , な よび , 暗 
示 宣 言 (と 関 する DEFAULT ステ ー ト メン ト の 規則 に し た が 
つて 適用 され を い 属 性 は , 標準 省略 時 属性 の 適用 規則 と 準じ 
て 与え を られ る 。 


2. DEFAULT ステ ー ト メン ト の 有効 範 胃 は 。 この ステ ー ト メ 
ント が 入っ て いる ブロ ッ ク , な ら び CC, その ブロ ッ ク 内 に て あ 
っ て , 同じ 範囲 の 別 の DEFAULT ステ ー ト メン ト を 含ま ず 
また 同じ 範囲 の DBFAULT ステ ー ト メン ト を も つ プ ロック 
(て る 含ま れ て いな を ない, すべ て の ブロ ッ ク で ある o。 


外側 の プロ ッ ク の DEFAULT ステ ー ト メン ト の 範囲 が そ 
の 中 含ま れ て いる ブロ ッ ク の 中 の DEEF AULT ステ ー ト メ 
ント の 範囲 と 部 分 的 (C 重 複 す る と と も 可能 で ある 。 と の よう 
な 場合 に は , 外側 の プロ ッ ク の DEFAULT ステ ー ト メン ト 
の 範囲 が , 含ま れ て いる ブロ ッ ク の 中 の DEFAULT ステ ー 
トメ ント の 範囲 だ け 小 さく を る 。 た と え げ , 


P : PROCEDURE : 


L1 : DEFAULT RANGBE (XY) FIXED: 
Q : BEGIN: 

L2 : DEFEAULT RANGE (XY 必 ) FLOAT: 
END P: 
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DEFAULT [単純 指定 | 因数 化 さ れ た 指定 } 


( , {単純 指定 | 因数 化 され 指定) )・・・ 


「 単 純 指定 ] は , 
RANGE  ( { 議 別 名 | 文字 : 文字 } 
[ , {識別 名 | 文字: 廊 字 } 
RANGB(*) [属性 の 指定 〕 
DESCRIPTORS [ 属性 の 指定 〕 


「 因 数 化 さ れ た 指定 」 は , 


( { 単純 指定 | 因数 化 さ れ た 指定 } 
し , {単純 指定 | 因数 化 さ れ た 指定 } ]〕・・ 


| 属性 の 指定 ] は , 


| 属 性 ・・・〔VALUE AM 
VALUE ( 値 の 指定 ) 


「 値 の 指定 ] (と つい て は 本 文 を 参照 の と と 。 
図 す .2 DEFAULT ステ ー ト メン ト の 一 般 形式 


L 1 と いう DEFAULT ステ ー ト メン ト の 有効 範 胃 は , ブ 
ロ シ ー ジ ャ ーP の 中 と あっ て 文字 え XY で 始ま っ て いる すべ て 
の 識別 名 , お よび, 開始 ブロ ッ ク Q の 中 に あっ て 文字 え Y で 
始ま っ て いる 識別 名 の う も 廊 字 え XY 用 で 始ま っ て いる 識別 名 
を 除い た すべ て の 識別 名 , で ある 。 上 L 2 と 言う ろ DEF AULT 
ステ ー ト メン ト の 範囲 および 有効 範囲 は , 開始 ブロ ッ ク Q@ の 
中 に あっ て 文字 メ Y ク で 始ま っ て いる すべ て の 識別 名 で ある 。 


3 VALUE ( 値 の 指定 ) は , 属性 の 指定 の 中 で 配列 の 次 元 属 
性 の 前 以外 の 任意 の 場所 (と 記入 する と と が で きる 。 

4. VALUEE は , スト リン グ の 長 さ , エリ ア の 大 き さ , お よび 
精度 (て 関す る 省略 時 規定 を 設定 する た め の も の で ある 。 特定 
の 属性 を も つ 特 定 の 精度 指定 を 指示 する た め に , 「 値 の 指定 」 
の 中 基数 属性 な む よ び また は スケ ー ル 属性 を 記入 し を けれ 
ば な ら な い 。 


5. 「 値 の 指定 ] は , 以下 の 指定 を 1 つ 以 上 任意 の 順序 で 並べ た 
も の で ある 。 


&. AREA( 大 き さ ) 

b. BIT ( 長 さ ) 

c. CHARACTER ( 長 さ ) 

d. { 基数 属性 スケ ー ル 届 性 | 
スケ ー ル 属 任 基数 属性 } 


(精度 [ , スケ ー ル 因数 ] ) 


展開 され た と き 上 の よう な 形式 に な る の で あれ ば , 共通 の 基 
数 属性 と スケ ー ル 属性 を 因数 化す る と と が で きる 。 
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]・・・) 【 属 性 の 指定 〕 


・) [属性 の 指定 〕 


BIT デ ー タ また は CHARACTER デー タ の 長 さ は , 式 
で も 1 0 進 整 数 定数 で も よい 。 


例 : 


DEFAULT RANGE(A:C) 
VALUE (FIXED DECIMAL( 10), 
FLOAT DEC IMAL ( 14 ) , 
AREA(2000) ): 
DECLARE B FIXED DECTIMAL, 
C FLOAT DECIMAL 
A AREA: 


と れ ら の ステ ー ト メン ト は 次 の ステ ー ト メン ト K 等 し い 。 
DECLARE B FIXED DECIMAL(10), 
C FLOAT DECIMAL( 14 ), 


A AREA(2000): 


6 RANGE は , DEFAULT ステ ー ト メン ト の 中 で 指定 され 
て い る 属性 が 適用 され る 議 別 名 を 指定 する た め の も の で ある 。 


a. [RANGPE 議 別名 と いう 形 は , 「 識 別名 」 で 示さ れ 
て いる 文字 ( 1 字 以 上 ) で 始ま っ て いる 識別 名 省略 時 


規定 を 適用 する よう 指定 する ため の も の で ある 。 た と え 
ば , 


RANGE(ABC ) 


は , 次 の よう な 識別 名 に 適用 され る 。 


ABC 


ABCD 
ABCD ・・・・ を ど 


し か し , 次 の よう な 識別 名 に は 適用 され を い 。 


ABD 
ACB 
AB 
A 


RANGE の 後 で 1 字 だ け 指 定 す る と , と の 文字 を 頭 文 
字 と する すべ て の 識別 名 に 適用 され る 。 


b. RANGE の 指定 に は , と の ほか と, 「 廊 字 : 文字 と 
いう 形 が ある 。 こと の 形 は , 指定 され て いる 2 つの 文字 の 
いずれ か また は アル ファ ベッ ト (C て お いて と の 2 つの 文字 
の 間 ( に ある 任意 の 文字 を 頭 文 字 と する 識別 名 (C, ある 特 
定 の 範囲 (と 対し て 指定 され て いる 省略 時 属性 を 適用 する 
よう 指定 する た め の も の で ある 。 と と KK 記入 する 文字 は 
アル ファ ベッ ト の 順に な っ て いな けれ ば な ら な い 。 た と 
えば , 


RANGE(A:G,I:M,T:Z) 
c. RANGE ( * ) と い 2 指 定 は , 当該 PPFAULT ステ 


ー ト メン ト の 有効 範囲 に ある すべ て の 議 別 名 を 指定 する 
も の で ある 。 


7 DESCRIPTORS は , 明示 的 を 入口 宣言 の バラ メー ター 


記述 子 の リス ト ( に ある バラ メー ター 記述 子 に 。 こと の キー ワー ド 
の 後に 記入 され て いる 属性 を 入れ る よら 指 定 す る た め の も の 
で ある 。 た だ し , 記述 子 の 中 (同一 クラ ス の 択 一 属性 が ある 
と と (て よ っ て と の よら うな 属性 の 組入れ が 禁止 され て いな を いこ と 
と , お よび 少く と も 1 つの 属性 が すでに 入っ て いる と と が 条 
件 で ある 。 と の 2 番目 の 制約 の た め C, DESCRIPTORS 
省略 時 属性 は , ナル 記述 子 を も つ パ ラメ ー タ ー( 対応 する 引 
数 と 同じ 属性 を も ぉ つ パ ラメ ー タ ー ) と は 適用 され を な い 。 


「 因 数 化 さ れ た 指定 ] : こと これら は 次 の よう に C し て 使用 され 
る 。 
DEFAULT (RANGE(A)FIXED, RANGE(B) 


FLOAT)BINARY: 


と の ステ ー ト メン ト の 結果 , 頭 女 字 が A で あり 暗示 的 (と 宣言 
され て いる 識別 名 の 省略 時 属性 は F 1 XED BINARYC な 
り , 頭 娘 字 が B で あり 暗示 的 宣言 され て いる 識別 名 の 省略 
時 属性 は FLOAT BINAR YC な る 。 


DEFAULT ステ ー ト メン トラ ベル を つけ る と と が で き 
る o た だ し , と の ラベ ル へ の プラ ンチ は ナル ・ ス テー トメ ン 


ト へ の プラ ンチ で ある と みな され る 。 DEFAULT ステ ー 
トメ ント 条件 接頭 語 を つけ る こと と は で き な い 。 


DEFAULT ステ ー ト メン ト で 指定 する 属性 (C 関 する 規則 : 


1 


6. 


ENTRY 属性 , ENV IRONMENT 属性 , RETURNS 
属性 , LIKE 属性 , VARIABLE 属性 , ぉ ふ ょ び FILE 
以外 の ファ イル 関す る 属性 を 「 属 性 の 指定 ] で 指定 する と 
と は で き な い 。 FILE を 指定 し た 場合 に は , INTERNAL 
属性 と VARTIABLE 属性 が 暗示 され る 。 


DEFEAULT ステ ー ト メン ト を 用 いて 構造 を 作成 する こと 
は できない 。 構 告 の 要素 (て は , その 要素 の 識別 名 に も と づい 
て 省略 時 属性 が 適用 され る ( 修飾 され た 構造 要素 名 に も と づ 
いて 省略 時 属性 が 適用 され る わけ で は な い ) 。 


次 の 属性 に 関し て は , 以下 で 記述 され て いる 各々 (関す る 制 


約 を 守れ ば , 「 属 性 の 指定 ] (C 記 入 す る と と が で きる 。 
AREA ー 大 き さ の 指定 を し 
BIT ーー スト リン グ の 長 さ の 指定 た し 


CHARACTER 一 スト リン グ の 長 さ の 指定 を し 


LABEL ー ラベ ル の リス ト な し 
算術 デー タ の 基数 属性 と スケ ー ル 属性 
ー 精度 の 指定 を し 


バラ メー ター また は バラ メー ター 記述 子 CCONTROLLED 
属性 を 適用 する こと は で き な い 。 バラ メー ター 名 で ある 識別 
名 に 関し て は , 省略 時 属性 と し て 指定 され て いる 。 
CONTROLLED は 無視 され る 。 また , DESCRIPTORS 
の 後 の 「 属 性 の 指定 」 (CCONTROLLED を 指定 し て も , 無 
視 さ れる 。 


配列 の 次 元 を 属性 と し て 指定 する と と が で きる が , その 場合 
は , 「 属 性 の 指定 ] の 中 の 最初 の 項目 と し て 指定 し な けれ ば 
を ら な い 。 次 元 の 指定 は , 式 で あっ て も ゃ も, 1 0 進 整数 定数 で 
あっ て も よい 。 

た と えば , 


DEFAULT RANGE (J) 
DEFAULT RANGE ( け ) 


C5J. 
(5,.5) FIXED : 


し か し , 次 の ょ 2 指定 する こと は で き な い 。 
DEFAUL 和 T RANGE (J) FIXED (5): 


INITIAL 属性 を 指定 する と と が で きる 。 
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DELAY 


DELAY ステ ー ト メン ト は , 指定 され て いる 時 間 だ け プ ログ ラム 
の 実行 を 停止 する た め の も の で ある 。 


一 般 形 式 : 
DELAY (要素 式 ) : 
一 般 規 則 : 
1. DELAY ステ ー ト メン ト が 実行 され る と , と と で 指定 され 
て いる 要素 式 の 値 が 計算 され ん , その 値 が 整数 ( n ) 変換 さ 
れる 。 と の 1n は ミリ セカ ンド を 表わす 。 当 コ ン パ イラ ーK お 
いて は , n は 一 番 近い 秒 単位 の 整数 に C に まる め ら れる 。 と うし 
て 得 られ た 秒 数 だ け 実 行 が 停止 され る 。 


2. 計時 機構 が 使用 可能 で を い 場合 に は , DELAY ステ ー ト メ 
ント は ナル ・ ス テー トメ ント と し て 働く 。 


DELETE 


DEBLETE ステ ー ト メン ト は , UPDATE ファ イル か ら レ コー 
ド を 削除 する た め の も の で ある 。 


一 般 形 式 : 


DELETE FILE (ララ ァイル 式 ) 
[KEY( 式 ) 〕 [EVENT (事象 変数 ) 〕 : 


一 般 規 則 : 


1 オプ ショ ン を 記入 する 順序 は 任意 で ある 。 


2. FILE オォ オプション は , UPDAT 了 EE ファ イル を 指定 する た 
め の も の で ある 。 必ず FILE オ プシ ョ ン を 指定 し を な けれ ば 
な ら な い S 


3. 当該 ファ イル が DIERECT UPDATE ファ イル で ある 場 
合 に は , KEY オプ ショ ン を 指定 し を な けれ ば を ら な い 。 当該 
ファ イル が 1INDEXED 編成 (また は , キー 順 VSAM 編 
成 ) の SEBQUBNTIAL UPDATE ファ イル で ある 場 
合 に も , KEY オォ オプション を 指定 する と と が で きる 。 と と で 
指定 され て いる 式 は , 廊 字 スト リン グ K 変 換 さ れる 。 こと の 六 
字 ス トリ ング と も と づい て , 削除 され る レコ ー ド が 確定 され 
る 。 


4. 当該 ファ イル が SEQUENTIAL UPDATEE ファ イル 
で ある 場合 に は , 最後 (読み 取ら ちら れ た レコ ー ド が 削除 され る 。 
と の 場合 , デー タ ・ セ ッ ト の 編成 は , INDEXED (また 
は , キー 順 VS AM ) で を な けれ ば を ら を ない 。 


5 BBVENT オプ ショ ン を 指定 する と , レコ ー ド の 削除 が 行 を 
われ て いる と きた る 処理 を 続行 する こと と が で きる 。 と の オプ 
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例 ・ 


ショ ン を も つ DELETE ステ ー ト メン ト K 制 御 が 渡る と , 

「 事 象 変数 」 が 活用 状態 に を た り ( つ まり , と の 変数 を 他 の 事 
象 と 結び 付け る と と が で き な く な る ) , 暗示 的 を ファ イル の 
開放 に よっ て UNDEF INEDFILE 条件 が 引き 起 さ れ な 
い 限 り ( 下 の 「 注 」 を 参照 の と と ) と の 「 事 象 変数 」(C'0 
B と いう 完了 値 が 与え られ る 。 と の 「 事 象 変数 」 を 指定 し て 
いる WAIT ステ ー ト メン ト K 制 御 が 渡る まで は , と の 「 事 
象 変数 」 は 活用 状態 に と どまり , ' 0 'B と 言 ヶ 完了 値 を 保 
持 し て いる 。 と の 「 事 象 変数 」 を 指定 し て いる WAIT ステ 
ー ト メン ト K 制 御 が 渡る と , 次 の いずれ か の 措置 が と られ る 。 


a. DELETEB ステ ー ト メン ト が 正しく 実行 され , その 
DELETE の 結果 と し て TRANSMIT 条件 も KEY 
条件 も 引き 起 さ れ な か っ た 場合 に は, 「 事 象 変数 ] が 
「 完 了 」 C セ モット され (すなわち , と の 変数 C'1!B 
と 言う 完了 値 が 与え られ ) , と の 変数 の 状態 は 非 活用 状 
態 に と な る (すなわち, と の 変数 を 他 の 事象 と 結び 付け る 
と と が で きる よら な る )。 


b.。 DELETE ステ ー ト メン ト を 実行 し た 結果 TRANSMIT 
条件 を いし KEY 条件 が 引き 起 さ れ た 場合 に は , 上述 の 
WAIT ステ ー ト メン ト が 出 て 来る まで は と れ ら 各々 の 
条件 の た め の 割 込み は 起 ら を い 。 上 述 の WATT ステ ー 
トメ ント が 出 て 来る と , 条件 が 引き 起 さ れ た 順 C, 各々 
対応 する オン ・ ユ ニッ ト K 入 る ( も ちろ ん , オン ・ ユ 
ニッ ト が 指定 され て いな けれ ば と の 限り で な い )。 最後 
の オン ・ ユ ニッ ト か ら 戻 っ た と き , ある い は , いずれ か 
の オン ・ ユ ニッ ト が GO TO ステ ー ト メン ト に よっ て 
中 止 さ れん を た とき, 「 事 象 変数 ] に C'1!B と い 2 完 了 
値 が 与え られ , 「 事 象 変数 ] は 非 活用 状態 を と る 。 


注 : DELETE ステ ー ト メン ト ( よ っ て 暗示 的 (と ファ イ 


ル が 開放 され , この 結果 UNDEF INEDFILE 条件 が 引 


き 起 され た 場合 に は , 直 ち (C, と の 条件 の た め の オ ン ・ ユ ニ 
ッ ト 入る 。 た だ し , 「 事 象 変数 ] は 何 $ 変 化し な い 。 つま 
り , 「 事 象 変数 ] は 依然 非 活用 状態 に あり , その 値 は 
DELETE ステ ー ト メン ト が 出 て 来 た と き に と の 変数 が も 
っ て いた 値 と 同じ で ある 。 オン ・ ユ ニッ ト の 中 で 
UNDEF INEDFILE 条件 が 訂 正 さ れ を か っ た 場合 に は , 
オン ・ ュ ユニット か ら の 正常 戻り の 後 , REROR 条件 が 引 
き 起 され る 。 オン ・ ユ ニッ ト の 中 で と の 条件 が 訂正 され た 場 
合 ( すなわち , ファ イル が 正 し く 開 か れ た 場合 ) (は , オン ・ 
ユニット か ら の 正常 を 戻り の 後 , 事象 変数 が '0'B(C セ ッ ト 
され , と の 変数 は 活用 状態 と を り , DELETE ス テー トメ ン 
ト の 実行 が 続行 され る 。 


DELETE ス テー トメ ント が レコ ー ド を アン ロッ ク す る の は , 
DELETE ス テー トメ ント が ある タス ク の 中 で その レコ ー ド 
が ロッ ク さ れ た 場合 だ け で ある 。 


DELETBE ステ ー ト メン ト に よっ て , ファ イル が 暗示 的 と 開 
放さ れる と と が ある 。 


| 人 Rg 


DELETE FILE(ALPHA) KEY (DKEY ): 


と の ステ ー ト メン ト が 実行 され る と , ALPHA と 言う ファ イル 
る レコ ー ド が 削除 され る 。 


DISPLAY 


DISPLAY ステ ー ト メン ト は 操作 員 に メッ セー ジ を 表示 する た 
め の も の で ある 。 応答 を 要求 する あと と も で きる 。 


一 般 形 式 : 


オプ ショ ン 1 : 
DISPLAY (要素 式 ): 


オプ ショ ン 2: 
DISPLAY (要素 式 ) 
REPLY (文字 変数 | 擬似 変数 ) 


[EVENT (事象 変数 ) ] : 
一 般 規 則 : 


1. DISPLAY ステ ー ト メン ト が 実行 さん れる と , 要素 式 の 値 が 
計算 され , 必要 (応じ し て , 杏 素 式 が 長 さ の 変わ る 文字 スト リ 
ング 変換 され る 。 当 コ ン バ イ ラー な いて は , と の 文字 ス 
トリ ング の 最大 の 長 さ は 1 2 6 桁 で ある 。 と の 文字 スト リン 
グ が メッ セー ジ と し て 表示 され る 。 


2. オプ ショ ン 2 に とお いて は , 文字 変数 また は 擬似 変数 が 操作 貞 
か ら 与 を られ た メッ セー ジ ( ス トリ ング ) を 受け 取る 。 
STRING 擬 似 変数 を 使用 する と と は で き な い 。 また , メッ 
セー ジ は 7 2 桁 を 越え て は を ら な い 。 


3 る オプ ショ ン 2C て お いて EVENT オ プシ ョ ン を 指定 し な い 場 合 
(CC は, DISPLAY と REPLY の 双方 に 対し て 同じ 変数 を 指 
定 し て は なら な い 。 


4. オプ ショ ン 2 て な いて EVENT オォ オプション が 指定 され て いな 
い 場 合 に は , 操作 員 の メッ セー ジ を 受け 取る まで プロ グラ ム 
の 実行 が 止ま る 。 オプ ショ ン 1 に な いて は , 実行 は 中 断 さ れ 
る と と な を く 進行 する 。 


5. EVENT ( 事象 変数 ) オプ ショ ン が 与え られ て いる 場合 (C は , 
応答 が 完了 する の を 待た ず に 次 の ス テー トメ ント の 実行 が 始 
まる 。 応答 が 完了 する まで は 事象 変数 の 完了 値 は '0 !B で あぁ 
り , 応答 が 完了 する と と の 完了 値 が !1 BC に な る 。 と の 事象 
を 指定 し て いる WAIT ステ ー ト メン ト が 実行 され て 初め て , 
応答 が 完了 レ し た も の と みな を され る 。 先 の 応答 が 完了 する まで 
は , 他 の DISPLAY ステ ー ト メン ト を 出し て は を ら な い 。 


例 : 
DISPLAY (END OF JOB!):: 


と の ステ ー ト メン ト が 実行 され る と , 「END OF JOB] と 
いう メッ セー ジ が 表示 され る 。 


DO 

DO ステ ー ト メン ト は , DO グル ー プ の 周 頭 C 緒 か ん る も の で あり, 
D O グル シー プ 内 の ステ ー ト メン ト を 繰り 返し て 実行 する よら 指定 す 
る と と も で きる 。 


一 般 形 式 


DO ステ ー ト メン ト の 形式 に は 3 つの つ タ イプ が ある 。 と れ を 図 J. 
3 示す 。 


構文 法 細 則 : 


1 3 つの どの タイ ズブ の 場合 も 。 DO ステ ー ト メン ト は , END 
ステ ー ト メン ト と 対 で , 1 つの DO グル ー プ を 区 切る の 使 
用 され る 。 DO グル ー ブ 内 の ステ ー ト メン ト を 繰り 返し 実行 
する よう 指定 し な た な い の は タイ ブ 1 だ け で ある 。 


2. タイ ブ 3 (てい て は , 変数 また は 擬似 変数 は 1 つの 要素 を 表 
わす も の で な けれ ば な ら な を な い 。 「 変 数 ] は , 添字 が つい て い 
て も , 修飾 され て いて も よい し , 添字 が つい て ぉ おり し か も 修 
飾 さ れ て いる も の で も よい 。 ( 擬似 変数 COMP LETTION, 
COMPLEX PRIORTITY,、 ぉ ふ ょ び STRING を 使用 
する と と は で き な ら じい 。 ) 通常 は , 実数 算術 変数 が 使用 され て 
いる が , 以下 の 一 般 規 則 C 従 っ て 行 な た われ た 展開 が 有効 を 
PL ノエ T プ ログ ラム (て な っ て いる 限り , どの よう を タイ の 変 
数 で も 使用 する と と が で きる 。 「 変 数 ] が ブロ グラ ッ 制 御 変 
数 で ある 場合 に は , 「 指 定 ] の 中 で BY オプ ショ ン な ら び と 
TO ォ プ ショ ン を 使用 する と と が で き な い と いら 点 人 注意 す 
る と と 。 


3 [指定 」 の 中 の 各々 の 式 は , 要素 式 で な けれ ば な ら な い 。 


4. 「 指 定 ]C「BY 式 3] を 記入 せ ず 「TO 式 2 | を 記入 し た 
場合 に は , 「 式 2] は 1 で ある と みな され る 。 


5. 「 指 定 」 に 「TO 式 2 | を 記入 し な か っ た 場合 に は , WHILE 
オプ ショ ン ま た は 他 の ステ ー ト メン ト C エ っ て DO グル ー プ 
の 外人 制 御 が 渡さ れる まで , DO グル ー プ の 実行 が 繰り 返さ 
れる 。 


6 「 指 定 ] の 中 に [TO 式 2] も 「BY 式 ぅ ] $ 記 入 し を か っ 
た 場合 に は , DO グル ー プ が 1 回 だ け 実 行 さ れ , 制御 変 


り 節 : ステ ー ト メン ト 37 アァ 


タイ プ 1 DO: 

タイ ブ 2. DO WHILE (要素 式 ) : 
4 

変 数 

と と で , 「 指 定 ] は 次 の よら な 形 を と る : 


TO 式 2 〔BY 式 3]〕 
に 0 PR | [ WHILE 


タイ ブ 3 DO | 


図 す .3 DO ステ ー ト メン ト の 一 般 形 式 


数 は 「 式 1 」 の 値 を と る 。 「WHTILE 式 4 ] を 記入 し た 場 
合 に は , 「 式 4 」 が 真 で な い 限 り と の 実行 は 1 回 も 行なわ れ 
を い 。 


一 般 規 則 : 


1. タイ プ 1C な いて は , DO ステ ー ト メン ト は DO グルー プ の 
始ま り を 表わす だ け で あり , 実行 の 繰返し は 指定 し な い 。 


2. タイ ププ 2C お な いて は け は, DO ステ ー ト メン ト は DO ステ ー ト メ 
ント の 始ま り を 表わす と 共に , 次 の よう K 定 義 さ れる 実行 の 繰 
返し を 指定 する 。 


LABEL: DO WHILE ( 式 ) : 
ステ ー ト メン トー1 


ステ ー ト メン トー n 
END : 
NEX 和 T・ ステ ー ト メン ト ンプ *STATEMENT 
FOLLOWING THE DO GROUP* ン 


上 の コー ディ ング は , 次 の 展開 と 全く 同じ 内 容 を 表わし て い 
る 。 


LABEL: IF ( 式 ) THEN: 
ELSE GO TO NEXT: 


ステ ー ト メン トー 1 


ステ ー ド メン トー 
GO TO LABEL : 
NEXT: ステ ー ト メン ト ノ *STATEMENT 
FOLLOWING THE DO GROUP* ン 


3 タイ ブ プ 3C お いて は , DO ステ ー ト メン ト は DO グル シー プ の 
始ま り を 表わす と 共に C, 次 の よう 定義 され る 制御 され た 実行 
の 繰返し を 指定 する 。 
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門 . 定 、《。 提 害 コ シバ て) 


LABEL: DO 変数 = 
式 1 
TO 式 2 
BY 式 3 
WHILE ( 式 4 ) : 


ステ ー ト メン トー1 


ステ ー ト メン トーm 
LABEL1 :PND : 
NEXT: ステ ー ト メン ト 


擬似 変数 で を い 変 数 に 関す る 限り ,。 上 の コー ディ ング は 次 の 
展開 と 全く 同じ 内 容 を 表 わ し て いる 。 


LABEL: p テ ADDR (変数 ) : 


e1 三 式 1: 
e2=ー 式 2: 
e3 王 式 3 : 
vYーe 1 : 


LABEL2: IF (e3>ー0)g(Y>e2 ) | 
( e 3 ぐ 0)g (vY ぐ <e2) 
THEN GO TO NEXF: 
IF ( 式 4 ) THEN: 
ELSE GO TO NEXT : 


ステ ー ト メン トー1 


ステ ー ト メン ト 一 mm 
LABEL1 : ャ ニャ ト Fe3: 

GO TO LABEL2 : 
NEX〒・ ステ ー ト メン ト 


と と で , p は コン バイ ラー の 作成 し た ボイン ター で あり , Y 
は コン バイ ラー の 作成 し た ( p を 基底 と する ) 基底 付 変 数 
( | 変数] と 同じ 属性 を も る つ ) で ある 。 |「e 1| |e2] 
[「e3] は コン バイ ラー の 作成 し た 変数 ( それぞれ , 「 式 1 
[ 式 2」 , 「[ 式 3 」 の 属性 を も ゃ つ ) で ある 。 初期 値 式 ( 式 1) 
の 値 が 計算 され る 直前 に , 制御 変数 の 世代 が , ルー の 外 


へ ニン 


で 一 度 作成 され て いる 点 C 注 意 さ れ た い 。 
上 の 展開 CK 関す る 他 の 規則 を 以下 に 示す 。 


a. 上 の 展開 は , 1 つの 「 指 定 ] の 結果 を 志 し た に す ぎ な を い 。 
DO ステ ー ト メン ト に 2 つ 以 上 の 「 指 定 ] が ある 場合 
は 、NEXT と いう ラベ ル の つい た ステ ー ト メン ト が 次 
の 「 指 定 ] 対応 する 展開 の 最初 の ステ ー ト メン ト /C な 
る 。 2 番目 の 展開 は , どの 点 か ら 見 て も , 最初 の 展開 に 
似 て いる 。 し た が っ て , DO ステ ー ト メン ト の 中 2 番 
目 の 「 指 定 ] が ある 場合 に は , 2 番目 の 展開 は 次 の ょ ら 
な 形 ( に な る で あろ 2。 


NEXT : e5 王 式 5 : 


ve5: 
LABEPL32: IF ・ THEN GO TO NEXT1: 
IF ( 式 8 ) THEN: 
ELSE GO TO NEXT1: 


ステ ー ト メン トー 1 


ステ ー ト メン トーm 
LABEL 4 : v ニ ャ v 十 e 7 : 

GO TO LABEL3 : 
NEXT1: ステ ー ト メン ト 
ステ ー ト メン ト 1ーm が プロ グラ ム の 中 で 実際 2 回 繰 
り 返 し て 作成 され る わけ で は な を いと いう 5 点 K 注 意 す る と 
と o 


b. WHILE オプション が 指定 され て いな い 場 合 は , 展開 
の 中 の ステ ー ト メン トー 1 の 直前 に ある 1TF ス テー トメ 
ント は 生成 さ れ な い 。 


ec. [TO 式 2 | が 指定 され て い な い 場 合せ は, ステ ー ト メン 
ト [| e 2= 式 2 | な ら び CLABEL2 (て ょ よっ て 識別 さ 
れる IF ステ ー ト メン ト は 生成 され な い 。 


d. [TO 式 2」 ぉ よび 「BY 式 3 | が 指定 され て い を い 場 
合 は , e 2 お よび e3 放 関係 する すべ て の ステ ー ト メン 
ト を ら び MCGO TO LABEL2 ステ ー ト メン ト は 生 
成 さ れ な い 。 


タイ ブ 2 お よび タイ ブ 3 CC な ける WHILE オプ ショ ン は , 
スネ ステー トメント の 実行 が 1 回 済ん だ 後 新 た に 最初 か ら ス テー 
トメ ント の 実行 を 繰り 返す 前 に , と と で 指定 され て いる 要素 
式 の 値 を 計算 し , 必要 (C 応 し て, と の 要素 式 を ビッ ト ・ ス ト 


8. 


END 


リン グ 人 変換 する ェ う 指定 する た め の も の で ある 。 と うし て 
得 ら れ た スト リン グ の 中 MC 1 の 値 を も つ ビ ピット が あれ ば げ , 
DO グル ー プ の スネ ステー トメ ント が 実行 され る 。 す べ て の ビッ 
ト が 0 で ある 場合 C に は, タイ プ 2 に な いて は DO グル ー プ の 
実行 が 停止 され , タイ プ 3 る に お いて は WHILE オプ ショ ン 
を ゃ もつ 「 指 定 ] 対応 する 実行 だ けが 停止 され る 。 タイ ブ 3 
で は , と の 後 , 次 の 「 指 定 ] が あれ ば と の 指定 と 対応 する 実 
行 の 繰返し が 始ま る 。 


[指定 ] の 中 の 「 式 1 」 は , 制御 変数 ( すなわち, 「 変 数 ] 
また は 「 擬 似 変数 ] ) の 初期 値 を 表わす た め の も の で ある 。 
[ 式 3 | は , DO グル ー プ 属す る ステ ー ト メン ト の 実行 が 
1 回 完了 する た びに 制御 変数 に 加 を る べき 増分 を 表わす た め 
の も の で ある 。 「 式 2 」 は 制御 変数 の 終了 値 を 表わす た め の 
も の で ある 。 ルー プ が 終わ る た び ほ 制御 変数 の 値 が テス ト さ 
れ , と の 値 が 「 式 1] と 「 式 2 」 で 示さ れ て いる 稚 囲 の 外 MC 
ある と , 直 ち , 当該 「 指 定 ] に 対応 する DO グル シー プ ブ の ス 
テー トメ ント の 実行 が 停止 され る 。 最後 の 「 指 定 ] (と 対応 す 
る 実行 が 終了 する と , 通常 ,。 DO グル ー プ の 直ぐ 後に C あ る ス 
テー トメ ント に 制御 が 渡さ れる 。 


タイ ブ 1 の DO ステー トメ ント I(C よ っ て DO グル ー プ が 構成 
され て いる 場合 C に だ け (すなわち も , 実行 の 繰返し が 指定 され 
て いな い 場 合 だ け ) , DO グル ー プ の 外部 か ら DO グ ルー プ ブ 
の 内 部 制御 を 移す こと と が で きる 。 し た が っ て , 繰返し 実行 
され る DO グル ー プ CRENTRY ステ ー ト メン ト が あっ て は 
を ら な を い o。 


ポイ ンタ ー で 修飾 され て い る 制御 変数 また は 被 制御 ・ 制 御 変 
数 の 世代 は , 初期 値 式 ( 式 1 ) の 値 が 計算 され る 直前 に , ル 
ー プ の 外 で 生成 され る 。 ル ー ブ の 中 で 制御 変数 の ポイ ンタ ー 
を 変更 し た り , 制御 変数 を 割り 振っ た り し て その 制御 変数 の 
世代 を 変更 し て ゃ , 先 の 世代 か ら 得 た 制御 変数 の まま で ルー 
プ の 実行 が 続け られ る 。 し か し , ルー プ の 中 で の と の 制御 変 
数 を 参照 する と , 後 の 世代 を 参照 する と と に な る 。 と の 世代 
を 解放 する と 誤り に な る 。 


ネス ティ ング の 最大 の 深 さ は 4? で ある 。 


END ステ ー ト メン ト は , ブロ ッ ク お よび グル ー プ を 終了 させ る た 
め の も の で ある 。 


一 般 形式 : 


END [識別 名 ] : 


構文 法 細則 ・ 


「 識 別名 」 は , ラベ ル 定 数 また は 入口 定数 で ある 。 と れ は 疹 字 付 の 


J 節 ・ 27?9 


ステ ー ト メン ト 


名 前 で あっ て は な ら な い 


一 般 規 則 : 


1. 


END の 後 (識別 名 が 記入 され て いる 場合 に は , その ラ ベル 
定数 を いし 入口 定数 を もつ DO , BEGIN, ま # を た は 

PROCEBDURE ステ ー ト メン ト の 2 らち , END ス テー トメ 
ント より 前 の 最も 近い 位置 し ある も の で 始ま っ て いる , 未 終 
了 の グル ー プ な いし ブロ ッ ク を 終了 させ る 。 また , 物理 的 に と の 
グル ー プ また は ブロッ ク の 中 ある 未だ 終了 し て い を ない グ ルー プ 
また は プロ ッ ク も , と の BRND ス テー トメ ント (て よっ て , 終了 する 。 


END の 人 後 (< 識 別名 が 記入 され て いな い 場 合 !C は , 対応 する 
END ス テー トメ ント を も た を ない DO , BEGTIN, また は 

PROCEDURE ステ ー ト メン ト の らち と の END ス テー ト 
メン ト よ り 前 C あ り , し か も と の END ス テー トメ ント K 一 番 
近い と と ろ (C あ る も の で 始ま る グル ー プ な いし ブロ ッ ク が , 

と の END ス テー トメ ント (よって, 終了 する 。 


ある プロ シー ジャ ー の BND ス テー トメ ント 制御 が 渡る と, 
と の ステ ー ト メン ト は RETURN ステ ー ト メン ト と し て 取 
り 扱 われ る 。 


ENTRY 


ENTRY ス テー トメ ント は , ブロ シー ジャ ー の 副 次 入口 点 を 指定 す 


る た め の も の で ある 。 
一 般 形式 : 
入口 定数 : (入口 定 数 : 〕・・・ 
ENTRY [ (バラ メー ター[ , ペ パラ メー ター ] ・・・)〕 


[ RETURNS (属性 リス ト ) 〕 
[ IRREDUC TBLE | REDUCIBLE ] 
[ OPTIONS (オプ ショ ン ・ リ スト ) ] : 


構文 法 細 則 


1 


380 


ENTRY ス テー トメ ント CC あ いて RETURNS オプ ブシ ョ ン 
の 「 必 性 の リス ト | 指定 する と と の で きる 属性 は 算術 , ス 
トリ ング , ALIGNED, UNALIGNED , PO INTER , 
OFFSET, AREA,FILE, EVENT ぉ ょ び LABEL だけ 
で ある 。 スト リン グ C は , VARYING 属性 を 与え を る と と が 
で きる 。 エリ ア の 名 前 が 添字 付 の 名 前 , 修飾 され た 名 前 , あ 
る い は 被 定義 の 名 前 で を な い 限 り , OFFSET 属性 で エリ ア を 
指定 する と と が で きる 。 また , LABEL 属 性 (ラベ ル 定 数 の 
リス ト を 含め ちこ と と も で きる 。 エリ ア の 大 き さ や スト リン グ 
の 長 さ を 与え る 場合 に は , 1 0 進 整数 定数 で とれ ら を 指定 し 
な けれ ば な ら な い 。 


OPTIONS オプ ショ ン の 「 オ プシ ョ ン の の リスト] は, コン ズバ 
イラ ー ど と 定義 され て いる 1 つま た は それ 以上 の 追加 オプ 
ショ ン を 指定 する た め の も の で ある 。 と れ ら の 追加 オプ ショ 
ン を 以下 KK 示す 。 


{ COBOL | FORTRAN ) 
[ NOMAP し (引数 の リスト ) 〕 〕 
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[NOMAPIN [( 引 数 の リス ト ) 


] 〕 
[ NOMAPOUT [〔 (引数 の リス ト ) 〕 〕 
オプ ショ ン と オプ ショ ン の 間 に は プラ ンク を 革 く 。 オ プシ ョ 
ン を 記入 する 順序 は 任意 で ある 。 


[引数 の リス ト ] は 。 オプ ショ ン を 適用 すべ き バ パラ メー ター 
の 名 前 の り リスト で ある 。 1 つの 引数 の リス ト で 指定 で きる ズ 
ラメ ー タ ー は 6 4 個 ま で で ある 。 リス ト の 中 (て バラ メー ター 
を 記入 す る 順序 は 任意 で ある 。 バ パラ メー ター と パラ メー ター 
の 間 に は コン マ ま を は プラ ンク を 思 く 。 引数 の リス ト が 指定 
され て いな い 場 合 に は , 当該 入口 名 と 結び 付い て いる すべ て 
の パラ メー ター に と の オプ ショ ン を 適用 する も る の と みな され 
る o 


同一 の OPTIONS の 指定 の 中 で NOMAP , NOMAPTIN, 
お ぶ お よび NOMAPOUT を 3 つと も 指定 する こと が で きる 。 た 
だ し , と の 指定 は , 指定 また は 想定 され て いる 2 つ 以 上 の 引 
数 リス ト の 中 で 同じ パラ メー ター を 含ん で いて は な を なら な い 。 
と れ ら の オプ ショ ン の 用 途 に つい て は , [第 17 章 : 言語 
間 の 連絡 機能 」 を 参照 の こと 。 


一 般 規 則 : 


1 


副 次 入口 点 の パラ メー ター と と の 入口 点 と 渡さ れる 引数 と の 
間 に 設定 され る 関係 は , 主 入口 点 の パラ メー ター と 引 | 数 と の 
間 設 定 さ れる 関係 と 全く 同じ で ある 。 と の 点 に つい て 詳し 
く は , 「 第 9? 章 : サ プ ル ー チ ン と 関数 ] を 参照 の と と 。 


構文 法 細則 1 で 説明 し た よう (C, ENTRY ス テー トメ ント で 
指定 さん て いる 入口 点 を 用 いて プロ シー ジャ ー を 関数 と し て 
呼び 出 し た 後 そ の プロ シー ジャ ー か ら 返 され る 値 の 特性 は , 
ENTRY ス テー トメ ント で 指定 され て いる 属性 (に よっ て 決ま 
る 。 プロ シー ジャ ー か ら 返 され る 値 ( す な を わ ち , RETURN 
ステ ー ト メン ト の 中 の 式 の 値 ) は , 必要 応じ て , 指定 され 
て い る 属性 に 合う よう 変換 され る 。 入口 点 に お いて 属性 が 指 
定 さ れ て いな ゆい 場合 に は , その 入口 点 を 呼び 出す の に 用 いら 
れ た 入口 名 の 頭 文字 に も と づい て 省略 時 属性 が 適用 され る 。 


1 つの ENTRY ス テー トメ ント 2 つの 以上 の 名 前 が ある 場合 
(て は , 各々 の 名 前 は , 同じ バラ メー ター・ リ スト と 同じ 属性 
の 明示 的 指定 と を も つ 別 々 の NTRY ステ ー ト メン ト K 対 する 
1 個 の 名 前 で も ある とみ を な され る 。 た と えば , 次 の よう を ステ 
ー ト メン ト が ある も の と する 。 


A : T ・ ENTRY・: 


と の ステ ー ト メン ト は , 事実 上 , 以下 の ステ ー ト メン ト と 同 
じ で ある 。 


A: 。 ENTRY : 


8 ENTRY: 


返さ れる 値 の 属性 が 明示 的 指定 され て い を な い の で , ブロ ジン 
ー ジ ャ ー か ら 返 され る 値 の 特性 は , A と 1 の どちら CC よ っ て 
入口 点 が 呼び 出さ れ た か に よっ て 決ま る 。 


4. ENTRY ス テー トメ ント は , と の ステ ー ト メン ト で 定義 され 
て いる 副 次 入口 点 を も つ プ ロ シ ー ジ ャ ー の 内 部 に を けれ ば な 
ら な い が , と の プロ シー ジャ ー 作 含ま れ て いる ブロ ッ ク の 内 
部 に あっ て は なら な い 。 また , 実行 の 繰返し を 指定 し て いる 
DO グル ー プ の 中 CRENTRY ス テー トメ ント が あっ て は な ら 
を い 。 


5. 通常 の 逐次 的 制御 の 流れ が NTRY ス テー トメ ント K 出 会 
うと , 制御 は ENTRY ス テー トメ ント を 辻 回 する 。 


6 IRREDUCIBLB と REDUCTIBLE は 最適 化 に 関す る オプ 
ショ ン で ある 。 DOS PL/[ 最適 化 セ マンバ イ ラー に よっ て 
処理 され る プロ グラ ム の 中 で と れ ら の オォ オプション が 使用 され 
て いる 場合 , これ ら の オプ ショ ン K 構 文法 上 の エラー が を い 
か どら か チェ ッ ク さ れる だ け で , と れ ら の オプ ショ ン は 無視 
され る 。 と の 種 の プロ グラ ム て と これ ら の オ プシ ョ ン が あっ て 
も 誤り で は な い 。 


7 上述 の オプ ショ ン の 意味 を 以下 と 示す 。 
COBOL : 


と の PL プン T プロ シー ジャ ー は , と の 入口 点 で は , 
COBOL サ プ ブ ログラム C て よっ て だ け , 呼び 出さ れる 。 


FORTRAN: 


と の PL プ I プロ シー ジャ ー は , と の 入口 点 で は , 
FORTRAN ルー チン (によって だ け , 呼び 出さ れる 。 


NOMAP , NOMAPIN, NOMAPOUT : 


と これ ら の オプ ショ ン は , COBOL し な い し FORTRAN 
と PL プ 1 と の イン ター フェ ー ス (て お いて , デー タ 集 
合体 の 自動 的 を 取扱 い が 行 な た われ な いよ う (C て する た め 
の も の で ある 。 各 オ プシ ョ ン の 引数 の リス ト で , 各々 
の オプ ショ ン を 適用 すべ き パ ラメ ー タ ー を 指定 する て 
と が で きる 。 ある オプ ショ ン の 引数 の リス ト が 指定 さ 
れ て いな い 場 合 (と は , 当該 入口 名 と 結び 付い て いる す 
べ て の パラ メー ター に その オプ ショ ン を 適用 する も の 
と みな され る 。 


FORMAT 


FORMAT ステ ー ト メン ト は , 転送 する デー タ の 形式 を 制御 する た 


め KC 編 集 指 示 転 送 ス テー トメ ント と ぉ いて 使用 する と と の で きる 形 
式 リ スト を 指定 する た め の も の で ある 。 


一 般 形 式 : 
ラ ベル : [ ラベ ル : ]・・・FORMAT (形式 リス ト ) : 


構文 法 細 則 


1 [形式 リス ト ] は , 編集 指示 転送 の た め の 形式 リス ト の 指示 
と 関す る 規則 従っ て 指定 し を けれ ば な ら な い 。 と の 規則 
つい て は , [第 1 0 章 : 入力 と 出力 ] を 参照 の と と 。 


2. FORMAT ステ ー ト メン ト で は , 「 ラ ベル ] を 少な く と も ゃ も 1 
つっ 指定 し な けれ ば を ら な い 。 いく つか ある ラベ ん ル の 内 の 1 つ 
( また は , いく つか ある ラベ ル の 内 の 1 つの 値 を 表わす ラベ 
ん 変数 を いし 関数 参照 ) は , 遠隔 形式 項目 の 中 に ある ステ ー 
トメ ント ・ ラ ベル 標識 で ある 。 


一 般 規 則 : 


1. GET また は PUT ス テー トメ ント の 編集 指示 デー タ 指 定 の 形 
式 リ スト の 中 MC 速 隔 形 式 項目 R を 人 人 れる と と が で きる 。 形式 
リス ト の ER で 表わさ れる 部 分 は , R で 指定 され て いる ステ ー 
トメ ント ・ ラ ベル で 識別 され る FORMAT ステ ー ト メン ト に に 
ょ っ て , 補 を われ を けれ ば な を ら な い 。 


2. 1 で 述べ た 遠隔 形式 項目 と FORMAT ステ ー ト メン ト は , 同 
じ ブ ロッ ク の 内 部 に を けれ ば な ら な を い 。 


3 FORMAT ス テー トメ ント 条件 接頭 語 を つけ る 場合 に は , 
その FORMAT ステ ー ト メン ト を 参照 し て いる GET な いし PUT 
ステ ー ト メン ト の 条件 接頭 語 と 同じ も の を つけ な けれ ば な ら を い 。 


4. 通常 の 乏 次 的 を 制御 の 流れ が FORMAT ステ ー ト メン ト K 出 
会 ら と , 制御 は と の ステ ー ト メン ト を 辻 回 する 。 また, と の 
スネ ステー トメント の ステ ー ト メン ト ・ ラ ベル 関し て CHECK 
条件 が 引き 起 さ れる と と は な い 。 


5 GO TO ステ ー ト メン ト を 用 いて FORMAT ステ ー ト メン ト 
と 制御 を 渡す の は , 誤り で ある 。 


F REE 


FRE ステ ー ト メン ト は , と と で 指定 され て いる 基底 付 変 数 を い 
し 被 制 御 変数 に 割り 振ら れ て いる 記憶 域 を 解放 する た め の も の で 
ある 。 と と で 指定 され て いる の が 被 制 御 変数 で ある 場合 に は , 次 
新しい 割 振り が 使用 可能 に た り , と れ 以 後 の と の 識別 名 へ の 参照 は 
その 割 振り へ の 参照 と な る 。 


一 般 形 式 : 


FREE オプ ショ ン [ , オ プシ ョ ン ]・・・5: 
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と と で , |「 オ プション]| は 次 の いずれ か の 形 を と る 。 


オプ ショ ン 1: 
識別 名 
オプ ショ ン 2: 
し ロタ クー ター 修飾 チー> ]・・・ 
基底 付 変数 識別 名 
し 1N ( 要素 エリ ア 変 数 ) 〕 


構文 法 細 則 : 


1 オプ ショ ン 1 の 「 識 別名 ] は , 被 制御 記 村 域 タラ ス の 要素 , 
配 多 , な いし 大 構造 で ある 。 


2. オプ ショ ン 2 の 「 基 克 付 変数 識別 名 」 は , 犬 字 の つい て いな 
い レベ ル 1 の 基底 付 変数 で を けれ ば な ら な い 。 


3. 1 つの ステ ー ト メン ト の 中 で オプ ショ ン 1 と オプ ショ ン 2 を 
使用 し て も よい 。 


一 般 規則 : 


1 FREE ステ ー ト メン ト が 実行 され る 時 点 で , 指定 され て い 
る 基底 付 で を い 議 別名 に 記憶 域 が 全く 割り 振ら れ て いな どい 場 
合 に は , 何 $ 行 を われ な い 。 


一 般 規 則 2 て 5 は , オプ ショ ン 2C だ け 適 用 され る 。 


2. 基底 付 変 数 が 明示 的 C 修 飾 さ れ て いな を い 場 合 C は , と の 基底 
付 変数 と いっ し ょ K 明 示 的 に 宣言 さん て いる ロケ ー タ ー を 用 
いて , 記憶 域 の 解放 すべ き 部 分 に ある デー タ の 世代 が 識別 さ 
れる 。 ロケ グー ター が 宣言 され て いな じ し 場 合 C に は, と の ステ ー 
トメ ント は 誤り を る 。 


3 解放 され る 記憶 域 の 大 き さ は , 基底 付 変数 の 層 性 ( 指定 が あぁ 
れ ば , 記憶 域 が 解放 され る 時 点 の 限界 な ょ び プ また は 長 さ も 
入 め て ) と ょ っ て 決ま る 。 と うし て 決定 され る 大 き さ と 割り 
振ら れ て いる 大 き さ と が 一 致す る よう 図る の は ュー ザー の 
側 の 責任 で ある 。 基底 付 変数 の 記憶 域 が 割り 振ら れ て い を 
い 場 合 に は , 結果 は わか ら た い 。 


4. 基底 付 変 数 を 使っ て 記憶 域 を 解放 する 場合 , その 記憶 域 は 同 
じ デ ー タ 属性 を も つ 基 底 付 変数 (に 割り 振ら ん て いい る も の で 
な けれ ば な ら な いら 。 


5. 解放 すべ き 記 憶 域 が エリ ア の 中 割り 振ら れ て いる 場合 に 
は , IN オプ ショ ン を 指定 する か , と れ を 暗示 する 。 基底 付 
変数 が エリ ア の 中 割り 振ら れ て いな じい 場合 CC は , IN ォ 
プシ ョ ン を 指定 する こと は で き な い 。 エリ ア 割 当て に ょ っ て 
目標 エリ ア の 中 基底 付記 憶 域 が 割り 振ら れる と いら 点 
注意 する こと と 。 と の 目標 エリ テア を 指定 し て いる TI N オ プン ショ 
ン ( て よっ て , と の よう な 割 振り を 解放 する と と が で きる 。 
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GET 
GE ステ ー ト メン ト は , 次 の いずれ か の 方 法 で 使用 され る 
STREAM 転送 ステ ー ト メン ト で ある 。 


1 外部 記憶 媒体 ( デー タ ・ セ モット ) に ある デー タ を 計算 機内 部 
の 1 つ 以 上 の 受入 れ 側 フィ ー ル ド ( 変数 ) C 割 り 当 て る 。 


2. 計算 機内 部 の 記憶 域 ( 文字 スト リン グ 変 数 ) に ある デー タ を 
計算 機内 部 の 1 つ 以 上 の 受入 れ 側 フ ラフ ィ ー ル ド ( 変数 ) 割り 
当て る 。 


一 般 形 式 : 
GET オプ ショ ン ・ リ スト : 
| オプション ・ リ スト | の 形式 は , 次 の 通り で ある 。 


[ FILE (ファ イィ イメ 式 ) | 

STRING ( 文字 スト リン グ 名 ) ] 

し デー タ 指 定 ][COPY 〔 (ラファ イメ 式 ) 〕] 
ド 避 友よ PE て 表 ) 」 


一 般 規 則 : 


1 FILE オ プシ ョ ン も STRING ォ プション も 指定 され て い 
を じい 場合 に は , FILE(SYSIN) で ある も の と 根 定 され る 。 


2. SKIP オプ ション を 指定 し な い 場 合 C に は, 「 デ ー タ 指定 」 
を 少 を く と も 1 つつ 記入 し を な けれ ば を ら な じい 。 


3 オプ ショ ン を 記入 する 順序 は 任意 で ある 。 


4 1 上 LE オプ ショ ン の 「 フ ァイル 式 ] で は 割り 当て られ る 
値 を 収容 し て いる デー タ ・ セ モット と 結び 付け られ た ( 開放 の 
と き C ) ファ イル を 指定 する 。 と の ファ イル は STREAM 
INPUT フ ァイル で な けれ ば な ら な い 。 


COPY オプ ショ ン の 「 フ ァイル 式 ] で は , 値 を 受け 取る と 
と (と を っ て いる デー タ ・ モ セッ ト と 結び 付け られ て いる ファ イ 
ル を 指定 する 。 こと の ファ イル は STREAM OUTPUT ラ 
ァイル で な けれ ば な を ならない 。 


5. 「 廊 字 ス トリ ング 名 ]」 で は , デー タ ・ リ スト 割り 当て られ 
る デー タ を 収容 し て いる 文字 スト リン グ を 指定 する 。 と の 名 
前 は 組込み 関数 へ の 参照 で あっ て も よい 。 と の オプ ショ ン の 
も $ も と で の せ ET 操作 は , 各々 , 指定 され て いる スト リン グ の 
最初 か ら 始 め ら れる 。 この スト リン グ の 文字 数 が デー タ 指 定 
で 指定 され て いる 文字 総数 より ゃ 小さ い 場 合 C は , ERROR 
条件 が 引き 起 さ れる 。 


デー タ 指 示 転 送 の も る と で STRING オォ プシ ョ ン を 使用 する 場 
合 C は , スト リン グ の 中 の 識別 名 と 同じ 識別 名 が デー タ 指定 
の 中 に な けれ ば, ERROR 条件 が 引き 起 さ れる 。 

[デー タ 指 定 」 に つい て は , 「 第 1 1 章 : ス トリ ー ム 方 式 の 
転送 ] を 参照 の と と 。 


FILE オ プシ ョ ン で 指定 され て いる ファ イル が 開か れ て い 
を い 場 合 C は , スト リー ム 式 入力 転送 を する た め ( と , その フ 
テ ァイル が 暗示 的 開か れる 。 


COPY オ プシ ョ ン を STRING オプ ショ ン と いっ し ょ を 
使用 する と と は で き な い 。 COPY オプ ショ ン は , 原 デ ー タ 
の 流れ を , 読み 取っ た まま の 形 で 何 の 変更 も ゃ 加え る こと な く , 
指定 され て いる ファ イル 区 書 き 込む よう 指定 する た め の も の 
で ある 。 入力 の 流れ (と 新しい レコ ー ド が 出 て 来る た びと, 
COPY ファ イル の レコ ュ ー ド も 新しく な る 。 省略 時 の ファ イ 
ル は , 標準 ファ イル の SYSPRINT で ある 。 


COPY オプ ショ ン で 指定 され て いる ファ イル が 開か れ て い 
を ない 場合 に は , スト リー ム ュ 式 出力 転送 を する た め に と の ファ 
イル が 暗示 的 と 開か れる 。 


COPY オプ ショ ン を も つ GET ス テー トメ ント を 実行 し て 
いる 間 割 込み が 発生 し , と の た め (C と ある オン ・ ユ ニッ ト 
入っ た が , と の オン ・ ユ ニッ ト お いて 同 ヒ ファ イル を 対象 
と する 別 の GET ス テー トメ ント が 実行 され て お り , さら (C 
と の 後 オ ン ・ ユ ニッ ト か ら 割 込み の 発生 し た ステ ー ト メン ト 
制御 が 戻さ れん た, と いう 場合 に は, COPY オ プシ ョ ン が 
指定 され ん て いな いも の と し て と の GET ス テー トメ ント の 実 
行 が 続行 され る 。 オ ン ・ ユ ニッ ト (C お いて , COPY オプ シ 
ュ ョ ン で 指定 され て いる ファ イル を 対象 と する PUT ス テー ト 
メン ト が 実行 され た 場合 と は , 転送 され る デー タ の 位 軒 が 最 
後 C 転 送 さ ん た COPY デー タ 項 目 の 直ぐ 後に を る と は 限ら 
を い 。 


SKIP オ ォ オプ ション を STRING オプ ショ ン と いっ し ょ を 
指定 する と と は で き な い 。 SKIP オブ ショ ン は , 当該 ファ 
イル C ち な ける 新しい 「 現 時 点 の 行 」 を 定義 せ する た め の も の で 
ある 。 SKIP オプ ショ ン で 式 が 指定 され て いる 場合 C は , 
と の 式 が 整数 ( w ) 変換 され る 。 叉 は 0 より 大 きく な けれ 
ば た ら な い 。 叉 が 0 より 大 きく な い 場 合 は , コン バイ ラー が 
の 値 を 1 て する 。 デ ー タ ・ セ ッ ト は , 「 現 時 点 の 行 」 か ら 
数 えて 番目 の 行 C 位 置 設定 され る 。 式 が 指定 され て いな い 
場合 C は , SKIP( 1 ) で ある と みな を な され る 。 SKIP オブ 
ショ ン は , つね に デー タ が 転送 され る 前 実行 され る 


GO _ TO 


省略 形 : 


GOTO 


GO TO ステ ー ト メン ト は , と と で 指定 され て いる ラベ ル を も つ ス 
テー トメ ント 制御 を 渡す た め の も の で ある 。 


一 般 形 式 ・ 


{GOTO} 要素 ラベ ル 式 : 


一 般 規 則 : 


出 


1F 


「 要 素 ラ ベル 式 」 は ラベ ル 定 数 , ラベ ル 変 数 , ま を た は ラベ ル 
値 返す 関数 参照 で も ある 。 GO TO ステ ー ト メン ト を 実行 す 
る た び IC ラ ベル 式 の 値 が 変っ て いる と と も ある の で , いつ も 
同じ ステ ー ト メン ト に 制御 が 渡さ れる と は 限ら た い o 


GO TO ステ ー ト メン ト を 用 いて 非 活用 状態 に と ある ブロ ッ ク 
と 制御 を 渡す と と は で き な い 。 


D O グ ルー プ の 中 で 実行 の 繰返し が 指定 され て いる 場合 に は , 
GO TO ステ ー ト メン ト を 用 いて DO グル ー プ の 外部 か ら , 
D O グル シープ の 内 部 に ある ステ ー ト メン ト に 制御 を 渡す と と 
は で き な い 。 ただし, DO グルー ズブ の 内 部 で 呼び 出さ れ を た ブ 
ロロ シー ジャー な いし オン ・ ユ ニッ ト を GO TO ステ ー ト メン 
ト に よっ て 終了 させ る と と は で きる 。 


ある ブロ ッ ク の 中 に ある GO TO ステ ー ト メン ト に よっ て そ 
の ブロ ッ ク K 含 まれ て いな い 場 所 に 制御 が 渡さ れる と , その 
プ ブロック は 終了 する 。 また , 制御 が 疲 っ た 場所 が , 上 述 の 終 
了 さ せら れ た ブロ ッ ク を 直接 活用 化し た の で は を い ブ ロッ ク 
(て 含ま れ て いる 場合 は , 活用 状態 化 の 順序 か ら 見 て 両 ブ ロッ 
ク の 間 に あ る すべ て の ブロ ッ ク も 終了 する ( と の 例 と 詳細 MC 
つい て は , 「 第 8 章 : 記憶 域 の 制御 ] を 参照 の と と )。 あ 
る GO TO ステー トメント (て よっ て 1 つ 以 上 の ブロ ッ ク が 終 
了 す る と , こと これ ら の ブロ ッ ク が 通常 の 形 で 終了 し た の と 同様 
IC し て , 各種 条件 か 復元 され , 自動 変数 が 解放 され る 。 


関数 と し て 呼び 出さ れ を た を プロシージャー の 中 ある GO TO 
ステ ー ト メン ト C て よっ て その 外 C 制御 が 渡さ れ た 場合 は, 
対応 する 関数 参照 を 含む 式 の 値 の 計算 が 中 止 さ れる 。 


IF ステ ー ト メン ト は , 指定 され て いる 式 の 値 を テス ト し , と の テ 
スト の 結果 に も と づい て 実行 の 流れ を 規制 する た め の も の で ある 。 


一 般 形 式 : 


IF 要素 式 
THEN ュ ユニット ー 1 
(ELSE ユニ ッ ト ー2 〕 


J 節 ・ 383 


ステ ー ト メン ト 


構文 法 細則 : 


1 


各々 の ユニ ッ ト は , 1 つの ステ ー ト メン ト ( DO, END , 
PROCEDURE, BEGIN DECLARE ,DEFAULT , 
FORMAT, ENTRY を 除く ) , DO グル ー プ , また は 開始 
ブロ ッ ク の いずれ か で ある 。 


IFR ステ ー ト メン ト そ の も の の 終り (て と は セミ コロ ン を 記入 し 
な い 。 し か し , 指定 する 各々 の 「 ユ ニッ ト | の 終り (C は セミ 
コロ ン を 記入 し を な けれ ば な を ら な い 。 


3 各々 の 「 ユ ニッ ト |」 に は , ラベ ル や 条件 接頭 語 が つい て いて 


も よい 。 


一 般 規 則 : 


1 
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要素 式 の 値 が 計算 され , 必要 (に 応じ し て , 要素 式 が ビッ ト ・ ス 
トリ ング 変換 され る 。 PLSE 文節 ( ELSE と その 後 の 
| ユニ テッ ト 」 ) が 指定 され て いる 場合 に は, と の 後 次 の よう 
な 措 代 が と られ る 。 


スト リン グ の 中 KK 値 1 を も つ ビ ッ ト が ある 場合 は , 「 ユ = 
ッ ト ー 1 | が 実行 され , 次 いで , IF ステ ー ト メン ト の 次 の 
ステ ー ト メン ト K 制 御 が 渡さ れる 。 スト リン グ の 中 の すべ て 
の ビッ ト の 値 が 0 で ある 場合 C は , 「 ユ ニッ トー1 | は 実行 
され ず と |「 ユ ニット ー 2」 が 実行 され , こと の 後 , 次 の ステ ー 
トメ ント 制御 が 渡さ れる 。 


ELSE 文節 が 指定 され て いな い 場 合 に は , 次 の よら な 措置 
が と られ る 。 


スト リン グ の 中 MC 値 1 を も つ ビ ピット が ある 場合 に は , 
ッ ト ー1 | が 実行 され , 次 いで , IF ステ ー ト メン ト の 次 の 
ステ ー ト メン ト を 制御 が 渡さ れる 。 すべて の ビッ ト が 0 で あ 
る 場合 に は , 「 ユ ニッ トー1 |] は 実行 さん れず に 次 の ステ ー ト 
メン ト 制御 が 渡さ れる 。 


計 王 


各々 の 「 ユ ニッ ト | の 中 制御 の 移動 を 行なう た め の ス テー 
トメ ント (たとえば, GO TO ) が あっ て も よい 。 と いう と 
と は , 1F ス テー トメ ント の 通常 の 制御 の 流れ を 変更 し て も 
よい と いう と と で ある 。 


要素 式 に 配列 変数 ま た は 構造 変数 を 記入 する と と が で きる の 
は , その 変数 が , 要素 値 を 返す 関数 へ 疲 さ れる 引数 で ある 場 
合 だ け で ある 。 


IF ステ ー ト メン ト を ネス ト す る と と が で きる 。 つま り , 一 
方 の 「 ニ ニッ ト 」 また は 双方 の 「 ニ ニッ ト | CTIF ス テー ト 
メン ト が 含ま れ て いて も よい 。 ELSE 文 節 は , つね , 同 
じ ブ ロッ ク な いし D O グル ー プ の 中 に あっ て ELSE と 対 
を っ て いな いら 一 番 内 側 の IF と 結び つく 。 し た が っ て , 所 要 
の 制御 の 流れ を 指定 する た め (C, ナル ・ ス テー トメ ント を も る 
つ ELSE を 使用 する 必要 が ある と と も ある 。 ネス ティ ング 
の 深 さ は , 最高 4 9 まで 許さ れる 。 


: 言語 解説 書 第 2 部 


LOCATE 


LOCATE ステ ー ト メン ト は, BUFFERED OUTPUT フラ テ イル 
適用 され る も の で , 緩衝 域 の 中 で 基底 付 変数 の 割 振り を 行なう の 
と 使 用 され る 。 また , と の ステ ー ト メン ト を 用 いて , す で K 緩 香 域 
の 中 割り 振ら れ て いる 基底 付 変数 を 転送 する と と も で きる 。 


一 般 形 式 : 


LOCATE 変数 FILE (ファ イィ メル 式 ) 
[SET ( ポイ ンタ ー 変 数 ) ] 
[ KEYFROM ( 式 ) 〕 : 


構文 法 細則 : 


崩 


の : 


オプ ショ ン を 記入 する 順序 は 任意 で ある 。 


「 変 数 ] は , 添字 の つい て いたい レベ ベル 1 の 基底 付 変数 で な 
けれ ば を ら な い 。 


一 般 規 則 : 


中 


FILE オプ ショ ン は , 対象 と を な る ファ イル を 指定 する た め 
の も の で ある 。 と の オプ ショ ン は 必ず 指定 し を けれ ば な ら な 
い 。 


LOCATE ステ ー ト メン ト が 実行 され る と , 指定 され て いる 
基底 付 変数 が 緩衝 域 の 中 割り 振ら れる 。 ま た , 基底 付 変 
数 の ( REFER オ プシ ョ ン で 指定 され て いる ) 構成 要素 が 初 
期 設 定 さ れる 。 さ ら C, ポイ ンタ ー 値 が SET オォ オプション 
で 指定 され て いる ポイ ンタ ー 変 数 (割り 当て られ る 。 S BT 
オォ オプション が 指定 され て いな い 場 合 C は , ポイ ンタ ー 値 が , 
基底 付 変数 の 宣言 で 指定 され て いる ボ ポインター 変数 割り 当 
て られ る 。 と の ポイ ンタ ー 値 は 緩衝 域 の 中 の レコ ー ド を 指し 
て いる 。 LOCATE ステ ー ト メン ト を 実行 し た 後 , 当該 ファ 
イル 対す る 次 の LOCATE 操作 , WR [TE 操作 , また は 

CLOSE 操 作 の 直前 (C 行 を われ る デー タ ・ セ ッ ト へ の 転送 C 
備え て , 基底 付 変 数 C 値 を 割り 当て る と と が で きる 。 


KEYFROM オプ ショ ン が 指定 され ん て いる 場合 に は , 式 の 値 
は 娘 字 スト リン グ K 多 変換 され , 後に レコ ュー ド が 書き 込ま れる 
と き (C レ コー ド の キー と し て 使用 され る 。 


FILE オプ ショ ン で 指定 され て いる ファ イル が 開か ふれ て い 
を いら 場合 に は , と この ファ イル は 自動 的 に 開か ん る 。 し た が っ 
て , と の ファ イル を 参照 し て いる OPEN ステ ー ト メン ト が 
LOCATE ス テー トメ ント の 前 (と ある の と 同じ と と C な る 。 た 
だ し , と の ファ イル の 宣言 に な いて RECORD 属性 と 

OUTPUT 属性 と を 指定 し て な か を けれ ば を ら な い 。 さも な 
い ゅ と, UNDEFINEDFILE 条件 が 引き 起 さ れる 。 


当該 デー タ ・ セ ッ ト の 編成 が CONSECUTIVE で ぁ る 場合 
限り, LOC ATE を いし LOCATE SRT ス テー トメ ント 
を 用 いて 行 を われ る SEQUENTTIAL BUFFEERED っ フ 
ァイル の レコ ー ド の 転送 は , 自動 的 に た. ブロ グラ ム 内 の 他 


の ステ ー ト メン ト の 実行 と 並行 し て 進め られ る 。 


ナル ・ ス テー トメ ント 


ナル ・ ス テー トメ ント は , 何 $ も 行なわ ず , また を た ステー トメ ント の 実 
行 順 序 も 変更 し な い ス テー トメ ント で ある 。 ナル ・ ス テー トメ ント 
の ラベ ル に 関し て CHECK 条 件 を 解禁 し て ある 場合 に は , ナル ・ ス 
テー トメ ント 制御 が 渡る た びに CHECK 条 件 が 引き 起 さ れる 。 


一 般 形式 : 
[ ラベ ル : ] ・・・: 
ある ナル ・ ス テー トメ ント の ラベ ル と その 直後 の ステ ー ト メン ト の 


ラ ベル と を 比較 し て も 等 し く は な ら な い , と い 2 点 注意 する と と 。 
た と えば, 次 の よう な コー ディ ング が ある も の と する 。 


B: 区 ニテ T: 


と の 場合 , ラベ ル A と ラベ ル B の 比較 結果 は 等 し く を い 。 


oN 
ON ステ ー ト メン ト は , と と で 指定 され ん て いる 例外 条件 に 起 央 する 
割込み が 発生 し た と き C, どの よう な 措 思 ( プ ログ ラマ ー の 定義 
を る 措置 また は ンス テム の 標準 措 借 ) を と る か を 指定 する ため の も 
の で ある 。 


一 般 形 式 : 
ON 条件 [SNAP]{[ SYSTEM: | オン ・ テ ニット} 
構文 法 細則 : 
1. [条件 ] は , 「H 節 : 条件 ] に 記載 され て いる どの 条件 で も よい 。 
2. 「 オ ン ・ ユ ニッ ト ]| 自体 の 終り (に セミ コロ ン を 記入 し を けれ 
ば を ら な を ない から , 一 般 形 式 の |「 オ ン ・ ユ ニッ ト 」| の 終り C は 
セミ コロ ン を 示し て な い 。 SYSTEM の 後 (は, セミ コロ ン 
を 記入 し な けれ ば な ら な い 。 
一 般 規 則 ・ 
1. 指定 され て いる 条件 KC 起因 する 割込み の 処理 方 法 は , ON ス 
テー トメ ント よっ て 決ま る 。 すなわち , シス テ ム の 標準 方 
式 で と の 割込み を 処理 する か , プロ グラ マー の 指定 し 方式 


で と の 割込み を 処理 する か は , ON ステ ー ト メン ト 内 の 処置 
の 指定 に 応じ て ., 次 の ょ うに し て 決め られ る 。 


8 ON ステ ー ト メン ト の 処 言 の 指定 が SYSTEM で ある 場 
合 に は , シス テム の 標準 処置 が と られ る 。 シス テ ム の 標 
準 処 置 は , 多く の 場合 , メッ セー ジ を 印刷 し BRROR 
条件 を 引き 起す と と だ け で ある 。 し か し , どの 条件 に つ 
いて も シス テム の 標準 処置 が 同じ で ある と いう わけ で は 
な い 。 各々 の 条件 (と 対す る シス テム の 標準 処置 に つい て 
は , 「H 節 : ON 条件 」 を 参照 の こと 。 ( ある 憲 A み 
が 発生 し た と き , と の 割 及 み の 原因 で ある 条件 の た め の 
ON ステ ー ト メン ト が 効力 を も っ て いな い 場 合 C に は, つ 
ね に , シス テム の 標準 処 財 が と られ る と と 注意 し て い 
た だ きた い 。 ) 


b. 処置 の 指定 が 「 オ ン ・ ユ ニッ ト 」| で ある 場合 に は , プロ 
グラ マー の 側 で 割込み 処理 の た め の 独 自 の 処置 ( オン ・ 
ユニット 自体 の 中 の ステ ー ト メン ト よ っ て 定義 され た 
処置 ) を 与え て ある 筐 で ある 。ON ス テー トメ ント が 実 
行 さ れる と き (C, その オン ・ ユ ニッ ト が 実行 され る わけ 
で は な い 。 オ ン ・ ユ ニッ ト は , 指定 され て いる 条件 KC 起 
因 す る 割込み が 発生 し た と き (C ( ある い は , SIGNAL 
ステ ー ト メン ト (C よ っ て 信号 が 出さ れ た 条件 (起因 す る 
割込み が 発生 し て 初め て ), 実行 され る の で ある 。 


2. ある ブロ ッ ク の 中 に ある ON ステ ー ト メン ト が 実行 され , そ 


の 結果 その 処置 の 指定 (「 オ ン ・ ユ ニッ ト | また は SYSTEM) 
が 設定 され る と , その ブロ ッ ク , お よび その ブロ ッ ク に と よっ 
て 開始 され た 活用 化 の 系 列 C あ る すべ て の ブロ ッ ク (C わ た っ 
て , と の 処置 の 指定 効力 を ゃ もち つづ ける 。 ただし, 別 の 

ON ステ ー ト メン ト ま た は REVERT ステ ー ト メン ト が 実行 
され る と , 次 の よう とし て 先 の 処 軒 の 指定 は 効力 を 失 を 2。 


a. 後 の ON ス テー トメ ント で 先 の ON ステ ー ト メン ト と 同 
じ 条 件 が 指定 され て ぉ なり, し か も , 先 の ON ステ ー ト メ 
ント を 含む ブロッ ク よ っ て 開始 され た 活用 化 の 切替 系 
列 C あ る ブロ ッ ク の 中 で 後 の ON ステ ー ト メン ト が 実行 
され た 場合 Cc は , 先 の ON ステ ー ト メン ト の 処置 の 指定 
は 一 時 停止 され る ( 積み 重ね られ る )。 と の 後 , 
REVERT ステ ー ト メン ト が 実行 され る か , 後 の ON 
ステ ー ト メン ト を 含む ブロック が 終了 する と , 先 の ON 
ステ ー ト メン ト の 処置 の 指定 を 復元 する と と が で きる 。 


b. 後 の ON ス テー トメ ント と ょ と 先 の ON ステ ー ト メン ト が 共 
(て 同 一 ブロ ッ ク の 同一 の 呼出 し の 内 部 に ある 場合 に は , 
先 の ON ステ ー ト メン ト は に は 完全 無効 に な る 。 


コン バ パイ ラー は , つね CC, オン ・ ユ ニッ ト を , その オン ・ ユ 
ニッ ト が 入っ て いる ブロ ッ ク の 内 部 ある プロ シー ジャ ー と 
し て 取り 扱 2。 ( 概念 上 け は, オン ・ ユ ニッ ト は PROCEDURE 
ステ ー ト メン ト と END ス テー トメ ント 囲ま れ て いる 。 ) 
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ある オン ・ ユ ニッ ト の 中 で 参照 され る 名 前 は すべ て , その オォ 1 INPUT オ プシ ョ ン あ る い は OUTPUT オ プシ ョ ン で は , フ 
ン ・ テ ユニット を 指定 し て いる ON ステ ー ト メン ト が 実行 され ァイル の 宣言 で 指定 され て いる 属性 を 補充 する た め の 属 性 を 
た 環境 に な いて 知ら れん て いる 名 前 で あり , 害 入 み が 発生 し た 指定 する 。 


環境 に お ない て 知ら れ て いる 名 前 で は を ない 。 
2. ある ファ イル の 「 オ プシ ョ ン の グル ー ブ | の 中 の オプ ショ ン 


4. ある 条件 が 引き 起 さ れ た 時 点 に お いて その 条件 が 解禁 状態 お ぉ お よび FILE オプ ショ ン を 記入 する 順序 は 任意 で ある 。 
ある 場合 に 限り, 実行 中 に 引き 起 さ れ た 条件 は , 割込み を 発 
生 さ せる 。 3 「 フ ァイル 式 | で は , デー タ ・ セ ッ ト と 結び 付け る べき ファ 
イル の 名 前 を 指定 する 。 1 つの OPEN ステ ー ト メン ト で い 
a. 以下 の 条件 は 省略 時 解 羽 に ょ っ て 解禁 状態 に され る 。 くつ か の ファ イル を 開く と と が で きる 。 
AREA , OVERFLOW, FIXEBDOVERFLOW , 
UNDERFLOW , ZERODIVIDE ,CONVERSION, 一 般 規 則 : 
すべ て の 入出 力 条 件 , CONDITION, FINISH, 
ERROR。 1. す で 開 か れ て いる ファ イル を 開く よう 指定 し て も , 何 $ 行 
を われ な い 。 
b. 以下 の 条件 は , 省略 時 解 収 C ょ っ て 禁止 状態 に され る 。 
SIZE,STRINGSIZE,STRINGRANGE , 2. CONS ECUTIVE 編成 の UNBUFFRERED ラファ イル 対し 
SUBSCRIPTRANGE , CHECK。 て だ け , INPUT オ プシ ョ ン あ る い は OUTPUT オ ォ オプション 


を 指定 する と と が で きる 。 
c. 条件 接頭 語 を 用 いて , 以下 の 条件 を 解禁 状態 C 連 く か , 


禁止 状態 に 置く か 指定 する と と が で きる 。 OVERFLOW, 3 LINESIZE オプ ショ ン は , STREAM OUTPUT ファ 
FIXPDOVERFLOW, UNDEBRFLOW, ZERODIVIDE , ィ ル 対し て だ け 指 定 す る と と が で きる 。 と の 式 を 計算 し て 
CONVERSION , SIZE, STRINGS1IZE, 整数 (変換 し た も の が , 当該 ファ イル MC 対す る 次 の 操作 の 間 , 
STRINGRANGE , SUBSCRIPTRANGE ,CHECK。 行 の 長 さ と し て 用 いら れる 。 印刷 形式 項目 な よび 制御 形式 項 
目 を 使う か , GET な いし PUT ス テー トメ ント の オプ ショ ン 
5. オン ・ ユ ニッ ト が 1 つの ステ ー ト メン ト だ け で 構成 され て い を 使え ば , 新しい 行 を 開始 させ る と と が で きる 。 新しい 行 を 
る 場合 C は , オン ・ ユ ニッ ト の 中 で 遠隔 形式 指定 を 参照 する 開始 する た め の 明 示 的 指定 され た 措置 が と られ る 前 に , あ 
と と が で きる 。 る 行 の 終り ょ り 右 側 の 場所 ファ イル の 位置 を 設定 し ょ うと 
する と , 自動 的 に 新しい 行 が 開始 され , と の 新しい 行 の 最初 
6 SNAP が 指定 され て いる 場合 に は , 指定 され ん て いる 条件 が に ファ イル の 位置 が 設定 され る 。 当 コ ュ ン パイ ラー で は , 以下 
引き 起 さ れ , 割込み が 生じ し る と , 呼出 し 追跡 が り ス ト さ れる 。 の 数 値 が 適用 され る 。 
すなわち , 窒 入 み 発 生 の 時 点 C お いて 活用 状態 K あ る すべ て 行 の 最大 の 長き : 
の ブロ ッ ク が SYSPRINT(C リ スト され る 。 F 形 式 ま た は DU 形式 : 32.759 
V 形式 KS 放 た 1 
Mb. 行 の 最小 の 長 さ ・ 
F また は U 1 
OPEN ステ ー ト メン ト は ファ イル 名 と デー タ ・ セ ッ ト と を 半 び 付 2 全 NR の 2 


ける た め の も の で ある 。 また , 開く べき ファ イル の 宣言 で 指定 され 


て いる 属性 が 不 充分 で ある 場合 に は , OPEN ステ ー ト メン ト で そ 省略 時 の 行 の 長 さ 120 
の ファ イル の 属性 を 補 売 する と と が で きる 。 INPUT フ ァイル 対し て LINESTZE オプ ショ ン を 指定 
一 般 形式 : ONS 2 20 
ョ ン が 出 て 来る た び ( と と られ る 行 の 長 さ は , 当該 デー タ ・ セ 
SE ( ファ イル 式 ) [オプ ショ ン の グル ー プ 〕 ッ ト を 作成 する と き 使 用 され た 行 の 長 さ で ある 。 データ ・ セ 
[, ( ファ イメ 式 ) [オプ ショ ン の グループ 〕 ] …: レト の 作成 の と き 行 の 長 さ が 使用 され て いな い 場 合 福 。 論理 
と と で 「 オ プシ ョ ン の グル ー プ | は 次 の よう な 形 を と る 。 レコ ー ド の 「 現 時 点 の 長 さ | (V 形 式 レ ュー ド K 関 し て は , 


CINPUT10UTPUT ) これ か ら 制 御 バ イト を 引い た 値 ) が 行 の 長 さ で ある と みな さ 


[LINESIZE( 要 素 式 ) 46 る 0 


[PAGESIZE( 要 素 式 ) 
性 を る つ フ ァイル MK 対し て だ け 指 定 す る と と が で きる 。 と の 
構文 法 細則 : ォ プ ショ ン で 指定 され て いる 要素 式 の 値 が 計算 され , その 値 が 
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整数 変換 され る 。 この 整数 は 1 ペー ジ あ た り の 最大 の 行 数 
を 表わす 。 と の 後 行なわ れる PRTINT フ ァイル へ の 転送 の 間 
て, PAGE 形式 項目 を 使 り 9 か また は PUT ス テー トメ ント 
の PAGE オプ ショ ン と よっ て , 新しい ペー ジ を 開始 す る こと 
と が で きる 。 新しい ペー ジ を 開始 する た め の 措 置 が と られ る 
前 た,。 ある ペー ジ が 一 杯 (と を り し か る 印刷 すべ き デ ー タ が ま 
だ 残っ て いる 場合 C に は, ENDPAGE 条件 が 引き 起 さ れる 。 
当 コ ン バ イ ラー に お いて は , 以下 の 数 値 が 適用 され る 。 


ペー ジ の 最大 の 大 き さ 32.767 
ペー ジ の 最小 の 大き さ 1 
ペー ジ の 省略 時 の 大 き さ 6 0D 


5. STREAM ファ イル が 開か れる と , 丁度 ゼロ 番目 の レコ ー ド 
の 走査 が 完了 し た 位置 に , 概念 上 と の ファ イル が 設定 され る 。 
つま り , と の ファ イル は , 最初 の GET な いし PUT ス テー 
トメ ント (て よ っ て アク セス され る レコ ー ド の 直前 に ある 想像 
上 の レ ュ コード の 終り 位置 設定 され る 。 し た が っ て , 最初 の 
GET を いし PUT ス テー トメ ント の オプ ショ ン ま た は 形式 項 
目 (C よって, n 行 スキ ッ プ し た 人 後 初め て レコ ー ド (て アク セス 
する よう , 指定 され て いる 場合 C は , ファ イル は hn 番目 の レ 
ュー ド の 始め CC 位置 設定 され る 。 PRINT フ ァイル !C お いて 
は , | ゼロ 番目 の レコ ー ド |」 は ペー ジ の 大 き さ に 等 し い 行 番 
号 を ゃ び 概 念 上 の 行 を 指す 。 最初 の PUT ステ ー ト メン ト %, 
PAGE オ プシ ョ ン な いし 形式 項目 , あるいは ゼロ 行 ス キッ プ 
する よう と の 指示 以外 の 指定 が ある と , ENDPAGE 条件 
が 引き 起 さ れ る 。 最初 の PUT ステ ー ト メン ト の 指定 が 
PAGE オ プシ ョ ン ま た は 形式 項目 だ け で あっ た り , ぞ ら 行 ス 
キッ プ す る よう (と の 指示 だ け で あっ た り し た 場合 に は , フ 
ァイル (は 何 の 変化 も を い 。 


6. 次 の よう な ファ イル 対し て TITLE オ プシ ョ ン を 指定 する 
と と は で き な い 。CONSBCUTT VE 編成 の UNBUFFERED 
ファ イル 。 磁気 テー プ 装 置 と 結び 付け られ て いる ファ イル 。 
MEDIUM ォ プシ ョ ン で 明示 的 指定 され た ユニ ッ ト ・ レ コ 
ー ド 装置 と 結び 付け られ て いる ファ イル 。 


TITLE ォ オプション が 指定 され て いる 場合 は , 「 要 素 式 ] が , 
必要 に 応じ て , 文字 スト リン グ K 変 換 さ れ る 。 と の 文字 スト リン グ 
の 最初 の 7 文字 は , ( DLBL な いし TLBL ジ ョ ンプ 制御 ステ ー ト 
メン ト の ファ イル 名 を 介し て , ) 当該 フ ァイル 結び 付け られ る デ 
ー タ ・ セ ッ ト を 表わす 。 と の オプ ショ ン が 指定 され て いな い 場 合 に 
は , ファ イル 名 の 最初 の 7 文字 ( 必要 に 応じ て , バディ ング を いし 
切捨て を する ) が DLBL を いし TLBTL ファ イル 名 で ある と みな 
され る 。 と れ が 外部 名 の 場合 と 同じ 切捨て で を い 点 注意 する こと 。 
ファ イル が バラ メー ター で ある 場合 に は , パラ メー ター 識別 名 に よ 
っ て 表わさ れる ファ イル 名 で は な を く , 引数 に よっ て 表わさ れる ファ 
イル 名 が 使用 され る 。 


PROCEDURE 


省略 形 PROC 


PROCEDURE ス テー トメ ント の 機能 は 次 に 示す 通り で ある 。 


プロ シー ジャ ー の 崩 頭 と 加 か れる 。 


と の プロ シー ジャ ー へ の 主 入 口 点 を 定義 する 。 


主 入口 点 で 指定 すべ き バ パラメーター が ある 場合 に は , と の パラ 


メー ター を 指定 する 。 
プロ シー ジャ ー が も つ あ る 種 の 特別 の 特性 を 指定 する 。 
プロ シー ジャ ー が 関数 と し て 主 入 口 点 を 用 いて 呼び 出さ れ た 場 


合 C, その プロ シー ジャ ー が 返す 値 の 属性 を 指定 する 。 


一 般 形 式 : 


入口 定数 : 〔 入 日 定 数 ]・・・ 


PROCEDURE[ ( パラ メー ター [ , ペラ メー ター ]・・ り 〕 
[OPTIONS( オ プシ ョ ン ・ リ スト ) 〕 

[RECURSIVE ][RETURNS ( デー タ 属 性 ) 〕 
[ORDER | REORDER }〔[IRREDUCIBLE| 
REDUCIBLE ]: 


構文 法 細則 : 


1. 


RETURNS オプ ショ ン の 「 デ ー タ 属性 | で は , と の プロ シ 
ー ジ ャ ー が 関数 と し て 主 入 口 点 を 用 いて 呼び 出さ れ た と き と 
の プロ シー ジャ ー が 返す 値 の 属性 を 指定 する 。 と と で 指定 す 
る と と の で きる 属性 は , 算術 , スト リン グ , ALIGNED , 
UNALIGNED, POINTER, OFTSET, AREA, FILE , 
EVENT, な お よび LABEL だ け で ある 。 ス トリ ング と は 

VARYING 属性 を 与え も る と と が で きる 。 OFFSET 属性 で 
は エリ アブ 名 を 指定 する と と が で きる 。 た だ し , と の 名 前 は , 
修飾 され た 名 前 , 添字 付 の 名 前 , ある い は 被 定義 名 で あっ て 
は を な ら な い 。 また , LABEL 属 性 で は ラベル 定 数 の リス ト を 
指定 する と と が で き る 。 エリ ア の 大 き さ あ る い は スト リン グ 
の 長 さ は , 1 0 進 整 数 定数 で 指定 し を な けれ ば な を ら を い 。 


OPT TONS, RECURSIVE, RETURNS, ORDER また は 
REORDER, な ぉ よび , IRREDUCTBLE また は 
REDUCIBLE を 記入 する 順序 は 任意 で ある が , それ ぞ れ 
の 間 に は プラ ンク を 人 く 。 


OPTIONS オプ ショ ン の 「 オ プシ ョ ン ・ リ スト | は , コン 
パイ ラー ど と と 定義 され る 追加 イプ ショ ン を 1 つ 以 上 指定 す 
る た め の も の で ある 。 当 コ ン バ パイ ラー の 追加 オプ ショ ン は , 
次 の 通り で ある 。 


{MAINICOBOLIFORTRANj 
[NOMAP [ (引数 の リュ ト ) 〕 〕 
[NOMAPIN [ (引数 の リュ ト ) ] 〕 
[NOMAPOUT [ (引数 の リス ト ) 〕 〕 
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[REENTRANT ] 


オプ ショ ン と オプ ショ ン の 問 に は プラ ンク また は コン マ を 衛 
く 。 オプ ション を 記入 する 順序 は 任意 で ある 。 


[引数 の リス ト |] は , 当該 オプ ショ ン が 適用 され る バラ メー 
ター の 名 前 の リス ト で ある 。 1 つの | 引数 の リス ト 」| の 中 で 
指定 で きる パラ メー ター は , 6 4 まで で ある 。 パラ メー ター 
の 名 前 を 記入 する 順序 は 任意 で ある 。 名 前 と 名 前 の 間 に は コ 
ンマ また は ブラ ンク を 置く 。「 引 数 の リス ト | が 指定 され て 
いな いら 場合 に は , 当該 入口 名 と 結び 付い て いる すべ て の バラ 
メー ター( て と の オプ ショ ン を 適用 する も の と みな され る 。 


同一 の OPTIONS 属性 指定 の 中 (CNOMAP , NOMAP IN, 
おぶ よび NOMAPOUT を 3 つと も 記入 する と と が で きる 。 た 
だ し , 指定 ある い は 想定 され ん て いる 2 つ 以 上 の 引数 の リス ト 
の 中 同じ パラ メー ター が あっ て は な を ならない 。 


COBOL , FORTRAN, NOMAP, NOMAP IN,NOMAPOUT 
の 各 オ プシ ョ ン の 使い 方 に つい て は , 「 第 1 7 章 : 言語 間 
の 連絡 機能 ] を 参照 の こと 。 


注 : REENTRANT オ プシ ョ ン は , 多重 タス ク 操作 を 行 な 
ら と と の で きる PL エコ ン ペ イラ ー の 場合 (に 使用 され る 。 
DOS PL/[ 最適 化 コ ン パ イラ ー で は と の 機能 が 与え られ 
て いな い の で , REENTRANT ォ プシ ョ ン が 指定 され て いて 
る 何 の 効果 も も る た な を い 。 と の 指定 は , 構文 法 に か な っ て いる 
みか 否 か テス ト され る だ け で , 無視 され て し まう 。 


一 般 規 則 


1 


388 


当該 プロ シー ジャ ー が 呼び 出さ れる と , 当該 ブ プロ シー ジャ ー 
IC 渡 され る 引数 と , 呼び 出さ れん た ブロ シー ジャ ー の 中 で と の 9 引 
数 を 表わす パラ メー ター と の 間 K 関 係 が 設定 され る 。 と の 点 


IC つ いて は , 「 第 9 章 : サ プ ル ー チ ン と 関数 ] を 参照 の と と 。 


OPTIONS は , 外部 プロ シー ジャ ー を 対し て だ け 指 定 する 
と と が で きる 。 少な く と も 1 つの 外部 プロ シー ジャ ー に は 

OPTIONS(MAIN) と 言う 指定 が な けれ ば な ら な い 。 2 
つ 以 上 の 外部 プロ シー ジャ ーK 対 し て と の 指定 が 行なわ れ て 
いる 場合 に は , オペ レー ティ ング ・ シ ステ ム は , 物理 的 C 最 
初 C 現 わん た ブロ ジー ジャー を 呼び 出す 。 


以下 で は , 上 述 の 他 の オォ オプション の 意味 に つい て 説明 する 。 
COBOL : 


当該 PL ルン!I ブ ロン シー ジャ ー は , COBOL し サブ プ ブ ログ ラ 
ム IC よ っ て だ け , 主 入口 点 を 使っ て 呼び 出さ れ る 。 


FORTRAN: 


DOS PL ノ I 最適 化 フ セン バイ ラー : 言 語 解説 書 第 2 部 


当該 PL ノン 1 プロ シー ジャ ー は , FORTRAN ルー チン 
(て よっ て だ け , 主 入口 点 を 使っ て 呼び 出さ れる 。 


NOMAP, NOMAPIN, NOMAPOUT : 
と れ ら の オプ ショ ン は , COBOL し な いし FORTRAN 
と PL/ ン [と の 間 の イン ター フェ ー ス (て お いて , デー タ 
集合 体 が 自動 的 に 取り 扱わ れる の を 防止 する た め の も 
の で ある 。 各々 の オプ ショ ン の 引数 の リス ト ] で は , 
各 オ プシ ョ ン が 適用 され る パラ メー ター を 指定 する と 
と が でき る 。 ある オプ ショ ン に 対し て 「 引 | 数 の リス ト ] 
が 指定 され て いな い 場 合 C は , 当該 入口 名 と 結び 付い 
て いる すべ て の バラ メー ター に と の オプ ショ ン を 適用 
すべ きも の と みな され る 。 


REENTRANT : 


多重 タス ク 操 作 が 可能 を な コン バイ ラー の も と で プロ シ 
ー ジ ャ ー が 実行 され る 場合 , REENTRANT オプ ショ 
ン が 指定 され て いる と , コン バイ ル の 済ん だ ブロ シー 
ジャ ー(C て は 再 入 可能 と い ? 性 質 が 与え られ る 。 DOS 

PL ノイ 1 最適 化 コ ン バ パイ ラー の も と で の コン ペイ レー シ 
ョ ン (C て な いて は, と の オプ ショ ン は 何 の 効果 も も た な い 。 


プロ シー ジャ ー が 回 帰 的 呼び 出さ れる 場合 に は , 
RECURSIVE と 指定 し を けれ ば な を ならない 。 プロ シー ジャ ー が 
回 帰 的 呼び出さ れる と いう と と は , ブロ シー ジャ ー が 未 た 活 
用 状態 KC ある 間 (C と れ を 再び 活用 化す る こと で ある 。 
RECURS IVE の 指定 は , 当該 プロ ンー ジャ ー が も つ す べ て 
の 入口 点 ( 主 入口 点 を ら び MC 副 次 人 口 点 ) と 適 用 され る 。 
RECURS IVE は, と れ が 宣言 され て いる ブロ シー ジャ ー 
対 し て だけ 適用 され る 。 


RETURNS オプ ショ ン の | デー タ 属 性 ] は , 当該 プロ シ 
ー ジ ャ ー が 関数 と し て 主 入口 点 を 用 いて 呼び 出さ れ た 場合 に 
当該 プロ シー ジャ ー が か が 返す 値 の 属性 を 指定 する た め の も の で 
ある 。 呼び 出さ れる ブロ シー ジャ ー の RETURN ステ ー ト 
メン ト で 指定 され て いる 値 は , 呼出 し プロ シー ジャ ー に 返さ 
れる 前 C, と と で 指定 され ん て いる 属性 !C 合 致す る よう 変換 さ 
れる 。 


RETURNS オォ オプション が 指定 され ん て いな い 場 合 に は , 省 
略 時 属性 が 適用 され る 。 と の 場合 , 入口 点 の 名 前 ( 当該 プロ 
シー ジャ ー を 呼び 出す の 使用 され た 入口 定数 ) に も と づい 
て 省略 時 の 基数 , 精度 , な よび スケ ー ル が 決め られ る 。 (和信 
口 点 は いく つか の 入口 定数 を も つと と が で きる の で , 入口 定 
数 C 応 し て, 省略 時 の 基数 , 精度 お よび スケ ー ル は 異な る 。) 


ORDER と REORDEER は , 最適 化 C 関 する オプ ショ ン で 
ある 。 す を わ ち , ORDER と REORDER は 当該 プ ブロック 
の 最適 化 を どの 程度 ま で 進め る か 指定 する た め の も の 
で ある 。 一 般 C, ORDER と 指定 する と , ある ブロ ッ 


ク を 実行 し て いる 間 に 入 る 計算 関係 の オン ・ ユ ニッ ト (C お い 
て , その ブロ ッ ク で セッ ト さ れ た すべ て の 変数 の 最新 の 値 を 
使用 する と と が で きる , と いう 程度 ま で 最適 化 が 進め られ る 。 
REORDER の も と で は , と れ 以 上 KC 最適 化 を 進め る と と 
が で きる 。 すなわち , REORDER を 指定 し た 場合 は , あ 
る ブロ ッ ク で セッ ト さ れ た 変数 の 値 は せ ., その ブロ ッ ク を 実行 
し て いる 間 に 入 っ た オン ・ ユ ニッ ト の 中 で も ゃ 一 番 新 し いじ 時 点 
で 割り 当て られ た 値 で ある と は 保証 され を い 。 い ずれ の ォ デ ズブ 
ショ ン も 指定 され て いな いと , ORDER で ある と み を され 
る 。 た だ し , 含ま れ て いる ブロ ッ ク は , その 中 で 明示 的 
ORDER が 指定 さん れん てい ない 限り , REORDER と いう 指 
定 を 引き 継ぐ 。 


6 IRREDUC 1 BLE と REDUC 1BLE は , 最適 化 (に 関す る ォ 
プシ ョ ン で ある 。 DOS PL/1 最適 化 コ ン バ パイ ラー で 処理 
され る プロ グラ ム の 中 で と の オプ ショ ン が 使用 され て いた 場 
合 。 その 指定 MC 構 文法 上 の ェ エラ ー が を いか どう か チェ ッ ク さ 
れる だ け で , その 指定 は 無視 され る 。 と の 種 の ブログ ラム で 
~ と の よう な オプ ショ ン が 指定 され ん て いて も 誤り で は な を ない 。 


7 1 つの PROC EDUREB ス テー トメ ント が 2 つ 以 上 の 入口 定数 
を も っ て いる 場合 は , 最初 の 名 前 が その ステ ー ト メン ト の 唯 
一 の ラベ ル で ある と み を なす と と が で きる 。 2 番目 以降 の 入口 
定数 は , 各々 , その PROCEDURE ス テー トメ ント で 指定 さ 
れ て いる の と 同じ バラ メー ター の リス ト を も つつ 別々 の ENTRY 
ステ ー ト メン ト で ある と みな す と と が で きる 。 た と えば , 次 
の よう な ステ ー ト メン ト が ある も の と し よ ょ 2。 


A: 1: PROCEDURE ( 多 ): 


と の ステ ー ト メン ト は , 事実 上 , 以下 の ステ ー ト メン ト と 同 
じ 内 容 を 表わし て いる 。 


A: PROCEDURE (%): 
IT : ENTRY ( 多 ): 


返さ れる 値 の 属性 が 明示 的 指定 され て いな い の で , と の プ 
ロ シ ー ジャー が 返す 値 の 特性 は , と の プロ シー ジャ ー が 人 ん と 
TI の どちら を 使っ て 呼び 出さ れ た か に よっ て 異な る 。 


PUT 


ューーーーーーー 


PUF ス テー トメ ント は , 以下 の いずれ か の 方 法 で 使用 する と と の 
で きる STREAM 転送 ステ ー ト メン ト で ある 。 


1. 内 部 記 境 域 の 中 の 1 つ 以 上 の 場所 に ある 値 を 外部 媒体 上 の あ 
る デー タ ・ セ ッ ト K 転 送 す る と と が で きる 。 


2. 内 部 記憶 域 の 中 の 1 つ 以 上 の 場所 に ある 値 を 同じ 内 部 記憶 域 
の 中 の ( 文字 スト リン グ 変 数 で 表わさ れる ) 受入 れ 側 フィ ー 


ルド て 割り 当て る こと が で きる 。 


一 般 形 式 : 


PUT [FILE (ファ イメ 式 ) 〕 


[STRING (文字 スト リン グ 変 数 ) 〕 
[ デー タ 指 定 〕 

PAGE(LINE ( 要素 式 ) 〕 
NH 
LINE ( 要素 式 ) 1 


構文 法 細則 


FILEP ォ プシ ョ ン も る STRING オプ ショ ン も 指定 され て いな 
い 場 合 C に は , TILE(SYSPRINT ) で ある も の と みな され る 。 と 
の 種 の PUT ス テー トメ ント が SYSPR INT と いう 2 議 別 名 の 宣言 
の 有効 範囲 に ある 場合 に は , SYSPRINT は FILE STREAM 
OUTPUT と し て 宣言 さて て い を けれ ば な ら な い 。 と の 種 の PUT 
ステ ー ト メン ト が SYSPRINT の 宣言 の 有効 範囲 に ない 場合 に 
は , SYSPRINT は 標準 の シス テ ム 出 力 フ ァイル で ある 。 


FIIED オ ォ プ ショ ン は , 外部 記憶 媒体 上 の デー タ ・ セ キッ ト へ の 転 
送 に つい て 指定 する た め の も の で ある 。 と の オォ プション で 指定 
され て いる ファ イル 式 は , 値 を 受け 取る と と (と を っ て いる デー タ 
・ セ ッ ト と 結び 付け られ て いる (暗示 的 を 開放 また は 明示 的 を 開 
放 (C よ っ て ) ファ イル の 名 前 で ある 。 と の ファ イル は , OUTPUT 
属性 と STREAM 属 性 を も る つも の で を けれ ば な を ならない 。 


STRING オプ ショ ン は , 内 部 記憶 域内 の ( 「 デ ー タ 指定 」 
の 変数 また は 式 (よっ て 表わさ れる ) 場所 か ら (「 廊 字 ス ト 
リン グ 変 数 ] (と ょ っ て 表わさ れる ) 文字 スト リン グ へ の 転送 
IC つ いて 指定 する た め の も の で ある 。 | 文字 スト リン グ 変 数 ] 
は , スト リン グ 擬 似 変 数 で あっ て も ょ よい (STRING は の ぞ く ) 。 


「 デ ー タ 指定 ] に つい て は , 「 第 1 1 章 : スト リー ム 方 式 
の 転送 」 を 参 了 の と と 。 


STRING ォ プション と いっ し ょ (CCPAGE, SKIP, LINE 
の 各 オ ォ オプション を 指定 する と と は で き な い 。 


オォ オプション を 記入 する 順序 は 任意 で ある 。 た だ し , 少 を く と 
る 1 つの オプ ショ ン を 指定 し な けれ ば な ら な い 。 


一 般 規 則 : 


FILE オ オプ ション が 指定 され て いる 場合 , 「 フ ァイル 式 | で 
参照 し て いる ファ イル が まだ 開か れ て い を く て も その ファ イ 
ル が OUTPUT 属性 を も つも の と し て 明示 的 宣言 され てい 
る な ら ば , その ファ イル は 了 早 示 的 C 開か れる 。 と れ 以 外 の 場 
合 I と は , UNDEFINEDFTILE 条件 が 引き 起 さ れる 。o 


STRING ォ プシ ョ ン が 指定 され て いる 場合 は , 適宜 変換 が 
行なわ れ た 後 , PUT 操 作 (に お ける 値 の 割当 て が スト リン グ 
の 最初 か ら ( 左端 の 文字 か ら ) 始 め ら れる 。 ブラ ンク 
や 区 切り 廊 字 は 通常 通り 挿入 され る 。 スト リン グ が 短 
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か すき ぎ て デー タ を 収容 し 切れ を じ 場 合 C は , PRROR 条 件 が 引 注 : ENVIRONMBMT 属性 の MEDIUM オ プシ ョ ン で 装置 
き 起 され る 。 タイ ブ と し て 3525T と 指定 され て いる ファ イル 関し て は , 
w は 1 か 3 で を な けれ ば な を ら な い 。 
3 PAGB オ プシ ョ ン お よび LINPD オ プシ ョ ン は , PRTINT フ ァ 
イル KC 対し て だ け 指 定 す る こと と が で きる 。 こと これ ら の オプ ショ 7 ファ イル の 開放 の 後 の 最初 の PUT ステ ー ト メン ト で 指定 され 
ン は いずれ も , 与え られ て いる 「 デ ー タ 指定 ] に ょ っ て 定義 て いる 各種 オプ ショ ン の 効果 に た ついては, と の 節 の 「OPEN 
され て いる 値 が 転送 され る 前 効果 を 発揮 する 。 う つの オブ ステ ー ト メン ト 」| を 参照 の こと 。 
ショ ン の うち 同一 の PUT ス テー トメ ント で 指定 する と と が 


ーー 


値 が 転送 され る 。 と の 後 , PAGE オ ォ オプション を も つ P UT ス 
テー トメ ント が 実行 さん れる か , PAGE 形 式 項目 が 出 て 来る か , 
ある い は , PNDPAGE 条件 が 起 っ て 新しい ベー ジ が 定義 さ 
れる まで , と の ペー ジ が 「 現 在 の ペー ジ ] で ある も の と され る 。 新 
し い [現在 の ペー ジ | は , 最初 の 行 ( 行 1 ) を 暗示 し て いる 。 


SKIP オ ォ プ ショ ン が 指定 され て いる と , 当該 デー タ ・ セ ッ ト 
の 新 し い 「 現 在 の 行 」 が 定義 され る 。 式 も 指定 され て いる 場 
合 ( と は , その 式 の 値 が 整数 ( 双 ) に 変換 され る 。 PRINT 以外 
の ファ イル 関し て は , 叉 は ゼロ より 大 きく を けれ ば な を なら な 
い 。 デー タ ・ セ ッ ト は , 「 現 在 の 行 ] か ら 番 目 の 行 の 先頭 
位置 設定 され る 。 式 が 指定 され て いな い 場 合 C に は, SKIP 
(1) で ある と みなさ れる 。 


PRINT ファ イル 関し て は , 双 は ゼロ 以下 で も よい 。 双 が 
ゼロ 以下 の 場合 (は, 印刷 位 思 が 戻さ れる だ け で 行 そ の も の 
は 変 ちな い 。 SKIP(w) が 出さ れ た と き 「 現 在 の ペー ジ ] の 残り 
の 行 が 叉 行 よ り 少 ない 場 合 (C は , ENDPAGE 条 件 が 引き 起 さ れる 。 


注 : ENVIRONMENT 属性 の MEDIUM オ ォ プ ション で 義 連 


タイ ブ と し て 3525 を いし 3525T と 指定 され て いる ファ イ 
ル ん 関し て は , w は ゼロ より 大 きく ぐ な けれ ば な を ならない 。 


LINP オ プシ ョ ン が 指定 され て いる と , 当該 デー タ ・ セ ッ ト 
の 新しい 「 現 在 の 行 ] が 定義 され る 。 指定 され て いる 式 の 値 
は 整数 (w) 変換 され る 。 LIND ォ プシ ョ ン は , 次 の 行 が 

「 現 在 の ペー ジ ] の 番目 の 行 と を る よう に ブラ ンタ 行 を 提 
入 す る と と を 指定 する た め の も の で ある 。 | 現在 の ペー ジ ] 
iC す で KC w 行 以上 書き 込ま を れ て いる 場合 , また は が OPEN 
ステ ー ト メン ト の PAGESIZE オプ ショ ン で セッ ト さ れ て 
いる 限界 を 越え て いる 場合 に は , ENDPAGE 条件 が 引き 起 
され る 。 叉 が ゼロ 以下 の 場合 に は , Ww は 1 と みな され る 。 
が 「 現 在 の 行 」 で ある 場合 は , ファ イル の 位置 が 最初 の 桁 と 
セッ ト さ れ て いな い 限 り , ENDPAGE 条件 が 引き 起 さ れる 。 


ファ テイ ル が 最初 の 桁 C 位 置 設定 され て いる と き は , SKIP (0) 


と いら 指定 と 同じ 結果 (C を る 。 
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で きる の は , PAGEB と LINE だ け で ある 。 ある PUT ステ READ 
ー ト メン ト CPAGE と LINE が 指定 され て いる 場合 に は , 
PAGE が 先 に 適用 され る 。 READ ステ ー ト メン ト は , RECORD INPUT ファ イル また は 
RECORD UPDATD ファ イル に ある レ ュ コード を 変数 また は 緩衝 
4. PAGE オ プシ ョ ン が 指定 され て いる と , 当該 デー タ ・ セ ッ ト 域 へ 転送 する た め の も の で ある 。 
の 新 し い 「 現 在 の ペー ジ 」 が 定義 され る 。 「 デ ー タ 指定 ] も 
記入 され て いる 場合 た は , 新しい ペー ジ の 定義 が 済ん だ 後 で 一 般 形式 ・ 


READ オプ ショ ン ・ リ スト :: 


[オプ ショ ン ・ リ スト | の 形式 は 図 す .4 と 示さ れ て いる 。 


一 般 規 則 : 


オプ ショ ン を 記入 する 順序 は 任意 で ある 。 


FILE ォ プシ ョ ン は , 読み 取る べき レコ ー ド を 収容 し て いる 
ファ イル を 指定 する た め の も の で ある 。 と の オォ オプション は 必 
ず 指 定 し を けれ ば な ら な い 。 と と で 指定 され て いる ファ イル 
が ま だ 開か ふれ て いな い 場 合 , と の ファ イル が RECORD 属性 
を も つも の と し て 明示 的 宣言 され て いる な ら ば , と の ファ 
イル は 暗示 的 MC 開か ふん れる 。 と れ 以 外 の 場合 に は , 
UNDEEFINEDF1 LE 条件 が 引き 起 さ れる 。 


INTO オ プシ ョ ン は , レコ ュー ド を 読み 込む べき 変数 を 指定 す 
る も の で ある 。 変数 が 集合 体 で ある 場合 , 変数 は 連続 し て い 
る 記 緒 域 に な けれ ば を ならない 。 使い 方 ヒ と よっ て は , 

UNAL TI GNED 属 性 を も つ 固 定 長 ビ ッ ト ・ ス トリ ング の 使 
用 は 禁じ し られ て いる (詳しく は , 「 第 1 2 章 : レコ ー ト 方 
式 の 転送 」 の 「 転 送 さ れる デー タ 」| を 参照 の こと )。 

STR ING 以 外 の スト リン グ 擬 似 変数 を 指定 し て も よい 。 


KEY オプ ショ ン あ る いひ は KEYTO オ プシ ョ ン は , KEYED 
ファ イル 対し て だ け 指 定 す る と と が で きる 。 


当該 ファ イル が DIRECT 属性 を も つ 場 合 に は , KEY オプ 
ショ ン を 指定 し を けれ ば な を ならない 。 と の 「 要 素 式 ] は , キー 
を 表わす 文字 スト リン グ K 変 換 さ れる 。 と の キー よって, 
どの レ ュ コード を 読み 取 る か が 決ま る 。 


INDEXED, SEQUENT IAL, お よび KEYED 属性 を も 
つ フ ァイル ま 友 は キー 順 の VSAM 編 成 で , SEQUENTTAL 
な ら び MCKEYED 属 性 を も つ フ ァイル KK 対し て も ゃ , KEY ォ 
プシ ョ ン を 指定 する こと が で きる 。 と の 場合 , ファ イル は , 
指定 さん て いる キー を も つ レ コー ド 位 置 設定 され る 。 と の 


FTLE 


[ INTO (変数 ) 〕 


SET ( ポイ ンタ ー タ 
2 【 ( ポイ ンタ ー 変 数 ) 〕 | 


(IGNORE ( 式 ) 〕 


図 す .4 READ ステ ー ト メン ト の オプ ショ ン ・ リ スト の 形式 


後 , KEY オプション を も た を い READ ステ ー ト メン ト を 
用 いて , それ か ら 先 の レコ ー ド を 順次 方 式 で 読み 取る と と が 
で きる 。 


当該 ファ イル が SEQUENTT AL 属性 な ら び CKEYED 属 性 
を も っ て いる 場合 (C 限 り , KEYTO オ プシ ョ ン を 指定 する と 
と が で きる 。 と の オプ ショ ン は , 読み 取ら れ て いる レコ ー ド 
の キー を , 訪 字 ス トリ ング 割当 て の 規則 従って, 「 文 字 ス 
トリ ング 変数 」 < 割り 当て る よう 指定 する た め の も の で ある 。 


KEYTO ォ プシ ョ ン で は , STRING 以外 で あれ ば どの スト 
リン グ 擬 似 変数 で も 指定 する と と が で きる が , 数 字 ビ クチ ャ 
ーー 指定 C ょ っ て 宣言 され て いる 変数 を 指定 する と と は で き な を 
い 。 字 スト リン グ の 最大 の 長 さ は , 256 で ある 。 KEYTO 
変数 へ の 割当 て は , つね K, 1NTO 変数 へ の 割当 て の 後 で 行 
な われ る 。 値 は 次 の よう (と し て 割り 当て られ る 。 


a. REGIONAL(1): KEYTO オォ プシ ョ ン で 指定 され て 
いる 文字 スト リン グ 変 数 が 固定 長 で ある 場合 に は , と の 
文字 スト リン グ 変 数 に つい て 宣言 され て いる 長 さ KC 等 し 
く な る よう , 8 文字 の 区 域 番 号 を 左端 で パ デ ィ ン グ また 
は 切捨て を し て 得 た 値 が 割り 当て られ る 。 交 字 スト リン 
グ 変 数 が 可変 長 で ある 場合 に は , 区 域 番 号 の 先行 で ロ が 
取り 除 か れ て , その 有効 数 字 だ けが 割り 当て られ る 。 


b. REGIONAL(⑬) INDEXED , キー 順 VSAM: 女 
字 ス トリ ング 変数 に つい て 宣言 され て いる 長 さ と 等しく 
な る よう , 記録 され た キー の 右端 で で ディ ング また は 切 
捨て を し て 得 た 値 が 割り 当て られ る 。 


と の よう を バディ ング や 切捨て C 対 し て は , KEY 条件 は 引 
き 起 され な い 。 


EVENT オォ プ ショ ン を 指定 する と , レコ ー ド が 読み 取ら れ 
て いる 間 ま た は スキ ッ プ され て いる 間 に ゃ も , 処理 を 続け る と 
と ょ が で きる 。 VS AM 編成 の SEQUENTTIAL 

BUFFREREBD ファ イル や DIRECT BUFFERED 


KEY ( 式 ) 
KEYTO ( 文字 スト リン グ 変 数 ) 


KEY 
KEYTO ( 文字 スト リン グ 変 数 ) 


し EVENT ( 事象 変数 ) 〕 


| [EVENT (事象 変数 ) } 


ファ イル 対し て は , と の オプ ショ ン を 指定 し て は な 
ら な い 。 


EVENT オプ ショ ン を も る も つ READ ステ ー ト メン ト K 制 御 
が 渡る と , 「 事 象 変数 ] が 活用 状態 に を な た り ( す を わ ち , と の 
変数 を 他 の 事象 と 結び 付け る と と が で き な く な る ) , こと の 変 
数 (完了 値 「0 「B が 与え られ る 。 た だ し , 暗示 的 を ファ イ 
ル の 開放 に C ょ より UNDEFINEDFILE 条件 が 引き 起 さ れ 
た 場合 C に は と の 限り で を い ( 下 の 「 注 | を 参照 の と と )。 

と の 事象 変数 を 指定 し て いる WAIT ステ ー ト メン ト K 制 御 
が 渡る まで , この 事象 変数 は 活用 状態 C た っ て ぉ り , '0'B 
と いら 完了 値 を 保持 し て い る 。 と の 事象 変数 を 指定 し て いる 
WAIT ステ ー ト メン ト K 制 御 が 渡る と , 次 の いずれ か の 措 
置 が と られ る 。 


a. READ ステ ー ト メン ト が 正しく 実行 され て , と の 
READ の 結果 と し て ENDFILE TRANSMIT 
KEY, ある い は RECORD 条件 の いずれ も 引き 起 さ 
れ て いな い 場 合 IC は , 事象 変数 が 「 完 了 ] と セッ ト さ れ 
( 完了 値 「1 ! B が 与え られ ) , 事象 変数 が 非 活用 状態 
IC を る ( と の 事象 変数 を 他 の 事象 と 結び 付け る こと が で 
きる よう (な る )。 


b. READ ステ ー ト メン ト を 実行 し て いる 間 に ENDTFILE, 
TRANSMTIT, KEY, ある い は REC ORD 条 件 が 引 
き 起 され た 場合 に は , 上 述 の WAIT ステ ー ト メン ト が 
出 て 来る まで は , と れ ら 各々 の 条件 に 起因 する 割込み は 
起 ら を い 。 TRANSMIT ぉ ょ よび RECORD 条件 だ 
けが 同時 (C 起 と る 可能 性 が ある 点 と 注意 する こと と 。 最後 
の オン ・ ユ ニッ ト か ら 戻 る と , ある い は , いずれ か の オ 
ン ・ ユ ニッ ト が GO TO ステ ー ト メン ト よ っ て 停止 さ 
せら れる と, 事象 変数 (C 完 了 値 !1!B が 与え られ , 非 
活用 状態 C 切 り 替 え られ る 。 


往 : REBAD ステ ー ト メン ト て よっ て 暗示 的 を ファ イル の 
開放 が 行 を われ , その 結果 UNDEFINEDF1ILE 条件 が 
引き 起 さ れ た 場合 C に は , と の 条件 の た め の オ ン ・ ユ ニ 
ッ ト K 直 ち に 入る が , 事象 変数 は 何 も 変 化し ない 。 す 
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を わ ち も, 事象 変数 は 依然 非 活用 状態 に とどまり, READ ス 
テー トメ ント が 出 て 来 た と き 保 持 し て いた 値 を 引続き 保持 す 
る 。 オン ・ ユ ニッ ト で UNDEFINEBDFILE 条件 が 訂正 
され な か っ た 場合 に は , オン ・ ユ ニッ ト か ら 正 常に 戻っ た 後 
で ERROR 条件 が 引き 起 さ れる 。 オン ・ ユ ニッ ト で と の 条 
件 が 訂正 され た 場合 ( ファ イル が 正 し く 開 か れ た 場合 ) IC は , 
オン ・ ユ ニッ ト か ら 正 常に 戻っ た 後 , 事象 変数 が '「0'B 
セッ ト さ れ , 活用 状態 に 切り 替え られ る 。 と の 後 , READ 
ステ ー ト メン ト の 実行 が 続行 され る 。 


8 SET オ プシ ョ ン は , レコ ー ド を 緩衝 域 へ 読み 込む よら 指定 
する と 共に, 指定 され て いる ログ ケータ ー 変 数 に ポイ ンタ ー 値 
を 割り 当て る よら 指定 する も る の で ある 。 ポイ ンタ ー 値 は , 緩 
衝 域 の 中 の レコ ュー ド を 識別 する 。 


9 SEQUENT TAL INPUT ファ イル ぉ よび SEQUENTIAL 
UPDATE フ ァイル 対し て , IGNORE オプション を 指定 
する と と が で きる 。 IGNORE オプ ショ ン で 指定 され て いる 
式 の 値 が 計算 され , その 値 が 整数 に 変換 さん れる 。 と の 整数 
( nm) が ゼロ より 大 きい 場合 に は , n 個 の レコ ュー ド が 無視 され 
る 。 当該 ファ イル を 対象 と する READ ステ ー ト メン ト が と 
の 後 出 て 来る と , (n 十 1) 番 目 の レ コー ド が アク セス され る 。 
n が 1 より 小さ い 場 合 に は, と の オプ ショ ン は 何 の 効 果 も も 
た を い 。 INTO オ プシ ョ ン , SET オプ ショ ン , ある い は 
IGNORE オプ ショ ン を も た を い READ ステ ー ト メン ト は , 
IGNORE (1) を も つ REBAD ス テー トメ ント と 同じ で ある 。 


10. INDEXED 属性 を も つ フ ァイル また は キー 順 VSAM 編 成 の 
ファ イル が 順次 方 式 で アク セス され て いる 場合 は , KEY ォ 
プシ ョ ン を も つ READ ステ ー ト メン ト を 出す と と に よっ て 
その ファ イル の 位置 を 設定 する と と が で きる 。 指定 され ん てい 
る キー は , 所 要 の レ ュ ー ド を 議 別 する の と 使用 され る 。 KEY 
ォ プ ショ ン を も た な ぃ い READ ステ ー ト メン ト を 用 いて , 以 
降 の レコ ュー ド を 順次 方 式 で 読み 取る こと が で きる 。 と れ は け , 
INPUTT フ ァイル の 場合 も UPDATE ファ イル の 場合 も 同様 
で ある 。 


次 の よう な 形式 の 2 つの 位置 設定 スミ テート メン ト を 使用 する 
こと が で きる 。 


READ FILE (ファ イメ 式 ) INTO 
(変数 ) KEY( 式 ): 
READ FEILE (ファ イル 式 ) 
SET (ポイ ンタ ー 変 数 ) 
KEY ( 式 ) : 


RETURN 


RETURN ス テー トメ ント は , と この ステ ー ト メン ト が 人 入っ て いる 
プロ シー ジャ ー の 実行 を 終了 させ る た め の も の で ある 。 RETURN 
ステ ー ト メン ト は , 呼出 し プロ シー ジャ ーK 制 御 を 戻す 。 RETURN 
ステ ー ト メン ト が 値 を 返す こと も ある 。 
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一 般 形式 : 


オォ オプション 1! 
RETURN : 
オプ ショ ン 2: 
RETURN ( 朋 素 式 ) : 


一 般 規 則 : 


1 プロ シー ジャ ー が 関数 プロ ンー ジャ ー と し て 呼び 出さ れ て い 
る の で な い 場 合 は , と の プロ シー ジャ ー を 終了 させ る た め に 
は オォ オプ ショ ン 1 の RETURN ステ ー ト メン ト し か 使用 する と 
と が で き な い 。 と の 場合 , 論理 的 に 呼出 し の 後 の 場 所 に 制御 
が 戻さ れる 。 


2. 関数 プロ シー ジャ ー と し て 呼び 出さ れ を た を プロシージャー を 終 
子 さ せる 場合 に だ け , オプ ショ ン 2 の RETURN ステ ー ト 
メン ト が 使用 され る 。 と の 場合 , 呼出 し の 行なわ れ た 場所 に 
制御 が 戻さ れる 。 また , 関数 参照 C 返 され る 値 は , 指定 され 
て いる 式 の 値 を ( 呼び 出さ れ た 入口 点 に 対し て 宣言 され て い 
る ) 属性 に 合致 する よう 変換 し た も の で ある 。 と の 必 性 は 入 
口 点 で 明示 的 宣言 する と と が で き る 。 明示 的 宣言 され て 
い を けれ ば , と の プロ シー ジャ ー を 呼び 出す の 使用 され た 
入口 定数 の 頭 文字 に も と づい て , 暗示 され る 属性 が と られ る 。 


3 ブロ シー ジャ ー の 終り て 相当 する END ス テー トメ ント K 制 
御 が 渡る と , と の END ス テー トメ ント は , と の ブロ シー ジ 
ャ ー の た め の ( オプション 1 形式 の ) RETURN ステ ー ト 
メン ト と し て 取り 扱わ れる 。 


REVERT 


REVERT ステ ー ト メン ト は , 関連 する 最新 の ON ステ ー ト メン 
ト の 効果 を 取り 消す の MC 使用 され る 。 REVERT ステ ー ト メン ト 
は , と の ステ ー ト メン ト が 入っ て いる ブロ ッ ク の 内 部 あり , し か 
も と の ス テー トメント と 同じ 呼出 し で 実行 され た O N ス テー トメ ン 
ト 対し て だり 効 力も つ 。 あ る ブロ ッ ク に お いて REVERT ス 
テー トメ ント を 実行 する と , こと の ステ ー ト メン ト で 指定 され て いる 
条件 を 対象 と し , し か も と の ブロ ッ ク ( お いて 実行 され て いる ON 
スネ ステー トメント の 処 塁 の 指定 が 取り 消さ れ , その 後 , と の ブロ ッ ク 
の 呼出 し の 時 点 で 効力 を 有 し て いた 処置 の 指定 が 再び 効力 を も つよ 
ら C な る 。 


一 般 形式 : 
REVERT 条件 : 
構文 法 細 則 : 


「 条 件 」 は , 「H 節 : ON 条件 」 (C 記 載 さ れ て いる 任意 の 条件 
で ある o 


一 般 規 則 : 


REVERT ステ ー ト メン ト の 実行 に よっ て 上述 の 効果 が 得 ら れる 
の は , 次 の 2 条件 が 満足 され て いる 場合 に 限ら れ て いる 。(⑪ 同 じ 条 件 
を 指定 し て な おり し か も 同じ ブロ ッ ク の 内 部 (ある ON ステ ー ト メン 
ト が , と の ブロ ッ ク が 活用 化 さ れ た 後 で , 実行 され て いる 。(⑫) と の 
間 , 他人 同じ REVERT ステ ー ト メン ト は 実行 され て いな いじ 。 
と の いずれ か の 条件 が 満た され な い 場 合 に は , REVERT ステ ー 
トメ ント は ナル ・ ス テー トメ ント と し て 取り 扱わ れる 。 


REWRITE 


REWRIT 了 EE ステ ー ト メン ト は , 更新 ファ イル 対 し て だ け 使 用 
する と と が で きる 。 と の ステ ー ト メン ト は , デー タ ・ セ モット の 中 の 
既存 の レコ ー ド を 連 き 換え を る た め の も の で ある 。 


一 般 形 式 ・ 


REWRITE FILE (ファ イメ 式 ) 
[FROM (変数 ) 〕 
[KEY (要素 式 ) 〕 
[EVENT (事象 変数 ) ] : 


構文 法 細則 : 


1 オプ ショ ン を 記入 する 順序 は , 任意 で ある 。 


2. [ファ イメ 式 」 は , 書き 直す べき レコ ー ド を 収容 し て い る フ 
ァイル を 指定 する た め の も の で ある 。 と の ファ イル は , 
UPDATE 属性 を も つも の で な けれ ば な ら な を い 。 


3 FROM オプ ショ ン は , 指定 され て いる ファ イル の 中 の 鐵 存 
の レコ ー ド と 入れ ラ 奉 わ る レコ ー ド を 表わす 変数 を 指定 する た 
め の も の で ある 。 と の 変数 が 集合 体 で ある 場合 に は , この 変 
数 は 連続 し て いる 記憶 域 じ な けれ ば を ら な い 。 使い 方 よっ 
て は , UNALIGNED 属 性 を も つ 固 定 長 ビ ッ ト ・ ス トリ ン 
グ の 使用 は 禁じ ちら れ て いる (詳し く は , 「 第 12 章 : レコ ュ 
ー ド 方 式 の 転送 ] の 「 転 送 さ れる デー タ 」 を 参照 の と と )。 


一 般 規 則 : 


1 「 フ ァイル メ 式 | で 参照 され て いる ファ イル が 未だ 開か れ て い 
た い 場 合 , と の ファ イル が REOORD 属性 お む お よび 
UPDATE 属性 を る つも の と し て 明示 的 宣言 され て いる 
を ら ば , と の ファ イル は 暗示 的 (C 開 か れ る 。 と れ 以外 の 場合 
(C は , UNDEFINEDFILE 条件 が 引き 起 さ れる 。 


2. 当該 ファ イル が DIRECT 属性 を も つ 場 合 に は , KEY オォ 
プシ ョ ン を 指定 し を な けれ ば な を ら な い 。 と れ 以 外 の 場合 に 
KEY オォ プ ション を 指定 する と と は で き な を い 。 と と で 指定 さ 
れ て いる 「 素 式 ] は , 文字 ネト リン グ 人 変換 され る 。 と の 文字 
スト リン グ は 原始 キー で あり , と れ C に よっ て どの レコ ー ド を 
書き 直す べき で ある か が 決ま る 。 


に 


TITNDEXED 属性 を も る つ SEQUENTTIAL フ ァイル また は キ 
一 順 VSAM 編 成 の SEQUENTTIAL ファ イル 関し て は , 内 
蔵 さ れ た キー は , も と の 内 蔵 さ れ た キー と 同じ も ゃ の で を な けれ 
ば を ら な い 。 


DIRECT 属性 を も る つ UPDATE ファ イル , また は , 
SEQUENT IAL 属 性 と UNBUFEEFER ED 属性 の 両方 を も つ 
UPDATE ファ イル 対し て は , FROM オプ ショ ン を 指定 
し を けれ ば な を ならない 。 FROM オプ ショ ン を も た な い 
RERWRITE ステ ー ト メン ト の 効果 は 次 の 通り で ある 。 


a. 最後 の レコ ー ド が INTO オ プシ ョ ン を もつ READ ス テー 
トメ ント て よ っ て 読み 取 られ た 場合 は , FROM オォ プシ 
ョ ン を も た な ぃ REWRITE ステ ー ト メン ト は デー タ ・ 
セッ ト の 中 の その レ ュ コー ド K 対 し て は 何 の 影響 も 与え な 
い 。 


b. 最後 の レコ ュー ド が SET オプ ショ ン を も つ READ ステ 
ー ト メン ト 《 よ っ て 読み 取ら れ た 場合 は 、 その SET ォ 
プシ ョ ン の ポイ ンタ ー 変 数 が 指す 緩衝 世 で 行なわ れ た 何 
ら か の 割当 て (CC よっ て , と の レコ ー ド が 更新 され る 。 レコ 
ー ド が ブロ ッ ク 化 レコ ー ド で ある 場合 に は , その ブロ ッ 
ク の 中 の ぃ いずれ か の レコ ー ド 対し て REWRITE ステ 
ー ト メン ト を 出す と , ブロ ッ ク 全 体 が 書き 直さ れる 。 し 
た が っ て 更新 さん る レコ ュー ド に 対し て REWRITE ステ 
ー ト メン ト を 出さ を く て も , と の レコ ー ド は 書き 直さ れ 
る と と も ある わけ で ある 。 


EVENT オ プション を 指定 する と , レコ ー ド の 書 直 し が 行 を 
われ て いる と きも る 処理 を 続け る こと が で きる 。 
SEQUENT TAL BUFFERED フ ァイル また は VSAM 編 成 
の DIRECT BUFFERED ファ イル 対し て , と の オォ プシ 
ョ ン を 指定 する こと と は で き な い 。 


EVENT オ ォ オプション を も つ REWRTITE ステ ー ト メン ト K 多 側 
御 が 渡る と , 事象 変数 が 活用 状態 と 切り 夫 を た られ (すなわち 
と の 事象 変数 を 他 の 事象 と 結び 付け る こと と が で き な く な る ), 
と の 事象 変数 C 「0'B と い 9 完 了 値 が 与え られ る 。 ただし, 

ラファ イル の 暗示 的 開放 に と っ て UNDEF INEDF I LE 条件 
が 引き 起 さ れ た 場合 C は , と の 限り で な い ( 下 の 「 注 ] を 参照 
の と と ) 。 と の 事象 変数 を 指定 し て いる WAIT ステ ー ト メン ト 

制御 が 渡る まで は , と の 事象 変数 は 活用 状態 に と どまり 

!0!B と いう 完了 値 を 保持 する 。 と の 事象 変数 を 指定 し て いる 
WAIT ステ ー ト メン ト C 制 箱 め 3 径 る と, 次 の いずれ か の 措置 が と られ る 。 


a. REXWWRITE ステ ー ト メン ト が 正しく 実行 され , その 結 
果 と し て TRANSMIT, KEY、 あ る い は RECORD 条 件 
が 引き 起 さ れん て いな い 場 合 に は , 事象 変数 は 「 完 了 」 
セッ ト され , ( 「1!B と いら 完了 値 を 与 を られ ), 非 活 
用 状態 に 切り 替え られ る (すなわち, と の 変数 を 他 の 事 
象 と 結び 付け る と と が で きる よら て な る )。 
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b. REWRITE ステ ー ト メン ト の 実行 が 原因 に を なっ て 
TRANSMIT, KEY ある いけ は RECORD 条件 が 引き 起 
され た 場合 C は , 上 述 の WAIT ステ ー ト メン ト が 出 て 来 
る まで と れ ら 各々 の 条件 の た め の 割 込み は 起 ら を い 。 
TRANSMIT 条件 と RECORD 条件 だ けが 一 緒 に 起 と 
る 可能 人 性 が ある と いう 点 K 注 意 す る こと 。 最後 の オン ・ 
ユニ ッ ト か ら 戻 る と , ある いらい は, いずれ か の ォ オン ・ テ = ユニ 
ッ ト が GO TO ステー トメ ント よっ て 終了 させ られ る 
と , 事象 変数 に '1!B と いら 完了 値 が 与え られ , と の 変 
数 の 状態 が 非 活 用 状態 と 切り 替え られ る 。 


注 : RIWWRITEE ステ ー ト メン ト の 実行 に よっ て ファ イル 
が 暗示 的 開放 され , と れ が も と で UNDEFTNEDF ILE 
条件 が 引き 起 さ れ た 場合 に は, 直 ち (C, と の 条件 の た め の ォ 
ン ・ ユ ニッ ト 低 入 る 。 た だ し , 事象 変 数 は 何 も 変 化 し な い 。 
すなわち , 事象 変数 は 依然 非 活用 状態 C と どまり , 
REWRITE ステ ー ト メン ト が 出 て 来 た と き 保 持 し て いた 値 
を その まま も っ て いる 。 オン ・ ユ ニッ ト で と の 条件 が 訂正 さ 
れ を か っ た 場合 C に は , オン ・ ユ ニッ ト か ら 正 常に と 戻っ た 後 
ERROR 条 件 が 引き 起 さ れる 。 オン ・ ユ ニッ ト で と の 条件 が 訂 
正 され た 場合 (ファ イル が 正しく 開か れ た 場合 ) (は, オン 
・ ユ ニッ ト か ら 正 常に と 戻っ た 後 , 事象 変数 が '0'BC セ ッ ト 
され , 活用 状態 KC 切り 替え られ る 。 こと の 後 , REVWRITE ス 
テー トメ ント の 実行 が 続行 され る 。 


SIGNAL 


STGNAL ステ ー ト メン ト は , 割込み の 発生 を シン ミュ レー ト す る た 
め の も の で ある 。 また, と の ステ ー ト メン ト を 用 いて , と の ステ ー 
トメ ント で 指定 され て いる 条件 に 対す る 現在 の 処置 の 指定 を テス ト 
する と と が で きる 。 


一 般 形 式 : 


STIGNAL 条件 : 


構文 法 細 則 : 


「 条 件 ] は 「H 節 : ON 条件 | (< 記載 さん て いる 任意 の 条件 で 
ある 。 


一 般 規 則 


1 SIGNAL ス テー トメ ント が 実行 され る と , と と で 指定 され 
て いる 条件 が 実際 (CC 引き 起 さ れ た 場合 と 同じ ょ ら な 措置 が と 
られ る 。 すなわち , 乏 次 的 を 実行 が 中 断 され , と と で 指定 さ 
れ て いる 条件 の た め の 現 在 の オン ・ ユ ニッ ト K 制 御 が 渡さ れ 
る 。 オン ・ ユ ニッ ト の 実行 が 完了 する と , SIGNAL ステ ー 
トメ ント の 直ぐ 後 の ス テー トメ ント 制御 が 灯 され る 。 


2. CONDTTTON と 言う ォ ン 条 件 が 割込み を 引き 起 と す の は , 


SIGNAL ス テー トメ ント (CCONDIT ION と 指定 さん て い 
る 場合 だ け で ある 。 
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3 と と で 指定 され て いる 条件 か 禁止 状態 に ある 場合 は , 祝 DA 
み は 起 こら ず , STIGNAL ステ ー ト メン ト は ナル ・ ス テー ト 
メン ト と 同じ な る 。 


4. と と で 指定 され て いる 条件 の た め の オ ン ・ ユ ニッ ト が 現在 を 
い 場 合 に は , こと の 条件 に 対す る シス テ ょ の 標準 処置 が と られ る 。 


STOP 


STOP ステ ー ト メン ト は 当該 プロ グラ ム を 直ちに 終了 させ る た め 
の も の で ある 。 


一 般 形式 : 
STOP : 
一 般 規 則 : 

STOP ステ ー ト メン ト が 実行 され る と , 終了 の た め の 措 置か が と 
られ る 前 (CFINISH 条件 が 引き 起 さ ん る 。FINIS 是 の た め 
の オン ・ ユ ニッ ト か ら の 正常 み 戻り の 後 , 当該 プロ グラ ム が 終了 する 。 
WAIT 
ある ブロ ッ ク の あぁ ある 活用 化 に な いて WAIT ステ ー ト メン ト が 実行 
され る と , と の ステ ー ト メン ト で 指定 され ん て いる いく つか の 事象 が 


完了 する まで , と の ブロ ッ ク の と の 活動 化 VC 関 する 制御 は と の 
WAIT ステ ー ト メン ト K 多 保持 され る と と な る 。 


一 般 形式 : 
WAIT (事象 し , 事象]・・・)〔( 要 素 式 ) 〕 : 
構文 法 細則 : 


1 各々 の 「 事 象 ] は , 事象 変数 また は 事象 変数 だ け で 構成 され 
て いる 配列 で ある 。 


一 般 規 則 : 
1 WAIT ステ ー ト メン ト を 実行 し て いる 間 , 恐らく は , 別々 
の 時 点 で , リス ト で 指定 され て いる 事象 名 の 一 部 また は すべ 
て と 関し て 次 の 条件 が 満足 され る まで は , 


COMPLETION (事象) '1!B 


と の ブロ ッ ク の こと の 活用 化 C 関 する 制御 は , と の WAIT ス 
テー トメ ント 止め て 罰 か れる 。 


2. 任意 選択 の 「 要 素 式 ] が 指定 され て いな い 場 合 Ic 
は , リス ト の 中 の すべ て の 事象 名 が 上 の 条件 を 満た し た 後 


始め て , 次 の ステ ー ト メン ト K 和 制御 が 渡さ れる 。 


3. 任意 選択 の 「 要 素 式 」 が 指定 され て いる 場合 に は, WA1T 
ステ ー ト メン ト が 実行 され る と き に と その 式 の 値 が 計算 され , 
整数 変換 され る 。 と の 整数 は , 当該 ブロ ッ ク の 制御 を 
WAIT ステ ー ト メン ト の 次 の ステ ー ト メン ト に 渡す 前 人 
上 の 条件 を 満た を さ を け れ ば な ら な を ない, リス ト 内 の 事象 の 数 を 
指定 する た め の も の で ある 。 も ちろ ん , と の WAIT ステ ー 
トメ ント が 原因 で オン ・ ユ ニッ ト KC 入 り , この オン ・ ユ ニッ 
ト が 異常 停止 すれ ば , と の WAIT ステ ー ト メン ト の 次 の ス 
テー トメ ント 制御 は 渡ら を い 。 


[要素 式 」 の 値 が ゼロ ある い は 負 で ある 場合 に は , WAIT 
ステ ー ト メン ト は ナル ・ ス テー トメ ント と し て 取り 扱わ れる 。 
[要素 式 」 の 値 が リス ト 内 の 事象 名 の 数 ( n ) より 大 きい 場 
合 に は , その 値 は m と みな され る 。 WATT ステ ー ト メン ト 
が 配列 事象 名 を 参照 し て いる 場合 C は , 配列 の 各々 の 要素 が 
こと の n の 数 (C 入 る 。 


4. WAIT ステ ー ト メン ト で 指定 さん れん てい る ある 事象 変数 が , 
と の WAIT ステ ー ト メン ト よ り 先 CC 開始 され た ある 入出 力 
操作 と 結び 付け られ て いる 場合 は , と の 入出 力 操作 が 完了 し 
た と き (C, 一 般 規則 1 で 示し た 条件 が 満た され る 。 と の 場 合 , 
WATT ステ ー ト メン ト の 実行 は 入出 力 操作 の 完了 MC 必要 な 
要件 で ある 。 WAIT ステ ー ト メン ト よ り 先 !C あ る い は 
WAIT ステ ー ト メン ト を 実行 し て いる 間 (C,。 と の 入出 力 操 
作 C 関 係 す る すべ て の 転送 が 完了 し た 場合 に は , WATT ス 
テー トメ ント は 次 の よう な 措置 を と る 。 入出 力 条 件 を 一 切 引 
き 起 す 必 要 な し に と の 転送 が 完了 し て いる な ら ば , 事象 変数 
が 「 完 了 」 に モット され る 。 転送 は 完了 し て い る が 条件 を 引 
き 起 す 必 要 が ある と いう 場合 に は , 事象 変数 が 「 異 常 ] C セ 
ッ ト さ れ ( すなわち, STATUS (事象 名 ) 三 1 ), 所 妥 
の 0O N 条 件 が すべ て 引き 起 さ れる 。 最後 の オン ・ ユ ニッ ト か 
ら 戻 る と , 事象 変数 が 「 完 了 ] に セッ ト さ れる 。 


5. 種々 の 入出 力 事象 C 関 する ON 条件 が 引き 起 さ れる 順序 は , 
リス ト M 記 入 され て いる 事象 名 の 順序 と は 無 関 作 で ちあ る 。 あ 
る 事象 と 関し て ある ON 条件 が 引き 起 さ れる と , WAIT ス 
テー トメ ント が 終了 する 前 (に ある い は 他 の 入出 力 条件 が 引き 
起 さ れる 前 IC, と の 事象 に 関す る 他 の すべ て の 条件 が 引き 起 
され る 。 た だ し , と の よう て し て 入っ を た オン ・ ユ ニッ ト の い 
ずれ か 1 つか ら 異 常 た 戻り が 行なわ れ た 場合 C に は , この 限り 
で な い 。 


4 る WAIT ステ ー ト メン ト か ら 入 っ た いずれ か の オン ・ ユ ニッ 
ト で 異常 戻り が 行 を た われ た 場合 は , 対応 する 事象 変数 が 


[完了 」【C と モット され , WAIT ステ ー ト メン ト の 実行 が 終 
了 し , 異常 た 戻り で 指定 され て いる 場所 制御 が 疲 さ れ る 。 


7 WAIT ステ ー ト メン ト の リス ト の 中 入出 力 操作 と 結び 付 
け られ て いる 事象 名 が あり , (所 定 の 数 だ け の 事象 が 完了 し 
た た め (C あ る い は 異常 戻り の た め (《C ) こと の WAIT ステ ー 
トメ ント が 終了 する まで (CC そ の いく つか が まだ 「 完 了 | KC セ 
ッ ト さ れ て い ない 場合 は , これ ら の 未完 了 事 象 は , これ ら の 
事象 を 参照 する 他 の WAIT ステ ー ト メン ト が 実行 され る ま 
で は , 「 完 了 |」 (と モッ ト されない 。 


WRITE 


WRITE ステ ー ト メン ト は , 内 部 記者 装置 に ある 変数 か ら 
OUTPUT フ ァイル を いし UPDATEB ファ イル に レコ ー ド を 転送 
する た め の RECORD 転 送 ス テー トメ ント で ある 。 


一 般 形式 : 


WRITE FILE 
FROM (変数 ) 
[ KEYFROM ( 要素 式 ) ] 
[EVENT (事象 変数 ) 〕: 


( ファ イル 式 ) 


構文 法 細 則 : 


1. オプ ショ ン を 記入 する 順序 は 任意 で ある 。 


2. [ファ イル 式 ] は , レコ ー ド を 書き 込む べき ファ イル を 指定 
する た め の も の で ある 。 と の ファ イル は , OUTPUT 履 性 
を も つ RECORD ファ イル , また は DIRECT 属性 と 
UPDATE 属性 を る つ RECORD ファ イル で を な けれ ば な ら な い 。 


3 FROM ォ オプ ショ ン は , 書き 込む べき レコ ー ド を 表わす 変数 
を 指定 する た め の も の で ある 。 と の 変数 が 集合 体 で ある 場合 
(て は, と の 変数 は 連続 し て いる 記憶 域 C と な けれ ば な ら な い 。 
使い 方 に よっ て は , UNALIGNED 机 性 を も つ 固 定 長 ビッ ト ・ 
スト リン グ の 使用 は 禁じ られ て いる ( 詳しく は ,「 第 12 章 ・ 
レコ ー ド 式 転送 ] の [転送 され る デー タ 」| を 参照 の こと )。 


一 般 規 則 : 


1. ファイル が 開か ん れ てい な いら 場合 ,RRCORD 属性 と OUTPUT 
属性 ま た は RECORD 属性 と UPDATE 属性 が 明示 的 宣言 
され て いる を ら ば と の ファ イル は 明示 的 (と 開か れる 。 と れ 以 
外 の 場合 に は すべ て , UNDEE INEDETLE 条 件 が 引き 起 さ れる 。 


2. KEYFROM ォ プシ ョ ン が 指定 さん て いる 場合 , 「 要 素 式 ] 
は 文字 スト リン グ K 変 換 さ れる 。 と の 文字 スト リン グ は デー 
タ ・ セ ッ ト 内 の レコ ュー ド が 書き 込ま れる 場所 の 相対 位置 を 表 
わす 原始 キー で ある 。 REGTIONAL ( 3 ) デー タ ・ セ ッ 


J 節 : ステ ー ト メン ト 3 ぅ 95 


ト お よび INDEXED デー タ ・ セ ッ ト に KK 対し て は , 
KEYFROM オプ ショ ン で , 記録 され た キー も 指定 する 。 
と の キー の 長 さ は , ENVIRONMENT 属性 の 
KEYLEBNGTH オ プシ ョ ン て よっ て 決ま る 。 


3 EVENT ォ オプ ショ ン を 指定 する と , レコ ュー ド を 書き 込ん で い 
る と きも る 処理 を 続け る こと こと が で きる 。 SEQUENTTAL 
BUFFERED ファ イル また は VS AM 編成 の DIRECT 
BUFFERED ファ イル 対し て , と の オプ ショ ン を 指定 
する と と は で き な い 。 


PEV ENT オォ オプション を も る もつ WRITE ステ ー ト メン ト K 制 御 が 
渡る と , 「 事 象 変数 ] が 活用 化 さ れる (すなわち , と の 変数 
を 他 の 事象 と 結び 付け る と と が で き な く な る )。 た だ し , フ 
ァイル の 暗示 的 を 開放 (と ょ っ て UNDEFINEDFILE 条件 
が 引き 起 さ れ た 場合 C は と の 限り で を い ( 下 の 「 注 |] を 参照 
の と と ) 。 と の 事象 変数 を 指定 し て いる WAITT ステ ー ト メ 
ント 制御 が 渡る ま では, と の 事象 変数 は 活用 状態 KC と と ど ま 
る 。 と の 事象 変数 を 指定 し て いる WAITT ステ ー ト メン ト K 
制御 が 渡る と , 次 の いずれ か の 措置 が と られ る 。 


a. WRITE ステ ー ト メン ト が 所 期 通 り IC 実 行 さ れ て なり 
と の WRITE ステ ー ト メン ト の 結果 と し て TRANSMIT 
KEY, あぁ あるいは RECORD 条件 が 引き 起 さ れ て いな い 
場合 C は , 事象 変数 が 「 完 了 」 に セッ ト さ れ , その 状態 
が 非 活用 状態 CC 切り替え られ る ( す を わ ち , と の 変数 を 
他 の 事象 と 結び 付け る と と が で きる よら (て を る) 


b. WRITE ステ ー ト メン ト の 実行 の 結果 , TRANSMTIT , 
KEY, ある い は RECORD 条件 が 引き 起 さ れ た 場合 に 
は , 上 述 の WAIT ステ ー ト メン ト が 出 て 来る まで は と 
れ ら 各々 の 条件 の た め の 割 込み は 起こ ら を い 。 
TRANSMIT 条件 と RECORD 条件 だ けが 一 緒 C 引 き 
起 され る 可能 性 が ある と い 2 点 人 注意 する と と 。 最後 の 
オン ・ ユ ニッ ト か ら 戻 る と , ある ひい は , いずれ か の オン 
ュ ユニット が GO TO ステー トメ ント よっ て 終了 させ ら 
れる と , 事象 変数 は 「 完 了 ] に モッ ト さ れ , その 状態 が 
非 活用 状態 と 切り 替え られ る 。 


注 : WRITE ステ ー ト メン ト を 実行 し た 結果 , フラ ァイル が 
略 示 的 に 開放 され , その た め (CUNDEF INEDF TLE 条 件 が 
引き 起 さ れ た 場合 に は , 直 ち (C, と の 条件 の た め の オ ン ・ テ ユ 
ニッ ト 入 る 。 た だ し , 事象 変数 は 何 も 変化 し たい 。 す を わ 
ち , 事象 変数 は 依然 非 活用 状態 C と どまり , WRITE ステ ー 
トメ ント が 出 て 来 た と き と 同 じ 値 を 保持 する 。 オン ・ 
ト で と の 条件 が 訂正 され な か っ た 場合 に は , オン ・ ユ ニッ ト 
か ら 正 常 IC 戻 っ た 後 , ERROR 条 件 が 引き 起 さ れる 。 オン ・ 
ュ ユニット で と の 条件 が 訂正 され た 場合 ( す を わ ち , ファ イル 
が 正 し く 開 か れ た 場合 ) て と は, オン ・ ユ ニッ ト か ら 正 常 戻 
っ た 後 。 事象 変数 は , 「 未 完了 に モッ ト さ れ , さら 活用 化 
され る 。 と の 後 ,WR ITE ステ ー ト メン ト の 実行 が 続行 され る 。 


エー ニッ 


396 DOS PL ノ 1{ 最適 化 マ セン バイ ラー : 言語 解説 書 第 2 部 


プリ プロ ギ セッ サー ャ ステー トメ ント 


と と で は , プリ プロ セッ サー の 段階 で 実行 する と と の で きる 
すべ て の ステ ー ト メン ト を , アル ファ ベッ ト 順 説明 する 。 


る ACTIVATE 


省略 形 : % ACT 

% ACTIVATE ステ ー ト メン ト で 議 別 名 を 指定 する と , と の 識別 
名 は 活用 状態 切り 替え られ , 置換 え 可 能 ( に を る 。 し た が っ て , と 
の 後 , プリ プロ モッ サー・ ス テー トメ ント 以外 の ステ ー ト メン ト で 
と の 議 別名 が 指定 さん て いる と , と の 議 別 名 が 活用 状態 に ある 限り , 
と の 識別 名 の 置換 え が 開 始 さ れる 。 


一 般 形 式 : 


%[ ラ ベル: ]・・・ ACTIVATE 識 別名 
[RESCANINORESCAN] [ , 議 別 名 
[RESCANINORESCAN〕 〕・・・: 


構文 法 細則 : 


1. 各々 の 議 別名 は , プリ プロ セッ サー 変数 。 プリ プロ セッ サー・ 
プロシージャー 名 , SUBS TR 組込み 関数 , LRNGTH 組 込 
み 関 数 , また は INDEX 組 込み 関数 で を けれ ば を ならない 


2. プリ プロ セッ サー・ ブ プロ シー ジャ ー の 中 に %ACTITVATE 
ステ ー ト メン ト を 置く と と は で き な い 。 


一 般 規 則 : 


1. 識別 名 の 状態 を , 当初 ,%ACTIVATDE ステ ー ト メン ト (C 
ょ っ て 活用 化す る と と は で き な い 。 こと れ を 行なう に は , 
%DECLARE ステ ー ト メン ト で と の 識別 名 を 指定 すれ ば 
ょ いら 。%DEACTIVATE ス テー トメ ント CC よ っ て 識別 名 を 
非 活用 状態 CK し た あと で だ け , %ACTIVATE ステ ー ト 
メン ト を 用 いて その 識別 名 を 活用 化す る と と が で きる 。 


2. ある 謙 別 名 が 活用 状態 に ある ( と の 識別 名 が プリ プロ セッ サ 
一 変数 で ある な ら ば , さら と, と の 識別 名 と 値 が 与え を られ て 
いる ) 場合 は , 非 プ リプ ブ プロセッサ ー・ ス テー トメ ント の 中 と 
と の 識別 名 が 出 て 来る と , 思 換 え が 開 始 さ れる 。 た だ し , コ 
メン ト の 中 また は 単 一 引用 符 の 中 に と の 識別 名 が 出 て 来場 
合 に は と の 限り で を い 。 た と えば , 原始 プア ログ ラム の 中 次 
の よら な 一 連 の ステ ー ト メン ト が ある も の と すれ ば, 


%DECLARE 1 FIXPED, T CHARACTER: 
%DEACTIVATE [: 

%1 王 15: 

%Tー"!A(1)「: 

S 一 人 *※ ネ 本 ※3: 

%Tー! 十 5: 

%ACTIVATE 1: 

%DEACTIVATE T: 

R 一 [*※T*2: 


プリ プロ セッ サー の 処理 が 抄 ん だ と き , 上 記 の ステ ー ト メン 
ト 群 か ら 生成 さん た テキ スト は 次 の よう て な る ( 信 換 え の 結 
果 , プラ ンク に て な っ た 部 分 は 示し て な い ) 。 


SI*A(1 )*3: 
Rー20*T*2: 


3 RESCAN ま を は NORESCAN で 参照 され て いる 識別 名 が 
FIXED タ イプ の プリ プロ セッ サー 変数 の 名 前 で ある 場合 
また は FIXED タ イプ の 値 を 返す サプリ プロ セッ サー・ ブ ロジ 
ー ジャ ー の 名 前 で ある 場合 は , いずれ の オプ ショ ン が 指定 され 
て いて る, 出力 の 流れ に ぉ いて 置換 を え が 行なわ れる 。 
RESC AN ま を は NORESC AN で 参照 され て いる 識別 名 が 
CHARACTER タ イプ の プリ プロ セッ サー 変数 の 名 前 で ある 場 
合 , ま た は CHARACTER タイ ブ の 値 を 返す プロ ジー ジャ ー の 名 
前 で ある 場合 け は, それ ぞ れ の オプ ショ ン け は , 次 の よう な 意味 を も つ 。 


&。 RESCAN は , プリ プロ セッ サー に て よっ て と の 議 別 名 が 
走査 さん た と き , 出力 の 流れ (て お いて 周 換 え を 通常 通り 
行なう と と を 指定 する も の で ある 。 


b. NORESCAN は 次 の よう な 指定 を 行 を 2。 


(1) プリ プロ セッ サー に よっ て と の 識別 名 が 走査 され た 
と き , 出力 の 流れ て お いて と の 識別 名 を こと の 識別 名 
が 表わし て いる 変数 の 現在 の 値 で も る テキ スト , ま 
た は と の 識別 名 が 表 わ し て いる ブロ シー ジャ ー を 呼 
び 出 し た 結果 で ある テキ スト と 思 き 換え る 。 


(2) さら KC 置 換え を 行なう た め C と の テキ スト を 再 走 査 
する よう な と と は し な を ゆい 。 


いずれ の オプ ショ ン も 指定 され て いな を い 場 合 に は , RESCAN 
の 指定 が ある も の と みみ を され る 。 


4. すでに 活用 状態 CK ある プリ ブロ セッ サー 識別 名 を 対象 と する 
% ACTIVATE ステ ー ト メン ト を 実行 し て も 何 $ 行 な われ を ゆい o 


割当 て ステ ー ト メン ト 


割当 て ステ ー ト メン ト は , プリ プロ セッ サー 式 の 値 を 計算 し , そ 


の 値 を プリ プロ セッ サー 変数 (C 割 り 当 て る の 使用 され る 。 


一 般 形 式 : 
%〔 ラベル: ]・・・ プリ プロ セッ サー 変数 
プリ プロ セッ サー 式 : 
一 般 規 則 : 


プリ プロ セッ サー 変数 割り 当て られ る 値 が 文字 スト リン グ で あ 
る 場合 , と の 文字 ネス トリ ング (て プリプロセッサ ー・ ス テー トメ ント 
が 含ま れ て いて は な ら な い 。 


%DEACTIVATE 


省略 形 : %DEACT 


%DEAOTIVATE ス テー トメ ント で 識別 名 を 指定 する と と の 識 
別名 は 非 活用 状態 MC 切 り 替 えら れ , 置換 を 不可 能 を 状態 と 置か れる o 
し た が っ て , と の 後 , 非 プ リプ ロ セ ッ サ ー・ ス テー トメ ント の 中 と 
と の 識別 名 が あっ て ゃ も , 置換 え は 開始 され を い ( も ちろ ん , と の 間 
C と の 議 別 名 が 再び 活用 化 さ れ て いれ ば , と の 限り で な い )。 


一 般 形式 : 
%[ ラベ ル : ]・・・ DEACTIVATE 識 別名 
〔, 議 別名 ]・・・: 
構文 法 細則 ・ 


1. 各々 の 「 識 別名 」 は , プリ プロ セッ サー 変数 , SUBSTR 組 
込み 関数 , また は ブリ プロ セッ サー・ ブ ロン シー ジャ ー 名 で な 
けれ ば な ら な を な い 。 


2.。 プリ プロ セッ サー・ ブ プロシージャ ー の 中 CDEACT TVATE 
ステ ー ト メン ト を 置く と と は で き な い 。 


一 般 規 則 : 


ある 識別 名 を 非 活用 状態 CK し て も, と の 識別 名 は 値 を 失う わけ で 
は な いし , 後に プリ プロ セッ サー・ ス テー トメ ント の 中 で と の 識別 
名 (C 新 し い 値 を 与え る の が 妨げ られ る わけ で も な い 。 非 活 用 状態 に 
する と いら と と は , 単に C, ある 特定 の 識別 名 の 思 換 え を 阻止 する と 
と で ある すぎ た を い 。 す で K 非 活用 状態 と ある プリ プロ セッ サー 識 
別名 を , 非 活用 化し ょ うと し て も , 何 ゃ 行なわ れ を い 。 


%DECLARE 

省略 形 :  %DCL 

%DECLARE ステ ー ト メン ト は , 識別 名 を プリ プロ セッ サー 変数 
な いし プリ プロ セッ サー・ ブ プロ シー ジャ ー 名 と し て 認め させ る た め 
の も の で あり , 同時 に , と の 識別 名 を 活用 状態 と 思 く 働き も する 。 


ある 議 別名 を , 他 の プリ プロ モッ サー・ ス テー トメ ント の 中 で 変数 また 
は プロ シー ジャ ー と し て 使用 する た め に は , 前 も っ て %DECLARE 
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ステ ー ト メン ト の 中 で と の 識別 名 を 宣言 し て な か を けれ ば を ならない 。 


一 般 形式 : 


%[ ラ ベル: ]〕・ 
DECLARE 議 別 名 

{FIXED ICHARACTER | ENTRY |BUILTINI 

[ , 識別 名 

( FIXED |CHARACTERIENTRYIBUILTIN) ]・・: 


構文 法 細 則 : 
1 「 識 別名 ] が プリ プロ セッ サー 変数 で ある 場合 (C は , 
CHARACTER ま を は FIXED と 指定 し を な けれ ば な ら な い 。 
「 識 別名 ] が プリ プロ セッ サー・ プ ブロ シー ジャ ー 名 で ある 場合 iC 
は , 必要 応じ て , 入口 宣言 を 指定 する と と が で きる 。 ブリ 
プロ セッ サー・ プ ブロ シー ジャ ー の 入口 名 を 明示 的 宣言 する (C は , 
と の 入口 名 を %PROCEDURE ス テー トメ ント の ラベ ル と し て 
指定 し て むけ ば よい 。 し か し , と の 明示 的 宣言 で は , プリ プ 
ロ セ ッ サ ー・ プ ブロ シー ジャ ー 名 は 活用 化 さ れ な い 。 


2. %DECLARE ステ ー ト メン ト で は , | 一 般 形式 | で 示し た 
属性 し か 指定 する と と が で き ない 。 


3 普通 の DECLARE ステ ー ト メン ト の 場合 と 同様 , 共通 属性 
を 因数 化す る こと が で きる 。 


4. 走査 の と き (C と は , %DECLARE ステ ー ト メン ト の ラベ ル は 
無視 され る 。 


一 般 規 則 : 


1 CHARACTER 属 性 で 長 さ を 指定 する と と は で き ない 。 
CHARACTEER と 指定 され て いる と , そ の 議 別 名 は , 最 大 の 長 さ 
を も た な い , 長 さ の 変わ る 文字 スト リン グ を 表わす も る の と みな され る 。 


2. FIXED 属 性 を も る つも の と し て 宣言 され て いる プリ プロ ェ セッ 
サー 変数 に は , 省略 時 属性 と し て DECTIMAL と (5,0) と い 
2 属性 が 与え を られ る 。 


う ブリ プロ セッ サー 富 言 が 走査 され る まで は , その 宣言 が 知ら 
れる と と は を な い 。 し た が っ て , プリ プロ セッ サー 変数 の 宣言 
な いし プリ プロ セッ サー・ ブ ロ シ ー ジャ ー の 宣言 が 走査 され 
る 前 に , その 変数 を な いし ブ プロシージャー へ の 参照 が 出 て 来る 
と , と の 参照 は 誤り (C な る 。 


4. あら ゆる ブリ プロ モッ サー 変数 。 プリ プロ セッ サー・ プ ブロ シンジ 
ー ジ ャ ー 名 , お よび プリ プロ セッ サー・ ラ ベル の 有効 範囲 は , 
当該 プリ プロ セッ サー よっ て 走査 され る 原始 ブロ グラ ム 全 
体 で ある ( と の 識別 名 を 宣言 し 直し て いる プリ プロ セッ サー・ 
プロシージャー は 除く )。 プリ プロ セッ サー・ プ ブロ シー ジャ 
ー 内 の 宣言 の 有効 範囲 は , その プロ シー ジャ ー だ け で ある 。 


3?8 DOS PL ノン [ 最適 化 フ セン パイ ラー : 言語 解説 書 第 2 部 


5. 原始 ブログ ラム の 中 (CC ある 1 つの ブリ プロ モッ サー・ ブ ロン 
ー ジ ャ ー に つい て 1 つ ず つ 入 口 宣言 を 指定 する と と が で きる 。 
入口 宣言 は , 入口 名 を 活用 化す る の 使用 され る 。 プ リプ ュ 
セッ サー 関数 が 呼び 出さ れる た び KC, その り 数 は , 必要 K 応 
じ て , 対応 する バラ メー ター の 属性 合致 する ょ う 変 換 さ れ 
る 。 


呼出 し の 際 の 引数 と パラ メー ター と の 関係 に つい て は , 第 I 
部 の 「 コ ン バ イ ル 時 の 諸 機能 ] の 「 プ リプ ロ セ ッ サ ー・ プ ブロ 
シー ジャ ー」 を 参照 の こと 。 


6 プリ プロ セッ サー の %DECLARE ステ ー ト メン ト が 出 て 
来る と , と の ステ ー ト メン ト は %ACTIVATB ス テー トメ 
ント と し て 働き , RESCAN オプション と 併用 する と と 
よっ て , と の ステ ー ト メン ト で 議 別 さん て いる すべ て の ブリ 
ブロ セッ サー 変数 を 活用 化す る 。 


/ SUBSTR, LENGTH, ま を は INDE 双 対し て だ け 
BUILTIN 属性 を 指定 する と と が で きる 。 と の 属性 は , 
と の 本性 を も つ 識 別名 が これ と 同じ 名 前 の 組込み 関数 で ある 
と と を 指定 する た め の も の で ある 。 


る DO 


%DO ス テー トメ ント は , %END ス テー トメ ント と ょ 対 多 なっ て , 
ある 1 つの プリ プロ セッ サーDO グル ー プ の 境界 を 指定 する の MC 使 
用 され る 。%DO ス テー トメ ント を と れ 以 外 の 目的 で 使用 する と と 
は で き な い 。 


一 般 東 式 : 


%[ ラベ ル : ] ・・・DO | 


TO m2[EY ms] 
BY ms(TO 了 


構文 法 細則 : 


「 1 は プリ プロ セッ サー 変数 を 表わす 。 放電 敵 「m 2 1, 


「m3」 は プリ プロ セッ サー 式 で ある 。 


一 般 規則 : 


プリ ブロ モッ サーDO グル ー プ の 展開 は , とれ と 対応 する 非 プ リ 
プロ セッ サーD0 グ ルー ズ の 展開 と 同じ で あり , 「i」 「m11, 
Im2 | お よび 「m3| の 意味 は , 非 プ リプ ロ セ ッ サ ーDO グ レル 
ー ブ の と れ ら 《 対 応 する 式 の 意味 と 同じ で ある 。 


と この ステ デー トメ ント の 説明 と 例 C に つい て は , 「 第 15 間 : コン 
ズバ イル 時 の 諸 機 能 ] の | プリ ブロ セッ サーDO グル シー プ | を 参照 の 
ど ご と 


る END 


% END ステ ー ト メン ト は , %DO ス テー トメ ント また は %PROCEDURE 
スネ ステー トメント と 対 民 な っ て , プリ プロ セッ サーDO グ ルー プ を な いし ブリ プ ブ 
ロ セ ッ サ ー・ ブ プロシージャ ー の 境界 を 指定 する の て 使用 され る 。 
一 般 形式 : 

%[ ラベ ル : ]・・・ 
構文 法 細則 : 


END の 後 の ラ ベル は , %PROCEDURE ス テー トメ ント また 
は %DO ス テー トメ ント の ラベ ル で な けれ ば なら な じい 。 複数 終止 を 
行 な り と と も で きる 。 


END [ラベル 〕 : 


%GO TO 
省略 形 ・ %GOTO 
% GO TO ステ ー ト メン ト が ある と , プリ プロ モッ サー は , 指定 さ 
れ て いる ラベ ル の 所 か ら 走 査 を 継続 する 。 
一 般 形式 : 

の の 2 まり テ の で 
一 般 規則 : 


GO TO ラベ ル : 


1. GO TO と らら う キ ー ワ ー ド の 後に (と ある ラベ ル ( て よっ て 走査 が 
移行 する 地点 が 決ま る 。。 と の ラベ ル は ブリ プロ セッ サー・ ス 
テー トメ ント の ラベ ル で を な けれ ば な ら を い 。 を ただし, ブリ ズブ 
ロ セ ッ サ ー・ ブ プロ シー ジャ ー の ラベ ル で あっ て は な を な ら な い 。 


2. プリ プロ セッ サーGO TO ステー トメ ント は , この ステ ー ト 
メン ト 自 体 が 入っ て いる プリ ブロ セッ サー・ ブ ロジ シー ジャ ー 
の 外部 の 地点 (制御 を 渡す と と は で き を い 。 い いか えれ ゆ , 
キー ワー ド FGO TO の 後 の ラ ベル は , と の ブロ シー ジャー の 
中 (て 含ま れ て いる も の で な けれ ば な ら な い 。 


3 組み 入れ られ る テキ スト の 中 で %GO TO ステ ー ト メン ト を 
使用 する 上 で の 制約 に つい て は , 「%INCLUDE ステ ー 
トメ ント | を 参照 の こと 。 


し 2 


IF ステ ー ト メン ト は , ある プリ プロ セッ サー 式 の 値 を も ゃ と に し 
て , 走査 の 流れ を 切り 替え る と と が で きる 。 


一 般 形 式 ・ 
%[ ラベ ル : ]・・・IF プ ブリ プロ セッ サー 式 


%THEN プリ プロ セッ サー 文節 一 1 
[ %ELSE プリ プロ セッ サー 文節 一 2 ] 


構文 法 細則 ・ 


プリ プロ セッ サー 文節 は , %DECLARE %PROCEDURE, 
%END, %DO ( バー セン ト 記 人 号 も 含め て ), ま を た は , プリ プロ セッ 
サーDO グ ルー プ (パーセント 記号 も 含め て ) , 以外 の 1 個 の プリ 
プロ セッ サー・ ス テー トメ ント か らら 構成 され る 。 と れ 以 外 の 構文 法 
は , 非 プリ プロ セッ サーTFE ス テー トメ ント の 構文 法 と 同じ で ある 。 


一 般 規則 


1. プリ プロ セッ サー 式 の 値 が 計算 され , ビッ ト ・ ス トリ ング 
変換 され る ( ビット ・ ス トリ ング へ の 変換 が で き を な けれ ば エ ェ 
ラー に な る ) 。 と の スト リン グ の 中 人 値 1 を も る つ ビ ピット が あ 
る 場合 (と は , 文節 1 が 実行 され , 六 節 2 は 指定 され て いて も 
無視 され る 。 ビッ ト が すべ て 0 で ある 場合 に は , 文節 1 は 無 
視 さ れ , 区 節 2 が 指定 され て いれ ば と の 交 節 が 実行 され る 。 
いずれ の 場合 に も , いずれ か の 文節 CC あ る %GO TO ステ ー 
トメ ント (て よっ て 別 の 場所 か ら 走 査 が 続行 され る の で な い 限 
り , IF の すぐ 後 の ス テー トメ ント か と 走査 が 続行 され る 。 


2. %IFE ス テー トメ ント を ネス ト す る と と が で きる 。 と の ネス 
ティ ング 関す る 規則 は , 非 プ リプ ロモ セッ サーTF ド ステ ー ト 
メン ト の ネス ティ ング KK 関す る 規則 と 同じ で ある 。 


%INCLUDE 


%INCLUDE ステ ー ト メン ト は , 現在 走査 され て いる 原始 プロ グラ 
ム ( て , スト リン グ 形 式 の 外部 テキ スト を 組み 入れ る の 使用 され る 。 
組み 入れ られ た テキ スト は , プリ プロ セッ サー よる 処理 の 済ん だ 
後 の テ キス ト の 一 部 と を る 。 


一 般 形 式 : 
当 コ ン バ イ ラー に ちな ふい て は , %INCLUDE ステ ー ト メン ト は 次 


の よう 定義 され る 。 


%[ ラベル: ]・・・ INCLUDE 
lc 
識別 名 一 2 
2 
構文 法 細則 : 


1. [識別 名 一 1 ] は , 原始 ステ ー ト メン ト ・ ラ イブ ラリ ー の 中 
の サプライ ブラ リー を 表わす 。 「 識 別名 一 2 ] は , ブッ ク 名 
を 表わす 。 こと これら の 識別 名 に ょ っ て , 原始 プロ グラ ム (C 組 信 
入れ る べき 外部 テキ スト を 識別 する 。 


2. 「 識 別名 一 1 ] が 記入 され て いな い 場 合 は , 原始 ステ ー ト メ 
ント ・ ラ イプ ブラ リー の PL エサ プラ イブ ラリ ー が 指定 され て 


いる も の と みな され る 。 


3 プリ プロ セッ サー・ ブ プロシージャ ー の 中 で % INCLUDE ス 
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一 般 規 則 : 


1 組み 入れ られ る テキ スト と, 非 プ リプ ロ セ ッ サ ー・ ス テー ト 
メン ト お よび ノン ま た は プリ プロ セッ サー・ ス テー トメ ント が 含 
まれ て いて も よい ら 。 組み 入れ られ る テキ スト に お ける 論理 レ 
コー ド の 許容 され る 最大 の 長 さ は , 8 0 バイ ト で ある 。 


2. 組み 入れ られ る テキ スト は , 原始 プログ ラム と 同様 近 次 , 
走査 さん る 。 す を わ ち , プリ プロ セッ サー・ ス テー トメ ント 
が 実行 され , 必要 Cc 応 し て , 置換 を が 行なわ れる 。 


3 %INCLUDE ステ ー ト メン ト を ネス ト す る と と が で きる 。 
いい か えれ ば , 組み 入れ られ る テキ スト (CC%INCLUDE ぇ 
テー トメ ント が 含ま れ て いて も よい ら 。 組み 入れ られ た テキ ス 
ト の 中 で %GO TO ステ ー ト メン ト を 使用 し て , 原始 ブロ グ 
ラム の 中 の ある 場所 (と 制御 を 渡す と と も で きる し , ネス ティ 
ング の 外側 の レベ ル て ある 組み 入れ られ た テキ スト の 中 の 場 
所 と 制御 を 渡す と と も で きる 。 し か し , と の 逆 は 許さ れ を な い 。 
と れ し 似 関係 は 実行 の 反復 を 指定 し て いる D O グル シープ の 
ネス ティ ング に お いて も 見 られ る 。 す を わ ち , ある 内 側 の 
DO グル ー プ か ら と の グル ー プ を 含ん で いる 外側 の D O グル 
ー プ に 制御 を 渡す と と は で きる けれ ども , 外側 の グル ー プ か 
ら と の グル ー プ KK 含ま れ て いる 内 側 の グル シー プ K 制 御 を 渡す 
と と は で き な い 。 ネス ティ ング の 許容 され る 最大 の 深 さ は , 
4 9 で ある 。 


4. 組み 入れ られ た テキ スト の 中 の プリ プロ セッ サー・ ス テー ト 
メン ト は , 完全 を 形 に を っ て いな けれ ば な ら な い 。 た と えば , 
ある %TIF ス テー トメ ント の 半分 が 組み 入れ られ た テキ スト 
の 中 に あり , 残り 半分 が 原始 アロ グラ ム の 他 の 部 分 に ある と 
いう の は 許さ れ な い 。 


例 : 
原始 アロ グラ ム の 中 次 の よう な 個所 が ある も の と する 。 


%DECLARE (FILENAME 1 , FILENAME2 ) 


CHARACTER : 
% FILENAME1 = !MASTER!: 
% FILENAMP2 ー !NEWEILE!: 


% INCLUDE DCLS : 


また , 原始 ステ ー ト メン ト ・ ラ イプ ブ ラリー の PL プ エ I サプライ ブラリ 
ー の 中 に ある ブッ ク DCLS 次 の ステ ー ト メン ト が 含ま れ てい 
る も の と する 。 


DECLARE (FILENAME1. FILENAME2 ) 
FILE RECORD INPUT 
DIRECT KEY ED : 


と の 場合 , プリ プロ セッ サー て よる 処理 を 経た 後 の テ キス ト MC は 次 
の ステ ー ト メン ト が 組み 込ま を れる 。 


DECLARE (MASTER, NEWEFILE ) 


FILE RECORD INPUT 
DIRECT KEYED : 


と れ が ファ イル 宣言 の 中 央 ライ プラ リー を 使用 する 方 法 で ある 点 
と 注意 する と と 。 ユー ザー は , 宣言 され る ファ イル 独自 の 名 前 を 
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与え て 使用 する 。 


% ナ ル ・ ス テー トメ ント 


% ナ ル ・ ス テー トメ ント の 用 途 の 1 つ は , %GO TO ステ ー ト メン 
ト C よ る 制御 の 移行 先 を 設置 する と と で ある 。 また , ネス ト さ れ た 
%IF ス テー トメ ント の ELSE クロ ー ズ の 釣合い を と る た め に と 
の ステ ー ト メン ト を 使用 する と 都合 が よい 。 

一 般 形 式 : 


の し SS non マタ 


%PROCEDURE 


省略 形 %PROC 


%PROCEDURE ス テー トメ ント は , %END ステ ー ト メン ト と 対 
(C を な っ て , ある 1 つの プリ プロ セッ サー・ ブ プロ シー ジャ ー の 境界 を 
指定 する の MC 使用 され る 。 と の よう を プリ プロ セッ サー・ ブ ロ シ ー 
ジャ ー は , ブリ プロ モッ サー の 自 落 で し か 実行 する と と の で き な い 
内 部 関数 プロ シー ジャ ー で ある 。 


一 般 形式 : 
% ラ ベル : [ラベル : ]・・・ PROCEDURE 


し (識別 名 〔 , 識別 名 } ・・・) 〕 
RETURNS { CHARACTER IFIXED}) : 


構文 法 細 則 : 


1 各々 の 「 議 別名] は 関数 グロ ンー ジャ ー の バラ メー ター で あ 
る 。 最高 15 の 「 識 別名 」 を 指定 する と と が で きる 。 


2. RETURNS の 属性 の リス ト の 中 で CHARACTER 属性 き 
た は 『F TXED 属 性 を 指定 し て , 当該 関数 プロ ンー ジャ ー か ら 
返さ れる 値 の タイ ブ を 指示 し を けれ ば な ら な い 。 と れ し と 省略 
時 属性 が 適用 され る と と は な い 。 


一 般 規 則 : 


1 プリ プロ セッ サー・ プ ブ プロシージャ ー の 中 で は , 次 に あげ る ス 
テー トメ ント お よ び グ ルー ブ し か 使用 する と と が で き な い 。 
24. プリ プロ セッ サー 割当 て ステ ー ト メン ト 
b. プリ ブロ セッ サーDECLARE ステ ー ト メン ト 
Cc. プリ プロ セッ サーDO グ ルー ズ プ 
d. プリ プロ セッ サーGO TO ステー トメント 
6e6.、 ブリ プロ セッ サー」TF ス テー トメ ント 
f.、 プリ プロ セッ サー・ ナ ル ・ ス テー トメ ント 


g. プリ プロ セッ サーRETURN ステ ー ト メン ト 


こと れ ら の ステ ー ト メン ト お よび D 0 グル ー プ は すべ て , と れ 
まで に 説明 し て 来 た プ リプ ロ セ ッ サ ー・ ス テー トメ ント お よ 上 
び DO グル ー ズ の 構文 法 と 一 般 規則 に従って い を けれ ば を ら 
ない 。 た だ し いずれ の 場合 も ,。 パー セン ト の 記号 を と り 除 
か な けれ ば な ら な い 。 


2. プリ プロ セッ サー・ ブ プロ シー ジャ ー の 中 の GO TO ステ ー ト 
メン ト (て よっ て , と の プロ シー ジャ ー の 外部 の 地点 と 制御 を 
渡す と と は で き な い 。 


3 一 般 規則 1 の 記述 か ら も わか る 通り ,。 プリ プロ セッ サー・ プ 
ロジ シー ジャ ー を ネス ト す る と と は で き な い 。 


4. プリ プロ モッ サー・ プ ブロ シー ジャ ー は ,。 プリ プロ セッ サー・ 
ステ ー ト メン ト の 中 の 関数 参照 に よっ て 呼び 出す と と が で き 
る 。 また , 関数 プロ シー ジャ ー 名 が 活用 状態 に ある 場合 (C は , 
非 プ リプ ロ セ ッ サ ー・ ス テー トメ ント の 中 に その 名 前 が 出 て 
来る と 。 プリ プロ セッ サー・ プ ブロ シー ジャ ー が 呼び 出さ れる 。 


プリ プロ セッ サーRETURN ステ ー ト メン ト 


プリ プロ セッ サーRETURN ステ ー ト メン ト は , プリ プ ブロ セッ サー 
プロ シー ジャ ー の 中 で し か 使用 する こと と が で き な い 。 と の た め , ブ 
リプ ブ プロセッサ ーRETURN ステ ー ト メン ト の 財 頭 に あ を つけ る と と 
は で き な い 。 プ リプ ブロ セッ サーRETURN ステ ー ト メン ト は , 当該 
プリ プロ セッ サー・ プ ブロ シー ジャ ー の 呼出 し 点 (C 値 を ら び 制御 を 
返す た め の も の で ある 。 


一 般 形 式 
[ ラベ ル : ]〕・・・ RETURN 
(プリ プロ セッ サー 式 ) : 
一 般 規 則 : 


プリ プロ セッ サー 式 の 値 が %PROCEDUREE ス テー トメ ント で 
指定 され て いる RETURNS の 属性 の リス ト の 属性 (に 変換 され , と の 後 , 
と の 値 が 呼出 し 点 に 返さ れ る 。 呼出 し 点 が 非 プ リプ ロ セ ッ サ ー・ ス テ 
ー ト メン ト の 中 と ある 場合 は , 返さ れ た 値 が 関数 参照 と 思 き 換え ら 
れ た 後 , プリ プロ セッ サー と よっ て と の 値 を 置き 換え る と と が で きる 。 


プリ ブロ セッ サー 式 (関す る 規則 で は , プリ プロ セッ サー・ プ ブロ 
シー ジャ ー か ら 返 され た 値 《K プ リプ ロモ セッ サー・ ス テー トメ ント が 
含ま れる と と は 許さ れ て いた い の で , 注意 する と と 。 


リス ティ ング 制御 ステ ー ト メン ト 


% る PAGE 


%P AGE ス テー トメ ント の 後記 人 され て いる ステ ー ト メン ト は 
プロ グラ ム ・ リ スト の 中 で 次 の ペー ジ の 最初 の 行 に 印刷 され る 。 


一 般 形 式 : 
%PAGE: 


構文 法 細則 : 


1. 用 紙 送 り が 行 を われ る 関係 上 に この ステ ー ト メン ト と 同じ 行 
と 他 の ステ ー ト メン ト が あっ て は な ら な いら 。 


2. と の ステ ー ト メン ト が 注 生 の 中 ま を た は 他 の ステ ー ト メン ト の 
中 に ある 場合 に は , この ステ ー ト メン ト は 出力 形式 に 何 の 効 
果 も 及 集 さ な い 。 


一 般 規 則 : 


1 プリ プロ セッ サー を 使用 する 場合 も 使用 し な い 場 合 も ,。 と の 
スネ ステー トメント を 使用 する と と が で きる 。 と の ステ ー ト メン 
ト は 前 原始 リス ト と 原始 リス ト の 双方 対し て 効力 を も る つ 。 


2. %PAGE ス テー トメ ント の 指示 が 実施 され た 後 , と この ステ ー 
トメ ント は ,。 ブリ プロ セッ サー 人 よっ て 印刷 され る と と な く . 
コン パイ ラー に よっ て テキ スト か ら と 削除 さ れる 。 す を わ ち , 
と の ステ ー ト メン ト は , リス ト と は 現われ な い 。%PAGE ス 
テー トメ ント に 注釈 また は 注釈 の 一 部 が あっ て も , これ も 削 
除 さ れ , リス ト と は 現われ な い 。 


3 プリ プロ セッ サー を 使用 する 場合 , あ PAGE ステ ー ト メン 
ト が 他 の 1 つ 以 上 の ステ ー ト メン ト と 同じ 行 (と 記入 され て い 
る と , プリ プロ セッ サー は %PAGE ス テー トメ ント を 移動 し 
て , コン パイ ラー を 渡さ れる テキ スト の 中 で は と の ステ ー ト メン ト 
が 他 の ステ ー ト メン ト の な い 行 て 来る よう (て する 。 し た が っ て , 前 原 
始 り スト で は 用 紙 送り は 行なわ れ を い が , 原始 リス ト で は 行なわ れる 。 


4. プリ プロ セッ サー を 使用 する 場合 , %PAGE ス テー トメ ント 
みあ る 行 の 未 尾 (C, 次 の 行 に また が る 形 で 識別 名 が 記入 され て 
いる と , と の 識別 名 の 2 つの 部 分 は 連結 され て 1 つの 語 に な 
る 。%PAGE ス テー トメ ント の ある 行人 充分 た スペース が あ 
れ ば ぱ ば と の 識別 名 の 後 の 部 分 が 前 の 部 分 の ある 行 じ 移動 され 
る 。 ス ベース が を な けれ ば, と の 識別 名 は 1 つ K 連 結 さ れ て 新 
し い 行 の 冒頭 印刷 され る 。 


%SKIP 


プロ グラ ム ・ リ スト C あ いて , %SKIP ス テー トメ ント の 後 は 指 
定 の 行 数 だ け プ ラン ク に な る 。 


一 般 形 式 : 
%SKIP[(n)]〕: 
構文 法 細 則 : 


1 と の ステ ー ト メン ト の 指示 が 実施 に 移さ れる た め (C は , と の 
ステ ー ト メン ト は , 他 の ステ ー ト メン ト が 記入 され て いな を 
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い 行 に な けれ ば を ら な い 。 


と この ステ ー ト メン ト が 注釈 また は 他 の ステ ー ト メン ト の 中 と 
ある 場合 に は , と の ステ ー ト メン ト は 出力 形式 C 何 の 効果 も 
及 伴 さ な い 。 


n は , 1 へ 999 の 範囲 の 1 0 進 整 数 定数 で を けれ ば な ら な 
い 。 n が 記入 され て いな い 場 合 , n は 1 と みな され る 。 


一 般 規則 : 


1. 
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プリ プロ セッ サー を 使用 す る 場合 も 使用 し を い 場 合 も , こと の 
ステ ー ト メン ト を 使用 する こと が で きる 。 こと の ステ ー ト メン 
ト は 前 原始 リス ト お よび 原始 リス ト の 双方 と 対し て 効力 を も 


つ o 


%SKIP ス テー トメ ント の 指示 が 実施 に 移さ れ た 後 , この ス 
テー トメ ント は , プリ プロ セッ サー て よっ て 印刷 され る と と 
を く , コン パイ ラー(C よっ て テキ スト か ら 削 除 さ れる 。 す を な 
わ ち , とこ の ステ ー ト メン ト は リス ト (は 現われ な い 。 

%SKIP ス テー トメ ント の ある 行 (注釈 また は 注釈 の 一 部 が 


・ 言語 解説 書 第 2 部 


記入 され て いて も , と れ は 無視 され , リス ト は 現われ を ない 。 


プリ ブロ セッ サー を 使用 する 場合 , あ SKIP ス テー トメ ント 
が 他 の 1 つ 以 上 の ステ ー ト メン ト と 同じ 行 に 記入 され て いる 
と , プリ プロ セッ サー は %SKIP ス テー トメ ント を 移動 し て , 
コン バイ ラー 渡さ れる テキ スト で は と の ステ ー ト メン ト が 
他 の ステ ー ト メン ト の な らい ら 行 (て と 来る よう (CC す る 。 し た が っ て , 
前 原始 リス ト で は と の ステ ー ト メン ト の 効果 は 現われ を ない が , 
原始 リス ト で は その 効果 が 現われ る 。 


プリ ブロ セッ サー を 使用 する 場合 ,%SKIP ス テー トメ ント 
の あぁ る 行 の 末尾 に 次 の 行 に また が る 形 で 識別 名 が 記入 され て 
いる と , と の 識別 名 の 2 つの 部 分 は , 連結 され て 1 つの 単語 
(て な る 。 前 の 部 分 が 記入 され て いる 行 に スペ ー ス が 充分 ある 
場合 に は , 後 の 部 分 が その 行 に 移さ れ る 。 ス ペー ス が な けれ 
ば , 連結 され て 1 つ に を っ た 単語 が 新 し い 行 の 冒頭 に 印刷 さ 
れる 。 


n が 当該 ペー ジ の 残り の 行 数 ょ り 大 きい 場合 C は , %SKIP 
ステ ー ト メン ト の か わり と, %PAGE ス テー トメ ント 相当 
する も の が 実行 され る 。 
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と の 節 で は , 当 コ ン バ パイ ラー の も と で 行なわ れる 構造 の マッ プ 作 成 
と 緩衝 域内 の レコ ュー ド の 境界 合せ と つい て 説明 する 。 ブロ グラ ム を 
書く と き C, と の よう な と と を 心 と 留め て 置か を けれ ば な ら な い 場 
合 も ある の で , 本 書 で も これら の 事項 を と り 上げ て 説明 する 。 し か 
し , スト リー スム 式 転 送 を 採用 し て いる プロ グラ マー ある い は 
UNALIGNED 属性 を も つ ( ビ ピット ・ ス トリ ング 以外 の ) デー タ 
を 取り 扱う プロ グラ マー と っ て は , 以下 の 説明 は 不要 で ある 。 以 
下 の 説 明 は , ALTIGNED 属性 を も ゃ つ 構 造 を 取り 扱い レコ ー ト 式 転 
送 ( 特 (と, 位置 指定 方 式 ) を 採用 し て いる プロ グラ マー に 対す る も 
の で ある 。 


構造 の マッ プ 作 成 


大 構造 で も 小 構造 で も , 長 さ , 所 要 の 境界 合せ , お よび ダブ ル ワ ー 
ド 境 界 を 基準 と する 相対 位置 は . その メン バー の 長 さ , 所 要 の 境界 
合せ , お よび 相対 位置 に よっ て 決ま る 。 各 レ ベル ご と 大 次 と れ ら 
の 所 要 事 項 を 決定 し 最後 と 構造 全体 の これ ら の 所 要 事 項 を 決定 する 
過程 を 構造 の マッ プ 作 成 と 呼ん で いる 。 


構造 の マッ プ を 作成 する と き , コン パイ ラー は , 構造 の メン バー 
と メン バー の 間 の 使用 され て いな い 記 憶 域 ( バディ ング ) を 最小 (と 
する 。 コ ンズ イラ ー は , 構造 が 割り 振ら れる 前 C, ( 事実 上 ) 以 
下 で 説明 する 規則 に 従っ て , 構造 の マッ プ 作 成 を 完了 する 。 レコ ー 
ド 式 入出 力 を 使用 する 場合 C ある 構造 必要 を レコード の 長 さ を 決 
め た り , 位置 指定 方 式 の 入出 力 に な いて 構造 の 境界 合せ を 正 し く 行 
な わせ る の 必要 を た パ デ ィ ン グ や 再編 成 の 量 を 決め た りす る に C あ た 
っ て は , ユー ザー は 以下 の 規則 を 理解 し て お か な けれ ば な ら な い 
( 位置 指定 方 式 の 入出 力 C 関 し て は , と の 節 の 「 レ ュー ド の 境界 合 
せ ] を 参照 の と と ) 。 


構造 の マッ プ 作 成 と は , 物理 的 を 操作 を 行なう も る の で は な い 。 以下 
の 説明 の 中 で 「 移 す ] と か 「 オ フ セ モット | と か の 単語 が 使わ れ て い 
る が , と これら の 単語 は 単に 説明 の た め だ け の も の で あり , 記憶 域 の 
中 で 実際 (移動 が 行 な た われ る と と を 意味 し て いる わけ で は な じい 。 構 
造 の 割 振り が 行なわ れる と き に は , マッ プ 作 成 の 結果 と し て , 相対 
位置 は すでに わか っ て いる 。 


ある 構造 全体 の マッ プ を 作成 する と , 項目 ( 要素 , また は , 内 部 
(C ち な ける 個々 の マッ プ が すでに 出来 上 っ て いる 小 構造 ) は , 順次 , 
接合 され て 対 に を っ て ゆく 。 一 旦 あ る 対 が で き 上 る と , と の 対 は ま 
た 別 の 単位 と 対 に な る 1 単位 と し なり, と うし た 操作 が 繰り 返さ れ て 


構造 全体 の マッ プ が 出来 上 る わけ で ある 。 と の 説明 か ら も わか る よ 
らら (て, マッ プ 作 成 の 規則 は 次 の 2 つ 分 類する と と が で きる 。 


対 を 作る 順序 に 関す る 規則 
一 対 の マッ プ の 作成 関す る 規則 


以下 で これ ら の 規則 に つい て 説明 する 。 また , と の 節 の 後 の 方 で は , 
例 を 上 げ て これ ら の 規則 の 適用 C つ いて 詳し く 説 明 す る 。 


注 : と れ ら の 規則 を 理解 する C は , 論理 レベ ル と レベ ル 番 号 と の 


相 信 を 正しく 認識 し な けれ ば な ら な い 。 一 番 大 きい レベ ル 番 号 を も 


つ 項 目 が , 必ず し ゃ 一 番 下 の 論理 レベ ル の 項目 で ある わけ で は な い 。 
構造 の 宣言 で 指定 され て いる レベ ル 番 号 が 首尾 一 買 し て いる 場合 や , 
適当 に 池下 げ さ れ て いる 場合 ( 後 の 方 で 取り 上 げ る 例 を 参照 の と と ) 
は , 論理 レベ ル は 一 目 瞭 然 で も る 。 い ずれ (て せ よ , 構造 の 各々 の 項 
目 の 論理 レベ ル は , 構造 の 宣言 の 最初 か ら 各 々 の 項目 順次 次 の 規 
則 を 適用 する と と KC よっ て 決定 され る 。 


ある 項目 の 論理 レベ ん は, つね と , 直接 と の 項目 を 含ん で い 
る 構造 の 表 理 レベ ル ょ より 1 つ 下 で ある 。 


DCL 1A,4B,5C,5D,3E,8F,7G 


1 2 3 3 2 3 3 


下 の 行 の 数 字 は , と の 宣言 に な ける 各々 の 項目 の 論理 
レベ ル を 示し て いる 。 


対 を 作る 順序 に 関す る 規則 


対 を 作る 順序 は , 次 の よう に し て 決定 され る 。 


1. 論理 レベ ル が 一 番 下 の 小 構造 を 探す (と の 論 理 レ ベル を n と 
する )。 


2. 論理 レベ ル n の 小 構造 の 数 が 2 以上 の 場合 に は , 宣言 の 中 で 
最初 に 出 て 来 た 論 理 レ ベル n の 小 構造 を と る 。 


3 一対 の マッ プ の 作成 関す る 規則 ( 下記 ) < 従っ て , と の 小 
構造 の 中 の 最初 の 2 つの 要素 を 対 に する 。 と の 対 が 1 つの 単 
位 と な る 。 
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4. と の 単位 と 。 ( と の 小 構造 の 宣言 の 中 次 の 要素 が あれ ば ) 
次 の 要素 と で 対 を 作り , より 大 き な 単 位 を 構成 する 。 


5. と の 小 構 造 の 中 の すべ て の 要素 が 1 つの 単位 に まとめ られ る 
まで , 上 の 規則 4 を 繰り 返す 。 と れ が 済む と ,。 と の 小 構造 の 
マッ プ が 完成 し た こと と に な る 。 と と で , と の 小 構造 の 所 要 の 
境界 合せ と 長 さ ( バディ ング を 含む ) が 決ま る 。 と れ 以 後 は , 
プロ グラ マー の 側 で と の 構造 の 宣言 を 変更 し な い 限 り , と れ 
ら が 変化 する と と は を い 。 と の 小 構造 の ダブ プル ワー ド 境 界 か 
ら の オフ セッ ト も す で C 決 め ら れ て いる 。 と の オフ キッ ト は は, 
と の 小 構造 を 含ん で いる 構造 の マッ プ を 作成 する と き KC 重 要 な 
意味 を も る もち, と の よう を マッ プ 作 成 の 結果 変化 する と と も あ 
る と いう 点 C 注 意 す る こと 。 


6. 宣言 の 中 で 論理 レベ ル n( に ある , 次 の 小 構造 と 対し て ( と の 
ょ うな 小 構造 な あれ ば ) , 上 の 規則 3 て 5 を 繰り 返す 。 


7 論理 レベ ル n の 小 構造 の マッ プ が すべ て 完成 する まで , 規則 
6 を 繰り 返す 。 と れ が 済む と , 構造 の マッ プ と いう 観点 か ら 
見 る 限り , これ ら 各 々 の 小 構造 を 1 つの 要素 と みな すこ と が 
で きる 。 


8. 次 の 論理 レベ ル の 小 構造 と 対 し て , これ まで の 操作 を 繰り 返 
す 。 すなわち , n を (n 一 1 ) と 置き , 規則 2 一 7 を 繰り 返 
す 。 


の n 王 1(C て を な る まで 規則 8 を 繰り 返す 。 次 いで , 大 構造 対し 
て 規則 3 て 5 を 繰り 返す 。 


一 対 の マッ プ の 作成 に 関す る 規則 


( す で (Cc 述べ た 通り , と と で は 明らか K 物 理 的 を 記憶 装置 を 指す 
用 語 を 使用 し て いる が , と れ は 単に 説明 の 便宜 を 図る た め の も の で 
ある 。 これ ら の 用 語 が 意味 し て いる 記憶 装置 は , ダブ ル ワ ー ド が 数 
多く 並ん で いる 想像 上 の モデ ル で ある と 考え て も よい 。 各々 の ダブ 
ル ワ ー ド C は 0 7 の 番号 を も つ 8 つの バイ ト が ある と 考え れ ば , 
ダブ プル ワー ド 境 界 か ら の オフ セッ ト を 表わす と と が で きる 。 さら (と, 
と の モデ ル の バイ ト C は , 任意 の バイ ト を ゼロ と し て 始ま る 一 連 番 
号 も つい て いる と 考え れ ば , 構造 の 始ま りか ら の 長 さ と オフ セッ ト 
を 表わす とこ と が で きる 。 ) 


1. 対 の 最初 の 項目 を ダ プ ル ワ ー ド 境界 に 揃え る 。 ある いら は, と 
の 項目 が すでに マッ プ の 出来 上 っ た 小 構 造 で ある 場合 に は , 
ダ プ ルッ ワー ド 境 界 か ら 指 示さ れ て いる 距離 だ け 離 れ た 位置 に 
と の 項目 を 思 く 。 
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2. 対 の も 9 一 方 の 項目 を , 最初 の 項目 の 後に ある 最初 の 有効 を 
位 還 (に 揃え る 。 と の 位置 は , 2 番目 の 項目 の 要求 する 境界 合 
せ (C て よっ て 決ま る 。 種々 の 要素 が 要求 する 境界 合せ と 長 さ を 
図 K.1 と 図 K.2 に 示す 。 ( と の 項目 が 小 構造 で ある 場合 に は , 
これ 必要 な 境界 合せ は す で C 決 定 さ れ て いる 。 ) 


3 最初 の 項目 IC 必 要 な 境界 合せ が 許す 限り , 最初 の 項目 を 2 番 
目 の 項目 の 方 C ず らち せる 。 と うし て ずら せ た 距 離 が , この 対 
の ダブ プル ワー ドド 境界 か ら の オフ セッ ト で ある 。 


上 述 の 操作 が 完了 する と , 2 つの 項目 の 間 の バディ ング が 最小 化 
され た と と (C て なり, と の パ デ ィ ン グ は と れ 以 後 の 操作 に お な いて 変化 
する と と は な を い 。 と の 時 点 で , と の 対 は , 固定 長 で , 所 要 の 境界 合 
せ を も つ 1 つ の 単位 と 考え る と と が で きる よら (て な る 。 す を わ も , 
と の 対 の 長 さ は , 2 つの 項目 の 長 さ と バディ ング の 和 で あり , 所 妥 
の 境界 合せ と は ( 2 つの 項目 の 境界 合せ が 異な る 場合 に は ) 大 き 
い 方 の 境界 合せ で ある 。 


UNALIGNED 属性 の 効果 


以下 で 取り 上 げ る 構造 の マッ プ 作 成 の 例 は , ALIGNED 属性 を も 
つ 構 造 に マッ プ 作 成 の 規則 が 適用 され る 状況 を 示す た め の も の で あ 
る 。 異な る 境界 合せ が 数 多く あれ ば , ALIGNED 属性 を も つ 構 
造 の マッ プ 作 成 の 方 が より 複雑 で ちあ る た め , と の よう な 例 を と り 上 
げた 。 一 般 C, UNALIGNED 属 性 を 適用 する と , フル ワー ド の 
境界 合せ や ヤダ プル ワー ド の 境界 合せ は バイ ト の 境界 合せ に 下げ られ , 
ビット ・ ス トリ ング の 境界 合せ は バイ ト か ら ビ ッ ト (C 下 げ ら れる 。 
構造 の マッ プ 作 成人 CC 関す る 規則 は いずれ の 場合 CC も 同じ で ある が , 
UNALIGNED 属 性 を も つ 構 造 に な いて は 境界 合せ の 所 要 条 件 が 
下げ られ る わけ で ある 。 し た が っ て , 項目 と 項目 の 間 の 使用 され な 
い 記 憶 域 は 。 バ イト 内 の ビッ ト ・ バ ディ ング だ け で あっ て , バイ ト 
ペデ ィング に C な る と と は な いら 。 構造 に ビッ ト ・ ス トリ ング が 含ま れ 
て いる 場合 に は , ビッ ト ・ バ ディ ング が 行なわ れる 。 


REVENT デ ー タ や AREA デ ー タ (CC は , UNALIGNED 属性 
を 与え る と と が で き な ぃ い 。 UNALIGNED 属性 を ゃ つ 構 造 の 中 
(C て と の ょ う 5CUNALIGNED 属性 を も ち 得 を い 要 素 が 含ま れ て 
いる 場合 に は , と の 要素 に つい て は UNALTGNED 属 性 が 無視 さ 
れる 。 す な わ ち , コン バイ ラー は と の 要素 を ALTGNED 属性 を ゃ 
つも る の と し て 処理 し た 後 , テラー・ メ ッ セ ー ジ を 印刷 する 。 た と を え 
ば , ある プログ ラム の 中 KK 次 の よう な 宣言 が か ある も の と する 。 


DECLARE 1 A UNALIGNED, 
2 B, 
の RDACWcO0DD)9 


と の 場合 , C が 受け 継い だ 属性 UNALTIGNED は , AREA 属性 
と 両立 し 得 た い の で , CC は ALIGNED 属性 が 与え られ る 。 


に 


計算 機内 部 で は 所 要 記 六 域 の 大 き さ 所 要 の 、 


BIT(n) 8 ビ ピット の グル ー プ ど と (1 バ CEIL(n/8 ) 
イト (また は その 一 部 ) 
CHARACTER(n) 1 文字 (CC つ き 1 バイ ト n 
バイ ト 


デー タ は 0 と / の 間 
の 任意 の バイ ト か ら 
始ま る こと と が で きる 


PICTURE 各 PICTURE 文字 ご ど と (て C | V と 氏 を 除く 
1 バイ ィ ( た だ し , V と 氏 を PICTURE 文字 の 数 
除く ) 


バッ ク 1 0 進数 形式 CEIL((P 十 1 ) グ 2 ) 
( 数 字 1 つ に つき 1 グ 2 バイ ト 


十 特 号 の た め の 1 ン 2 ベイト) 


BIT(n)VARYING 2 バイト の 接頭 語 を も る つ 2 填 CEIL(n ノ 8 ) 
BIT(n) と 同じ 
6 


2 バイ ト の 接頭 語 を も つ 2 洲 
CHARACTER(n) と 同 
じ 


DEC IMAL FIXED(p,q) 


デー タ が 始ま る ベイ 
ト は 0 , 2 ,4, ま 
た は 6 の バイ ト だ け 
で ある 


CHARACTER(n) 
VARYING 


BINARY FIXED(p,q) 
p く =15 


ハー フワ ー ド の 


2 
2 進 整数 
4 
OFEF SET 
2 


1 5 


p > 


BINARY FLOAT(p) 
p く 22 


DECIMAL FLOAT(p) 
p く 7 


デー タ が 始ま る バイ 
ト は 0 また は 4 の ベ 


POINTER イト だけ で ある 


LABEL 
EVENT 


21 ぐ p く 54 長 精 度 
浮動 小数 点数 
DECIMAL FLOAT(p) 
6 ぐ p ぐ 17 
トー 


図 色 1 ALIGNED デー タ の 境界 合せ の 要件 


デー タ が 始ま る バイ 
ト は バイ ト 0 だ け で 
ある 


フル ワー ド の 
2 進 整数 
短 精 度 
癌 動 小数 点数 
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構造 の マッ プ 作成 の 例 4 Q CHARACTER(5 ) , 
4 R FLOAT DECIMAL( 2 ), 


3 8S, 
と の 例 は , 以下 の ょ 2 宣言 され て いる 構造 と 対し て , マッ プ 作 成 4 T FLOAT DEC IMAL(15), 
の 規則 が どり 適用 され る か を 示す も の で ある 。 4 U BIT(3), 

4 V CHARACTER( 1 ) , 
DECLARE 1 A ALIGNED , 3 W POINTER. 


2 B POINTER , 2 又 PICTURE !'$92V99 ヶ 9!: 


2 C, 
3 D FLOAT DECIMAL (14) . 
3 BE. 
4 F LABEL 論理 レベ ル が 一 番 下 の 小 構 造 は ば で ある か ら , まず 最初 C せ の マ 
4 G, ッ プ が 作ら れる 。 次 いで の マッ プ 作 成行 な われ, と の 後 順に N, 
5 H CHARACTER(2 ) , S, C, M の マッ プ 作 成行 を われ る 。 最後 C 大 構造 人 の マッ プ が 
内 誠に 作ら れる 。 各々 の 構造 ど と と C, マップ 作成 の 手順 を 示す 表 と と の 手 
3 K CHARACTER( 2), 順 を 図解 する を め の ダ イヤ グラ ム を 収録 し て ある 。 
3 L FIXED BINARY(20.0). 最後 (C, A の 構造 マッ プ が , A の 先頭 を 基準 と する 各々 の メン バー 
2 ML, の オフ セッ ト を 示す 表 の 形 で 示さ れ て いる 。 
3 N 


4 P FIXED BINARY(5)。, 
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| き ml 


デー タ は ズバ イト DC て 
7 の 中 の 任意 の ビッ 
ト か ら 始 まる 


6 計算 機内 部 で は 所 妥 記 憶 域 の 大 き さ 
BIT(n) バイ ト の 境界 に は 関係 な く , 
必要 な 数 だ け の ピット 


BIT(n)VARYING 2 バイ ト の 接頭 語 を も つ 
BIT(n ) と 同じ 


所 要 の 
境界 合せ 
引 蘭 


2 パイ ト 二 ゼット 


CHARACTERKR(n) 
VARYING 


PICTURE 


DEPEC IMAL FIXED(p,q) 


2 バイ ト の 接頭 語 を も つ 
CHARACTER(n) と 
同じ 


PICTURE 文字 1 つつ 
き 1 ベイト (た だ し , V と K 
を 除く ) 


V と KK を 除く PICTURE 
文字 の 数 


CEIL((p 二 1) グ 2 ) 


パッ ク 1 0 進数 形式 

(数字 1 つ に つき 1 ググ 2 バイ 
ト 十 符号 の た め の 1 グ 2 ズ ベイ 
ト ) 


デー タ は 0 7 の 任 
意 の バイ ト か ら 始 ま 
る 


BINARY FIXED(p,q) 
p く < 三 15 


ハー フワ ー ド の 
2 進 整数 


p>15 


BINARY FLOAT(p) 
p ぐ 22 


短 精度 
浮動 小数 点数 


DECIMAL FLOAT(p) 
p く 7 


POINTER 


長 精度 
浮動 小数 点数 


注 : EVENT デ ー タ と AREA デー タ C は UNALIGNED 属性 を 与え る と と が で き な い 。 


BINARY FLOAT(p) 


21 ぐ p ぐ 54 


DBEBCIMAL FLOAT(p) 
6 ぐ p ぐ 17 


図 KK2 UNALIGNED デー タ の 境界 合せ の 要件 
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ダブ ル ワ ー ド 境界 
* の オ セ 
項目 の 名 前 長 3 3 


* 最初 の 項目 は 右 C て ずら され る 


図 K3 小 構造 G で の マッ プ 作 成 
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ダブ プル ワー ド 境 界 
ゝ らら の オフ セ バ ペデ ング ュ 
項目 の 名 前 PY3 ッ ト ディ ング の 世 か ら の 
長 さ オフ セッ ト 


ステ ッ プ 1 F 
ae e 
ステ ッ プ 2 
ステ ッ プ グ 3 
ァ ァ ィ 吉 前 ダ : 天 環 加 5 
* 最 初 の 項目 は 右 に ずら され る 
ステ ッ プ 1 


「 G 
2 テ 4 証 IEEHHBEEHB///HEHHEHEEEEHIBBEBEE 


F G メ 
ァ アーーーー ハ ーーーー ヘ 
2 た 清 HEEEEEBHEHB//BMHIBHEEEEHHBEEEEE 


図 K.4 小 構造 蘭 の て ッ プ 作成 
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ステ ッ プ 2 


ステ ッ プ 1 


ステ ッ プ 2 


所 要 の 


図 K.5 小 構造 N の マッ プ 作 成 
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ダダ プル ワー ド 境 界 
ヽ 月 か ら の オフ セッ ト 


スネ ステップ 1 


ステ ッ プ グ 2 


に - 
ステ ッ プ 1 
ステ ッ プ 2 
Ne 
図 K.6 小 構造 S の マッ プ 作 成 
Nu 
5 
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CA 
1 
項目 の 名 前 0 


ステ ッ プ 1 


ステ ッ プ 2 


ステ ッ プ 3 


E( 長 さ 24) 


ステ ッ プ 1 HHHP ロ BZPDIIPHDPDPPDUPPCPPD 


E ( 長 さ 24 ) K 
と ーーー デー ニー ニー デー デ デニ ーーーーーー ベ ーー テース 


ッッ フ 2 HHPH ロ 7277 ロ DIPHPPPODP ロ OHPDODL 


ES 


D 
ステ ッ プ s EE EMFEEEEEFi 


ペーー ーー 一 ーー 一 ーー ンーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 一 プ 


KK.7 小 構造 C の マッ プ 作 成 
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ダブ プル ワー ド 境 界 
か ら の オフ セッ ト 


ステ ッ プ 1 


6 


ステ ッ プ 2 4 


ステ ッ プ 3 


* 最 初 の 項目 は 右 C に ずら され る 


スズ ステップ 1 


ステ ッ プ 2 


ステ ッ プ 3 る 


図 K.8 小 構造 M の マッ プ 作 成 
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項目 の 名 前 所 長 さ か ら の オフ セッ ト 


ステ ッ プ 2 


ステ ッ プ 3 


ステ ッ プ 4 


* 最 初 の 項目 は 左 に ずら され る 


C( 長 さ 44 ) 
rー 一 一 一 ブーーーーー ハ 


B 
ーーーー バ ーーー ハ 
|] 引 


自身 回 回 


B C 
ーーーー デ ーーーー ホ ーーーー ニ ーーー バ 
22 ん 前 IIEEEEEBEHHIIBEHEEHBBEBEEEH 


B C M( 長 さ 28 ) 


ーーー ベ ーーー へ ーーーー ペ ーーーー ヽ ーーーーーーーーーーーーーー ペ ーーーーーーーーーーーーー ハ 
ss TEEEEEE EEEEhEEEEEE 
B C M X 
エニ ーー クーーー つ ーーー テー ャ ーーーーーーー テ ーーー ーーー ニ ーーーーーー テ ーー ズー テテ ーー クー 
2222 ん IEEEEEEIIEEEBEEIBEBBEHEEEEEBEE 


\ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー ヘ シア ーーーーーーーーーーーーーーーーーーーーー ーーー ノ 


A( 長 さ 8 0 ) 


図 KK.9 大 構造 人 の マッ プ 作 成 
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が ディ ャ ング (し 4) 


エド 
バディ ング (2 ) 


図 K.10 大 構造 A の 最終 的 を マッ プ 作 成 C な ける オフ セッ ト 


レコ ー ド の 境界 合せ 


位置 指定 方 式 の 入出 力 を 取 り 扱 場合 C は , ユー ザー は 緩衝 域内 で 
の レコ ー ド の 境界 合せ と 注意 し な けれ ば を ら な じい 。 緩衝 域 の 中 で は , 
ある プロ ッ ク の 中 の 最初 の レコ ュー ド の 最初 の デー タ ・ バ イト は 通常 
ダブ プル ワー ド 境 界 ( と 揃え られ る ( 図 K.14 を 参照 の と と )。 次 の レ 
コー ド は , 緩衝 成 の 中 で 次 (使用 可能 な バイ ト か ら 始 まる 。 ユー ザ 
ー の 側 で は , と の バイ ト の 境界 が ,. と の レコ ー ド と 結び 付け られ る 
基底 付 変数 の 所 要 境 界 と 一 致す る よう 配慮 し た けれ ば な ら な を な い 。 


プ ブロック 化 レ コー ド の 場合 は , レコ ュー ド 長 (RECSTZE) が 8 の 
倍数 で ある を た ら ば , ブロ ッ ク 内 の 各々 の レコ ー ド の 最初 の デー タ ・ 
バイ ト は 必ず , ダブ ル ワ ー ド 境界 に 揃え られ る 。 ASCTT デ ー タ ・ 
セッ ト か ら 読 み 取 られ た デー タ し 関し て は , ブロ ッ ク 接 頭 語 の 最初 
の バイ ト が ダブ ルッ リー ド 境 界 と 揃え られ る 。 最初 の レコ ー ド の 最初 
の バイ ト も ダダ ブル ワー ド 境 界 に 揃え られ る よう (CC する C は , 接頭 語 
の 長 さ は 8 ベイト の 倍数 か ら 4 を 引い た 値 で を けれ ば を ら な い ( と 
の 4 は, レコ ュー ド 長 バイト の 長 さ で ある )。 


以下 で 説明 する 境界 合せ の 問題 の 多く は , ALIGNED 属性 を も 
つっ 基底 付 変数 た いし ALIGNED 属性 を も つ 基 底 付 で を い 変 数 C ぉ 
いて 見 られ る も の で ある 。 と れ ら の 変数 が UNALIGNED 属性 を 
も っ て いる 場合 に は , 緩衝 域 と な いて レコ ー ド の 所 定 の 境界 を 維持 


する の は 前 者 に くら べ て は る か と 容易 で ある 。 


次 の よう な 構造 に よっ て 定義 され て いる 論理 レコ ュー ド を 用 いて 
VB 形 式 レコ ュー ド を 作成 する も の と しょ う 。 


1 S, 


2 A CHAR(1), 
2 B FIXED BINARY(31,0): 


こと の 構造 の マッ プ は 図 KK.11 の よう に な る 。 


IA | B 
1 1 1 
W W W 
W ニ テッ ワー ド 境 界 
図 代 .11 構造 S の 形式 


ーー 連 の WRITE FROM(S ) ス テー トメ ント を 用 いて ブロ ッ ク が 
作成 され ん た と する と , と の ブロ ッ ク の 形式 は 図 K.12 に 示し た よう 
(て な る 。 と の 図 か ら , 緩衝 域 C ぉ な ける 境界 合せ と S の 境界 合せ と が 
異な っ て いる と と が わか る で あろ ら 。 


移動 方 式 の READ ス テー トメ ント ( た と を え ば, READ INTO ) ) 
を 用 いて ファ イル を 読み 取 る の で あれ ば 問題 は を い 。 何故 を ら ば , 
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BL | R し 代 B | RL IA Il B | 


D W D W D W 
BL し 三 プロ ッ ク の 長 さ D ニダ ブル ワー ド 境 界 
RL 三 レコ ー ド の 長 さ W テッ ー ド 境界 


図 KK.12 構造 S か ら 作成 され る プ ブロック 


BL | RL ] PAD | Al B | RL | PAD | Al B 
1 1 † † † 1 人 1 
D W D W D W D W 
BL 三 プ ロッ ク の 長 さ D テ ダブ プル ワー ド 境 界 
RL 三 レコ ー ド の 長 さ W ニテ ニッ ー ド 境界 


図 KK.13 構造 SC よっ て 作成 され る , 正しく 境界 合せ され た プロ ッ ク 


CONSECUT IVE 1 三 レコ ー ド の 長 さ 
F , V ,D , ぉ ょ び U デー タ EK = ニ 内 蔵 さ れ た キー 


FB 


VB お ぉ お ょ よび DB 


IN DEXED 
F 


KEYLOC=0 
また は , 無 指定 
KEYLOC=1 


KEYLOC> 1 


KEYLOC=-1 EK | | EK Il | 


< ぐー- デー ターー-> で ーー-- デー ター--> 
IEK| | EKI 1 


< ぐ - デ ー タ ツ で - デ ー ター ツ > 


KEYLOC> 1 


REGIONAL 
F, ぉ よび U 


図 KK.14 位置 指 定 方 式 入出 力 に お ける 緩衝 域内 の デー タ の 境界 合せ 
( 形式 別 , デ ー タ ・ セ ッ ト 編 成 別 ) 
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情報 は 緩衝 域 か ら 正 し く 境 界 合せ され た 記憶 域 へ 移さ れる か ら で あ 
る 。 


し か し ,。 た と えば , 次 の ょ う 定 義 さ れ た 構造 が か ある と き (C, 


1 SBASED BASED(P) LIKE S: 


READ SET(P) ステ ー ト メン ト を 使用 し た 場合 Cc に は, ブロ ッ ク 内 
の 最初 の レコ ー ド と し て SBASED.B を 参照 する と , ダブ ルウ ワー 
ド 十 1 バ イト (揃え らん た デー タ を 参照 し た こと (C な り , 恐らく , 
指定 割込み を 引き 起こ と す と と に を る で あろ 25。 


最初 に ファ イル を 作成 する と き !C, 次 の ステ ー ト メン ト を 使用 し 
て いる 場合 に も , 同じ 問題 が 生ずる で あろ ら 5。 


LOCATE SBASED SET(P) : 


と と で も , ブロ ッ ク 内 の 最初 の レコ ー ド 関し て P は ダブ ル ワ 
ー ド を 指す よう セッ ト さ れ , SBASED.B へ の 参照 は 誤り (C を る 
で あろ 29。 


いずれ の 場合 C に も, B が つね (正しい 境界 IC 揃 えら れる よう , と 
の 構造 に 次 の よう を な パ デ ィ ン グ を し て お け ば , と の ょ うな 問題 を 回 
避 す る と と が で きる 。 


1 S, 
2 PAD CHAR(3 ), 
2 A CHAR(1), 
2 B FIXED BINARY(31.,0): 


と うす る と , ブロ ッ ク 形 式 は 図 K.13 の よう (CC な り , B は つね と ワ 
ー ド 境界 揃え られ る 。 正しい 境界 合せ を 維持 する た め と , 構造 の 
始 り と 終り (に ペデ ィング が 必要 (C な る 場合 も ある 。 


緩衝 域内 に な ける 種々 の タイ プ の レコ ー ド の 境界 合せ を 図 K.14 
示す 。 デー タ ・ セ ッ ト の 編成 お よび レコ ー ド ・ タ イプ 関係 を く , 
ブロ ッ ク 内 の 最初 の デー タ ・ バ イト は つね に ダブ ルリ ワー ド 境界 K 捕 


えら れる 。 と れ 以 降 の レ ュ ー ド の 緩衝 域 C な ける 位置 は 。 レコ ー ド 
形式 に よっ て 決ま る 。 


索引 ファ イル を 対象 と し て 順次 方 式 の 入力 を いし 更新 を する 場合 

は , あふ れ 域 か ら レ コー ド が 取り 出さ れる と と が ある 。 と の 種 の レ 
コー ド C は , 冒頭 に , 1 0 ベイ ト の 順序 連係 フィ ー ル ド が つい て い 
る の で , READ SET ステ ー ト メン ト は , 隠さ れ た 緩衝 域 を 使用 
し て , 各 レ ュー ド の 最初 の バイ ト が ダブ プル ワー ド 境 界 (C 揃 えら れる 
よら て する 。 


調節 可能 を な エク ステ ント を 含ん で いる 基底 付 変 数 ( す を わ セ も , 
REFER オ プシ ョ ン を も $ ゃ つ 基 底 付 変数 ) と 結び つけ て 位置 指定 方 式 
入出 力 を 使用 する 場合 に は , 特殊 な 問題 が な 生 ずる 。 た と えば , 次 の 
ょ ら な 構造 が か ある も の と し ょ 2 う 。 


1 S BASED(P), 
2 N, 
2 C CHAR (L REFER (N)): 


位置 指定 方 式 入出 力 を 用 いて と の タイ ブ の V 形 式 プ ロッ ク 化 レコ ー 
ド を 作成 する と すれ ば , レコ ー ド の 境界 合せ は , N が ハー フワ ー ド 
境界 【C 揃 えら れる よう な も の で を けれ ば な ら な い 。 上 が 2 の 倍数 で 
を い 場 合 , 現在 の ヒレ ュー ド の 境界 合せ が 正しけれ ば , 次 の レ ュ ー ド 
の 境界 合せ は 正しく な く を る 。 し か し , 次 の よら な 工夫 を すれ ば 境 
界 合せ を 正しく する と と が で きる 。 


LENGTH = ニレ: 
ノ * SAVE DESIRED LENGTH 上 エ ネン 
L 三 2* CEIL(L ン 2 ) : 
ノ * ROUND UP TO MULTIPLE OF 2 * ン 
LOCATE S FILR(F): 
N = LENGTH: 
ノ * SEPT REFER VARIABLE * ノ 


他 の 文脈 で REFER オ プシ ョ ン を 使用 し て いる 場合 に も , この 手法 
を 応用 する こと が で きる 。 
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アク セス (acecess ): デー タ を 参照 し て か ら こ と これ を 取り 出す 
至る まで の 操作 。 


値 の 計算 ( evaluation ) : 式 を ある 1 つの 値 , また は , 値 の 
配列 , また は , 値 の 構造 に 移し か を える と と 。 


アド レス (address ): 記憶 装置 内 に な いて , デー タ 項 目 を 貯 
を る と と の で きる 特定 の 場所 。 


暗示 的 な 解放 ( implicit opening ): OPEN ステ ー ト メ 


ント 以外 の 入出 力 ス テー トメ ント の 結果 と し て , ファ イル を 開く と と 。- 


暗黙 宣言 ( implicit declaration ) : 明示 宣言 も 文脈 宣 
言 も $ 行 を われ て いな を ゆい 識別 名 を , 名 前 と し て 定義 させ る と と 。 と の 


識別 名 に は 一 組 の 省略 時 属性 が 適用 され る 。 


入口 式 ( entry expression ): 式 の 値 を 計算 し た 結果 が 入 
品 値 で ある よう な 式 。 


入口 定数 ( entry constant ): 入口 名 。 


入口 値 ( entry value ): 入口 定数 に よっ て 表わさ れる 入口 点 。 
と の 値 C は , 当該 入口 定数 と 結び 付い て いる 活用 化 の 環境 も 含ま れる 。 


入口 点 ( entry point ): プロ シー ジャ ー の 呼出 し を その 地点 
か ら 行 な うと と が で きる よら な , プロ シー ジャ ー 内 の 地点 。 ( 主 入 
口 点 , 副 次 入口 点 を 参照 の と と 。 ) 


入口 変数 ( entry variable ): 入口 値 を 表わす と と の で きる 
変数 。 と の 変数 は ENTRY, VARIABLE 両 属性 を も つも る の 
で な けれ ば な ら な い 。 


入口 名 ( entry name ): (VARIABLPE 必 性 が 与え を られ て 
いな を い 場 合 ) ENTRY 属 性 を る つも の と し て 明示 的 を いし 文脈 的 
(て 宣 言 さ れ て いる 議 別名 , また は , ENTRY 属 性 が 暗示 され て い 
る 識別 名 。 入 口 変数 の 値 。 


引数 ( argument ) : ブ プロシージャー 参照 の 一 部 を を なす 引 数 リ 
スト の 中 の 式 。 


因数 化 (factoring ): いく つか の 名 前 を 括弧 で 囲ん で 入れ た 
リス ト 人 て , 1 つ 以 上 の 属性 また は 1 つの レベ ル 番 号 を 適用 する こと と 。 


引数 リス ト (argument list ): 入口 名 定数 , 入口 名 変数 , 
総称 , また は 組込み 関数 名 の 後 (て 記入 され る , コン マ で 区 切ら れ た 


1 つ 以 上 の 引数 を 括弧 で くく っ た リス ト 。 と の リス ト は 入口 点 の バ 
ラメ ー タ ー に 渡さ れる 。 


イン ター リー ブ さ れ た ( 非 連 続 の ) 配列 ( interleaved array ): 
連続 し て い を い 記 憶 域 を 参照 し て いる 名 前 を も つ 配 列 。 


英字 (alphabetic character ): 英語 の アル ファ ベッ ト A 
て と アル ファ ベッ ト の 付属 文字 す #, $, あお よび @ の 中 の 任意 の 文 
字 ( 付属 文字 の 表示 は 国 に より 異 ん る と と が ある )。 ' 


英 数 字 ( alphameric character ) : 英字 また は 数字 。 


エク ステ ント ( extent ) : 


1 配列 の 次 元 の 限界 に よっ て 示さ れる 範囲 , スト リン グ の 長 さ 
(て よっ て 示さ れる 範囲 , また は エリ ア の 大 き さ に よっ て 示さ 
れる 範 囲 。 


2. エリ ア 内 の 有効 を 割 振り 。 
エピ ロー グ ( epilogue ): ブロ ッ ク が 終了 する と き 自 動 的 K 行 
を われ る 操作 。 


エリ ア ( area ) : エリ プ 変 数 C よ っ て 識別 され る , 連続 し た 主 
記憶 域内 の 官 言 さ れ て いる 部 分 で あり , 割 振り の と き K, 基底 付 変 
数 を 割り 振る た め 確 保 さ れる 。 


エリ プア 変 数 ( area variable ) : AREA 属 性 を も つ 変 数 。 
と の 変数 の 値 は エリ ア K 限 られ て いる 。 
胃 隔 形式 項目 ( remote format item): 形式 り ス ト の 中 


で , 他 の FORMA 和 T ス テー トメ ント の ラベ ル と いっ し ょ 指定 さ 
れる , R と いう 文字 。 


演算 子 ( operator ): 行 ら べき 演算 を 指定 する 記号 。 算 術 演 算 
子 , ビッ ト ・ ス ト リ ング 演算 子 , 比較 演算 子 , 連結 を 参照 の と と 。 
賃 算式 ( operational expression)・ 1 つ 以 上 の 演算 子 
を 含ん で いる 式 。 


オプ ショ ン ( option ): ステー トメント の 中 で 指定 し て , その ス 
テー トメ ント の 実行 方 法 を いし 解 紀 CK 何 ら か の 影響 を 与え を る た め の 指定 。 


オフ セッ ト 変 数 ( offset variable ): OFFSET 属性 を 
も つ ロ ケー ター 変数 。 こ の 変数 の 値 は , エリ ア の 始 り を 基準 に し て , 
記憶 域内 の 場所 を , 識別 する も る の で ある 。 


オペ ラン ド ( operand ) : その 値 演 算 子 が 適用 され る 式 。 


オン ・ ユ ニッ ト ( on-unit ): と れ が 含ま れ て いる ON ステ ー 
トメ ント で 指名 され て いる ON 条件 が 検出 され た と き に と られ る 処 


置 。 た だ し , SYSTEM と SNAP を 除く 。 
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回 帰 的 ブロ ョ シー ジャ ー(recursive procedure ) : まだ 活 
用 状態 C あ る 間 C 再 度 活用 化す る と と の で きる プロ シー ジャ ー。 


解禁 状態 ( enabled ) : ある ON 条件 が 引き 起 さ れ た 結果 プロ 
グラ ム 割 込み が 引き 起こ と され る ょ うな 状態 を いう 。 


介在 添字 ( interleaved subscripts ) : 添字 付 の 修飾 さ 
れ た 名 前 の 場合 に 使用 され る 添字 表記 法 で あり , それ 必要 を すべ 
て の 添字 が その 構成 要素 名 の 直ぐ 後に 記入 され て いな を いも の 。 


開始 ブロ ッ ク ( begin block ): BEGIN ステ ー ト メン ト (C 
始ま り EEND ス テー トメ ント で 終る 一 連 の ステ ー ト メン ト の 集 り で , 
プロ グラ ム の 一 部 を を な す と 共に , 名 前 の 有効 範囲 を 限定 し , 制御 の 
正規 の 遂 次 的 を 流れ (に と よっ て (GO TO ステ ー ト メン ト K 起 因 す 
る プラ ンチ も 含む ) 活用 化 さ れる も の 。 


外部 プロ ンー ジャ ー( external procedure) : 他 の プロ シ 
ー ジ ャ ー《 含 まれ て い を い プ ロ シ ー ジ ャ ー。 


外部 名 ( externa1 name ) : 有効 範 界 が , 必ず し ゃ , 1 つの 
プロ ッ ク な ら び に と れ K 含 まれ て いる プ ブロック KK 限定 され て いな い 
( EXTERNAL 属 性 を も つ ) 名 前 。 


開放 (ファ イル の ) (opening(of a file) ) : ファ イル 
と デー タ ・ セ ッ ト と を 結び 付け , と の ファ イル 名 に 与え る べき 属性 
の すべ て を 確定 する と と 。 

返さ れる 値 ( returned value ): 関数 プロ ンー ジャ ー(《 よ っ 
て 呼出 し 点 と 返さ れる 値 。 


下限 ( 1ower bound ) : 配列 の ある 次 元 の 下方 の 限界 。 


仮想 上 の 小数 点 ビ ピクチャー 文 字 ( virtual point picture 
character ): ピク チャ ー 指 定 に な いて 1 0 進 小数 点 の 仮想 上 
の 位置 を 示す の 使用 され る ピク チャ ー 指 定 用 文字 V。 


活用 化 ( プロ ッ ク の ) (activation(of a block ) ) : 
1 ブロ ッ ク を 活用 化す る た め の 操 作 。 
2. ブロ ッ ク の 実行 。 


活用 化 ( プリプロセッサ ー 変 数 また は 入口 名 の ) ( activation 
(of a preprocessor variable or entry name ) ) ・ 
変数 の 値 の 置換 えま た は 入口 名 の 返さ れ た 値 の 置換 え が 可 能 を 状態 
(て する と と 。 最初 の 活用 化 は , %DECLARE ス テー トメ ント K 名 
前 が 出 て 来 た 結 果 行 を われ た も の で を けれ ば を ら な を ない 。 変数 また は 
入口 名 の 状態 が , %DEACTIVATE ス テー トメ ント よっ て , 
活用 状態 か ら 非 活用 状態 に 切り 替え られ た 後 , ACTIVATE ス 
テー トメ ント (人 て よっ て これ を 再び 活用 化す る こと と が で きる 。 
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活用 化す る ( プロ ッ ク を ) (activate(a block)): ブロ 
ッ ク の 実行 を 開始 する と と 。 プ ロロ シー ジャー・ ブ ロッ ク は , その い 
ずれ か の 入口 点 を 用 いて 呼び 出さ れ た と き に 活用 化 さ れる 。 開始 プ 
ロッ ク は , 正規 の 制御 の 流れ ( プラ ンチ を 含む ) の 中 に その 開始 ブ 
ロッ ク が 出 て 来 た と き K 活 用 化 さ れる 。 


活用 状態 ( active ) : 


1 活用 化 の 後 , 終了 に 至る まで の ブロ ッ ク の 状態 。 


2. プリ プロ セッ サー 変数 また は プリ プロ セッ サー 入口 名 の 値 に 
よっ て 原始 アロ グラ ム ・ テ キス ト の 中 の と れい 対 応 す る 識別 
名 を 置き 換え る と と が で きる と き の , と の 変数 また は 入口 名 
の 状態 を いう 。 


3. 事象 変数 が 非同期 操作 と 結び 付け られ て いる と き の , と の 変 , 
数 の 状態 を いう 。 事象 変数 は , と の 事象 変数 を 指定 し て いる 
WAIT ステ ー ト メン ト が 実行 され る まで は , 活用 状態 に と 
どまり , と の 間 , と の 変数 を 他 の 操作 と 結び 付け る と と は で 
き な い 。 


環境 ( 活用 化 の ) ( environment(of an activation ) ) : 
ブロッ ク の 呼出 し 関連 する 情報 で あり , 呼び 出さ れ た を ブロック の 
中 で , と の ブロ ッ ク の 外部 で 宣言 され て いる デー タ へ の 参照 の 解釈 
に 使用 され る も の 。 と の 情報 に は , 自動 変数 の 諸 世 代 , 被 定義 変数 
の エク ステ ント , パラ メー ター の 諸 世 代 が 含ま れる 。 


環境 ( ラベ ル 定 数 の ) ( environment(of a labe1 
constant ) ): ステ ー ト メン ト ・ ラ ベル 定数 へ の 参照 が 適用 さ 
れる , ブロ ッ ク の ある 特定 の 呼出 し の 識別 。、 ス テー トメ ント ・ ラ ベ 
ん 定数 が 引数 と し て 渡さ れる と き , また を は ステ ー ト メン ト ・ ラ ベル 
定数 が ステ ー ト メン ト ・ ラ ベル 変数 に 割り 当て られ る と き (C, と の 
情報 は 確定 し , ステ ー ト メン ト ・ ラ ベル 定数 と いっ し ょ K 渡 され る 
か また は 割り 当て られ る 。 


緩衝 域 (buffer ): 入出 力 操作 に ぉ な いて 使用 され る 中 間 記 憶 域 
で あり , 入力 の と き C は レコ ー ド が そ と KK 読み 込 を れ , 出力 の と き 
(C は レコー ド が そ と 書き 出さ れる 。 


関数 (function ): 関数 プロ シー ジャ ー (プロ グラ マー が 指定 
し た 関数 プロシージャ ー ま た 人 は 組込み 関 数 アロ シー ジャ ー ) 。 関数 
参照 で 指定 され ん て いる いずれ か 1 つの 入口 名 に よっ て 呼び 出さ れ , 
参照 点 に 値 を 返す プロ シー ジャ ー。 


関数 参照 ( function reference ) : 式 の 中 に 入口 名 また は 
組込み 関数 名 ( を いし, 入口 変数 ) を 記入 する と と 。 


完全 修飾 され た 名 前 ( fully-qualified name ): 完全 な 
形 の 修飾 され た 名 前 。 す を わ ち , と の 名 前 で 指 を うと し て いる 構造 
の メン バー の 名 前 と , さら 構造 の 組立 て の 上 か ら み て その メン ズバ 
ー ェ より 上 位 に ある すべ て の 名 前 を 順に 含ん で いる , 修飾 され た 名 前 。 


キー( key ): 直接 アク セス ・ デ ー タ ・ セ ッ ト 内 の ある レコ ー ド 
を 識別 する た め の デ ー タ 。 原始 キー な よび 記録 され た キー を 参照 の 
と と 。 


キー ワー ド ( keyword ): PL/1 の 一 部 を を し て お り , 適切 
を 文脈 で 使用 され て いる と コン バイ ラーK 特 定 の 意味 を 伝え る 識別 
名 。 

擬似 変数 (pseudovariable )・ 日 標 変数 を 指定 する の 使用 
する と と が で きる 組込み 関数 名 。 


記述 子 ( descriptor ) : バラ メー ター 記述 子 を 参照 の こと 。 
基数 (base ): 算術 値 を 表現 する た め の 記 数 法 。 


基底 項目 (base item): 被 定義 変数 を その 上 と 生 ね て 定義 さ 
れる 自動 変数 , 被 制 御 変数 , 静 的 変数 , また は パラ メー ター。 と この 
名 前 は , 修飾 され て いて も , 添字 が 付い て いて も よい し , また 修飾 
と 添字 の 両方 が つい て も よい 。 


基底 付記 憶 城 の 割 振り ( based storage allocation): 
基底 付 変数 の た め の 記 憶 域 を 割り 振る と と 。 


基底 付 変数 ( based variable ): ロケ ー タ ー 変 数 に ょ っ て 識 
別 さ れる 世代 を も つ 変 数 。 基底 付 変数 は , どの 記憶 域 ク ラス に ある 
変数 の 値 を 参照 する と きも 使用 する こと が で きる 。 ALLOCATE 
ステ ー ト メン ト お よび FREE ス テー トメ ント を 使用 し て , 基底 付 
変数 を 明示 的 に 割り 振っ た り , 明示 的 C 解 放し た りす る と と が で きる 。 


基本 項目 名 ( elementary name ): 基本 要素 を 参照 の と と 。 
構造 の メン バー の らち も, 小 構造 


基本 要素 ( base element ): 
で な いも の を 表わす た め の 名 前 。 


境界 合せ ( alignment ): ある 機械 依存 の 境界 を 基準 に し て デ 
ー タ 項目 を 貯え る と と 。 


切捨て (truncation): 日 標 変数 の スト リン グ の 長 さ また は 
精度 を 超過 し た と き , デー タ の 項目 の 一 端 か ら 1 つ 以 上 の 数 字 , 文 
字 , また を は ビッ ト を 取り 除く と と 。 


記録 され ん た キー(recorded key ): 対応 する デー タ ・ レ コー 
ド を 識別 する た めし と , 直接 アク セス ・ ポ リュ ー ム KK 記録 され て いる 
キー。 


禁止 状態 (disabled ): ある 特定 の ON 条件 が 引き 起 さ れ て も ゃ , 
割込み が 起 と ちら を いよ りら な 状態 を 言う 。 


区 切り 符号 ( de1imiter ): すべ て の 演算 子 , 注 釈 , ぉ よび 以 
下 に あげ る 符号 。 パーセント, 括弧, コン マ , ピリオド, セミ コロ 


ン , コロ ン , 割当 て 記号 ,。 プ ラン ク 。 と れ ら の 符号 は , 識別 名 , 定 
数 , ピク チャ ー 指 定 , i SUB, お と び キ ー ワ ー ド の 境界 を 定義 する 。 
組 込 人 関数 (built-in function )・ PL/1IC よ っ て 提供 
され る 関数 。 


組立 て ( structuring ): ある 構造 の メン バー の 数 , メン バー 
が 出 て くる 順序 , メン バー の 属性 , メン バー の 論理 レベ ル , を な どの 
点 か ら 見 た その 構造 の 骨組 み ( ただ し , メン バー 名 や 宣言 され て い 
る レベ ル ん 番号 は 必ず し ゃ と の 要件 と は な を ならない ) 。 


繰 逐 し 因数 (repetition factor ): 次 の 事項 を 指定 する た め 
の 無 符号 の 1 0 進 整数 定数 を 括弧 で 囲ん だ も の 。 


1 ある スト リン グ 定 数 が ある スト リン グ 構 成 の 繰返し で 構成 さ 
れ て いる 場合 , その 繰返し 回 数 。 


2. ピク チャ ー 指 定 に な ける ピク チャ ー 指 定 用 文字 の 繰返し 回 数 。 


繰 肥 し の 指定 ( repetitive specification )・ 1 つ 以 上 
の デー タ 項 目 を 一 定 条件 の も と で 繰り 返し 転送 する よう ら 指定 する た 


め の デ ー タ ・ リ スト 内 の 要素 で , 通常 , 配列 の 場合 に 使用 され る 。 


グル ー プ ( group ): DO グル ー プ 。 オ ン ・ ユ ニッ ト と し て DO 
グル ー プ を 使用 する と と だ け は で き な い が , と れ 以 外 の 場所 で あれ 
ば , 単独 の ステ ー ト メン ト を 置く と と が で きる と と ろ で あれ ば , ど 
と で も 使用 する と と が で きる 。 


形式 項目 ( format item): 編集 指示 転送 に な いて , 流れ 内 
の デー タ 項 目 の 表現 に つい て 記述 する の に 使用 され る 指定 ( デー タ 
形式 項目 ) , また は 流れ 内 の デー タ 項 目 の 位置 設定 を 指定 する の KC 
使用 され る 指定 ( 制御 形式 項目 ) 。 


形式 項目 の 制御 ( contro1 of format item): 編集 指示 
転送 に な いて , 流れ の 中 の デー タ 項 目 ま た は 印刷 され る ペー ジ の 上 
の デー タ 項 目 の 位置 を 指定 する の 使用 され る 指定 。 


形式 リス ト (format 1ist ) : 編集 指示 デー タ 指定 必要 な 
いく つか の 形式 項目 を 括弧 で 囲ん だ リス ト 。 


限界 (bounds ): 配列 の 次 元 の 上 限 と 下限 。 


言語 文字 モッ ト ( 1anguage character set ): ブロ グラ 
^ 要 素 を 原始 言語 で 表わす た め (C 定 義 S さ れ て いる 文字 セッ ト (と と 
で は , 文字 スト リン グ 定 数 と 注釈 は アプ ログラム 要素 と は み を さ を な 
い ) 。 


現在 の 世代 (current generation ): 自動 変数 また は 被 制 


御 変数 の 名 前 を 参照 し た と き (, 現時 点 で , アク モス され る と の 変 
数 の 世代 。 
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原始 キ 一 ( source key ) : 直接 アク セス ・ デ ー タ ・ セ ッ ト の 
中 の ある 特定 の レコ ー ド を 識別 する た め C, レコ ー ド 式 転送 ステ ー 
トメ ント の 中 で 参照 され る キー。 


原始 プロ グラ ム ( source program ) : コン バイ ラー へ の 入 
力 と な る プロ グラ ム 。 原始 アプ ログ ラム (に プリ プロ セッ サー・ ス テー 
トメ ント が 含ま れ て いる と と も ある 。 


原 変数 ( souarce variable ): 割り 当て る べき 値 を も る つ 変 数 
また は 他 の 何ら か の 操作 に 関与 する 値 を も つつ 変数 。 


構造 ( structure ): 階層 に 分 けら れ た 名 前 の 集 り で , デー タ 
項目 の 集合 体 を 参照 す あ た め の も の で ある 。 と の 個々 の デー タ 項 目 
の 属性 は 異な た っ て いて も か まわ な い 。 


構造 式 ( structure expression ): 式 の 値 を 計算 し た 結果 
が 値 の 構造 に た る よう な 式 。 


構造 の 配列 ( array of structures ) : 構造 名 次元 属性 
を 与え を る と と て よっ て 指定 され る 同一 の 構造 を いく つか 集め て 並べ 
た も の 。 

構造 の メン バー( structure member ): 構造 の 中 の 任意 の 
小 構造 また は 要素 名 。 


ュー ド 化 算術 デー タ ( coded arithmetic data ): 変換 を 
し を く で て も 算術 計算 を 行なう と と の で きる 形 で 貯え られ て いる 算術 デー タ 。 


固定 小数 点 定 数 ( fixed-point constant ): 算術 定数 を 参 
照 の こと 。 


コン パイ ル 時 間 ( compile time ): 一 般 に , ブロ グラ ム が が 目的 
モジ ュー ル レ ル 翻訳 され て いる 時 間 。P エ 1 の 場合 は , 必要 に 応じ 
て 原始 プロ グラ ム を 変更 し (プリ プロ セッ サー で 処理 し ) , 次 いで 
と れ を 目的 ブ プログ ラム K 徳 訳す る 時 間 。 


コンパ バイル 時 の ステ ー ト メン ト (compile-time statements 
ブリ グロ セッ サー ステ デー ドル ント を を R の だ 6。 


サ プ ブ フィ ー ル ド ( ビ ピクチャー 指定 の ) ( subfield(of picture 
specification ) ): ビク チャ ー 指 定 用 フィ ー ル ド の 中 の ビク 
チャ ー 指 定 用 文字 V の 前 後 の 各部 分 。 


サブ プル ー チ ン ( subroutine )・ じ CALL ステー トメ ント また 
は CALL オ プシ ョ ン に よっ て 呼び 出さ れる プロ シー ジャ ー。 サブ 
ルー チン は , 呼出 し プロ ッ ク 《 値 を 返す こと と は で き な い が , 変数 の 
値 を 変更 する と と は で きる 。 


算術 演算 子 ( arithmetic operators ) : 接頭 演算 子 填 ま 
た は ーー, また は , 次 に あげ る 挿入 演算 子 の いずれ か 1 つ 。+ 一 


素 ーー グ まま 


422 DOS PL ノ I 最適 化 コ マン バイ ラー : 言語 解説 書 第 2 部 


参照 (reference ): 


算術 定数 ( arithmetic constant ): 固定 小数 点 定数 また は 
消 動 小数 点 定数 。 殆 ん どの 算術 定数 は 符号 を つけ る と と が で きる が , 
符号 は 定数 の 一 部 で は を い 。 


算術 デー タ ( arithmetic data ): 基数 , スケ ー ル , モー ド ", 
お よび 精度 を も つ デ ー タ 。 と れ に は , コー ド 化 算術 デー タ お よび ビ ピ 
クチ ャ ー 数 字 デ ー タ が 含ま れる 。 


算術 ビク チャ ー・ デ ー タ (arithmetic picture data ) 
10 進 ビク チャ ー・ デ ー タ また は 2 進 ビ ピクチャ ー・ デ ー タ 。 


算術 変換 ( arithmetic conversion ): 値 の 表現 形式 を , 
ある 算術 表現 か ら 他 の 算術 表現 に か える と と 。 


明示 宣言 と を る よう ら な 文脈 以外 の と と ろ 
名 前 が 現われ る と と 。 


式 ( expression) : ブロ グラ ム の 中 で 使用 され る , 1 つの 値 。 
値 の 配列 , また は 値 の 構造 を 表わす 式 。 単独 の 定数 ある い は 参照 , 
また は , 定数 な よび ノ ま た は 参照 を 演算 子 で 結び 合わ せ た も の 。 


識別 名 ( identifier ) : 英 数 字 お よび, 場合 に よっ て は , 分 
割 文 字 か ら を る スト リン グ で , 注 秋 あ る い は 定数 の 中 に 含ま れ て お 
ら ず , 前 と 人 後 《C 分 離 符号 が ある も の 。 そ の 頭 文字 は 英字 で を けれ ば 
を ら な い 。 


次 元 数 ( dimensionality): 配列 の 宣言 の 中 に ある 限界 の 指 
定 の 数 。 


自己 定義 デー タ ( self-defining data ): デー タ 自 体 の 属 
性 に つい て 記述 し て いる 情報 ( た と を ば, 調節 可能 を 限界 や 長 さ の 
値 ) が 含ま れ て いる デー タ 項 目 を いし デー タ 項 目 の 集合 体 。 


事象 ( event ): その 状況 と 完了 が それ と 結び 付い て いる 事象 変 
数 か ら 決 め ら れる よう な ブロ グラ ム 内 の 活動 。 


事象 変数 ( eyent variable ): ある 事象 と 結び 付け る と と が 
で きる , EVENT 属 性 を もつ 変数 。 と の 変数 の 値 は , その 活動 が 
完了 し た か どう か と いう と と , お ぉ お よび 完了 の 状況 を 表わす 。 


指数 文字 ( exponent characters ) : 次 の ピク チャ ー 指 定 
用 文字 。 


1 丈 , E。 浮動 小数 点 ビ ピクチャー 指定 C お ない て, 指数 フィ ー ル 
ド の 始 り を 示す の 人 使用 され る 。 


2. TP。 整数 定数 と 共に 指定 され る スケ ー ル 因数 文字 。 と の 整 孝 
定数 は , ( 正 の 場合 に は ) 1 0 進 小数 点 が 仮想 上 の 1 0 進 小 
数 点 か ら 何 格 右 て ある か を 表わし ( 負 の 場合 に は ) 何 桁 左 K 
ある か を 表わす 。 


一 


シス テム の 標準 処置 ( standard system action ) : ある 
ON 条件 に対する オン ・ ユ ニッ ト が 指定 され て い を いと き ( 低 と る よ 
ら , と の 言語 で 指定 され て いる 処置 。 


自動 記憶 域 の 割 振り (automatic storage allocation ): 
自動 変数 に 対し て 記憶 域 を 割り 振る と と 。 


自動 変数 ( automatic variable ): ブロ ッ ク が 活用 化 さ れ 
る と き K 自 動 的 (< 割り 振ら れ , と の ブロ ッ ク の 終了 と 共 C 自 動 的 
解放 され る 変数 。 


主 入口 点 ( primary entry point ) : PROCEDURE ス 
テー トメ ント の ラベ ル ・ リ スト (て あ る いずれ か の 名 前 に よっ て 議 別 
され る 入口 点 。 


集合 体 ( aggregate ): デー タ 集 合体 を 参照 の と と 。 


集合 体 式 ( aggregate expressions ): 配列 式 ま た は 構造 
式 。 


修飾 され を 名 前 (qua1ified name ): 構造 内 の 構成 要素 を 誠 
別 す る の 使用 され る 名 前 で あり , 構造 の メン バー の 名 前 を , 構造 
内 で の 大 位 に し た が っ て , ビリ オド で つ を げた も の 。 メン バー 名 は 
添字 付 の 名 前 で も よい 。 ロ ケー ター 修飾 の 項 も 参照 の と と 。 


終了 (ブロ ッ ク の ) (termination(of a block) ) : ブ プ 
ロッ ク の 実行 を 停止 する と 共 (C。 と の ブロ ッ ク を 活用 化し た プロ ッ 
ク CRETURN を いし END ス テー トメ ント (て よっ て 制御 を 返す か , 
ある い は と の ブロ ッ ク を 活用 化し た プロ ッ ク も し く は 活用 状態 に あ 
る 他 の ブロ ッ ク (CGO TO ステ ー ト メン ト 低 ょ っ て 制御 を 渡す と 
と 。 


条件 ( condition ): ON 条件 を 参照 の こと 。 


上 限 ( upper bound): 配列 の 次 元 の 上 の 限界 。 

条件 接頭 語 ( condition prefix ) : ステ ー ト メン ト の 接頭 
語 と し て 使用 され る , 1 つ 以 上 の PL プ 1 条 件 名 を 括弧 で 囲ん だ リ 
スト 。 と れ は , 指定 され て いる ON 条件 を 解禁 状態 て 置く か どう か 
指定 す る た め の も の で ある 。 


条件 名 ( condition name ): ブロ グラ ム を 実行 し て いる 間 K 
起 と る 可能 性 の ある ON 条件 を 表わす PL 上 ノエ キー ワー ド (また は , 
CONDI TION の 後に ブロ グラ マー 定義 の 名 前 を 括弧 で 囲ん で 記 
入 し た も の )。 


条件 リス ト ( condition 1ist ): 1 つ 以 上 の 条件 接頭 語 か ら 
な る リス ト 。 


小 構造 (minor structure): 他 の 構造 に 含ま れ て いる 構造 。 
小 構造 の 名 前 は , 1 より 大 きい レベ ル 番 号 に よっ て 宮 言 され る 。 


省略 時 属性 ( 省略 時 オプ ショ ン ) ( default ) : 


知ら れ て いる ( known ): 


数 字 デ ー タ (numeric character data ) : 
チャ ー・ デ ー タ を 参照 の と と 。 


定数 (constant): 名 前 を も た ず , また 値 が 変わ る と と も な い 


算術 デー タ 項 目 ま た は スト リン グ ・ デ ー タ 項目 。 紗 字 の 付か を い ラ 
ベル 接頭 語 , また は , ファ イル 名 , また は , 入口 名 。 


商用 文字 ( commercial1 character ) : 以下 の ピク チャ ー 指 


定 文字 。 
1 CR ( 貸 太 )。 
2. DB (借方 )。 


3 IT.R (上 重ね 塞 孔 符号 文字 )。 とれ ら は , デー タ 項 目 の 
中 の 対応 する 位置 て は 上 重ね 裕也 符号 を つけ た 形 で (つか な い 
と と も る ある ) 数 字 が 入っ て いる と と , お よび , と の 上 重ね 塞 
孔 符号 $ ぁ と の デー タ 項 目 の 文 字 ス トリ ング 値 に 加え られ る と 
と を 指示 する た め の も の で ある 。 


択 一 属性 また 
は オォ オプション が 指定 され て いな いと きた , 指定 され る か , また は 
DEFAULT ス テー トメ ント (て よっ て と る よう 指定 され て いる 択 一 
属性 まほ た は オプ ショ ン 。 


処罰 の 指定 ( action specification ): ON ステ ー ト メン 


ト C な ける オン ・ ユ ニッ ト な いし SYSTEM と いう キー ワー ド 。 い 
ずれ も る も , 指定 され た 0O N 条 件 が 引き 起 さ れ て 割込み が 起 っ た と き 
と る べき 処置 を 指定 する た め の も の で ある 。 処置 の 指定 CSNAP 
と いう キー ワー ド を 含め て よい 。 


( 名 前 に 関し て 用 いら れる ) 宣言 さ 
れ て いる 意味 を も つも の と し て 認定 され て いる と と 。 名 前 は , その 
有効 範囲 全体 に な わた っ て 知ら れ て いる 。 


数 字 (qigit): 文字 0 て 2? の いずれ か 1 つ 。 


1 0 進 ビ ク 


スカ ラー 項目 ( scalar item ): デー タ の 1 項目 。 要素 。 


スカ ラー 変数 ( scalar variable ) : 1 つの デー タ 項 目 し か 
表わす と と の で き な い 変数 。 要素 変 数 。 


スケ クー ル ( scale ) : 数 学 上 の 記 数 法 。 算術 値 の 固定 小数 点 の 進 
法 ま た は 等 動 小 数 点 の 進 法 。 
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固定 小数 点数 の 小数 部 分 の 


スケ ー ル 因数 (scale factor ) : 


桁 数 の 指定 。 


ステ ー ト メン ト (statement ) : PL プエブロ グラ ム の 基本 要 
素 で あり , プロ グラ ム の ある 部 分 の 境 を 示し た り , プログラム の 中 
で 使用 され る 名 前 に つい て 記述 し た り , と る べき 如 置 を 指定 し た り 
する の 使用 され る 。 ス テー トメ ント は , 条件 リス ト , ラベ ル ・ リ 
スト , ステ ー ト メン ト 議 別名, ステ ー ト メン トト 本体 ( と れ は セミ ュ コ 
ロン で 終る ) を どか ら 構 成す る と と が で きる 。 

ステ ー ト メン ト 識 別名 ( statement identifier ) : ステ ー 
トメ ント の 目的 を 示す た め の PL バ 1 言語 の キー ワー ド 。 


ステ ー ト メン ト 本 体 ( statement body ): ステ ー ト メン ト の 
内 , ステ ー ト メン ト 議 別名 ( 識別 名 が つい て いれ ば ) の 直ぐ 後 か ら 
セミ コロ ン K 至 る 部 分 。 と れ に は ステ ー ト メン ト の ォ オプ ショ ン る 含 
まれ る 。 


ステ ー ト メン ト ・ ラ ベル 式 (statement-1abel expression): 


ラベ ル 式 を 参照 の と と 。 


ステ ー ト メン ト ・ ラ ベル 定数 (statement-label constant) : 


ラ ベル 定数 を 参照 の と と 。 


ステ ー ト メン ト ・ ラ ベル 変数 (statement-1abel] variable ) : 
ラベ ル 変 数 を 参照 の こと 。 


スト リン グ (string): 1 つの デー- タ 項目 と し て 取り 扱わ れる , 
連続 し て いる 文字 また は ビッ ト の 連なり 。 


スト リン グ 変 数 (string variable ) : BI 属性 また は 
CHARACTER 属 性 を も つも の と し て 宣言 され て いる 変数 で , そ 
の 値 が ビッ ト ・ ス トリ ング また は 文字 スト リン グ を と る と と が で き 
る も の 。 

制御 の 流れ (flow of control1 ) : 実行 遥 序 。 


制御 変数 ( control variable ) : ある グル ー ジ の 実行 の 反 
復 を 制御 する の 使用 され る 変数 。 反復 DO グ ルー プ を 参照 の と と 。 


静 的 記憶 域 の 割 振り (static storage allocation ) : 
静 的 変数 の た め の 記憶 域 の 割 振り 。 


静 的 変数 (static variable ) : 当該 プログ ラム の 実行 が 開 
始 さ れる 前 KC 割り振ら れ , 当該 プロ グラ ょ ム が 実行 さん て いる 間 中 割 
り 振ら れ た まま (に な っ て いる 変数 。 


精度 (precision): 算術 変数 の 値 域 を 総 桁 数 ( な ょ び , 固定 
小数 点 変数 に 関し て は , 1 0 進 小数 点 を いし 2 進 小 数 点 の 右側 と あぁ 
る と 想定 され る 桁 数 ) で 表わし た ゃ も の 。 
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人 串 晴 (prefix ): 


先行 ゼロ ( leading zeros ) : 


総称 名 ( generic name ) : 


世代 (変数 の ) (generation(of a variable)): 静 的 


変数 の 割 振り , 被 制御 変数 また は 自動 変数 の ある 特定 の 割 振り , 基 


底 付 変数 の ある 特定 の g ロ ケーター 修飾 語 が 指す 記憶 域 , また は , 被 
定義 変数 を いし バラ メー ター が 指す 記憶 域 。 


接頭 演算 子 ( prefix operator ) : ある オペ ラン ド の 直前 K 


置か れ , と の オペ ラン ド だ け を 適用 され る 演算 子 。 十 ( 正 ), 一 
( 負 ), 1( 否 定 )。 


ステ ー ト メン ト の 冒頭 ヒコ ロン で つ を が れ 
て いる , ラベ ル ,。 また は , 1 つ 以 上 の 条件 名 を 括弧 で 囲ん だ リス ト 。 


ゼロ 消去 文字 ( zero suppression character ): 対応 す 
る 数 字 桁 の ぞ ロ を 消去 する の 使用 され る ピクチャー 指定 用 文字 , 
KG 


宣言 (declaration ) : 
1. 


識別 名 を 名 前 と し て 確定 させ る と 共に C, と の 名 前 その すべ 
2. ある 特定 の 名 前 に 属性 を 与え を る た め の 1 つの 手段 。 


算術 整数 の 値 の 中 に ある , 意 
味 を も た な い ゼ ョ ロ 。 ある 数 の 最初 の 有効 整数 桁 の 左 に CK ある すべ て の 


ゼロ 。 


関係 の ある いく つか の 入口 名 か ら 
を る 集団 の 名 前 。 と の 名 前 へ の 参照 は , 呼出 し 点 の 引数 リス ト の 中 
(て ある 引数 の 属性 と 合致 する パラ メー ター 記述 子 を も つ 特 定 の 入口 
名 と 置き 換え られ る 。 


挿入 演算 子 ( infix operator ): 2 つの オペ ラン ド の 間 (C あ 
る 演算 子 。 


挿入 ビ ピクチャー 文字 ( insertion picture character ) : 
対応 する デー タ を 文字 スト リン グ K 割 り 当て る と き K 所 定 の 位置 
挿 入 さ れる ビク チャ ー 指 定 文字 。 入 力 の た め の P 形 式 項目 で 使用 さ 
れ て いる 場合 は , と の 廊 字 は チェ ッ ク 用 ピクチャー 文字 の 役割 を 果す 。 


添字 (subscript): 配列 の ある 次 元 の 中 の あぁ る 位置 を 指定 す 


る た め の 要 素 式 。 添 字 と し て 星 印 を 指定 する と と も で きる 。 と の 場 
合 , と の 星 印 は と の 次 元 の 全 範 囲 を 指定 する も る の で ある 。 


添字 リス ト (subscript list): 配列 の 各 次 元 か ら 1 つ ず つ 
と られ た 1 つつ 以上 の 添字 を 括弧 で 囲ん だ リス ト で あり , 全体 と し て , 
と の 配列 の 1 つの 要素 また は 断面 を 一 義 的 識別 する も の 。 


属性 ( attribute ) : 
1 ある 名 前 が 表わす 項目 の 特性 を 記述 する た め に その 名 前 と 結 
び 付 け られ る 記述 上 の 性 質 。 
2. ある 式 の 値 を 計算 し て 得 ら れる 結果 の 特性 を 記述 する の 使 
用 され る 記述 上 の 性 質 。 


第 1 プロ シー ジャ ー(initial procedure )・ OPTIONS 


(MA IN) 属 性 を も t つ PROCEDURE ス テー トメ ント を も っ て い 
る 外部 ブロ シー ジャ ー。 どの PL プエブロ グラ ム 人 も 第 1 ブロ シー 
ジャ ー が な けれ ば な を ならない 。 第 1 プロ ンー ジ ャ ー は , ブ プログラム の 
実行 に あたっ て の 最初 の ステ ッ プ と し て 自動 的 に 呼び 出さ れる 。 


大 構造 (major structure)・ レベ ル 番 号 1(C よ っ て 宣言 
れ て いる 名 前 を も つ 構 造 
Ualengetlye_6tnibntel/3 ズラ の 団 侍 が 


ら を る グル ー プ の 中 か ら 選 び 出 す と と の で きる 1 つの 属性 。 と の 属 
性 を 指定 し を ない と, 省略 時 属性 が と られ る 。 


単 凍 パッ メー ター( gimple perameter): 怒 憶 城 ク ラス 碑 


性 が 指定 され て い を い バ パラメーター。 と の バラ メー ター は どの 記憶 
域 ク ラス の 引数 で も 表わす と と が で きる が 被 制御 引数 の 現在 の 世代 
し か 表わす と と が で き な い 。 


注釈 ( comment ) : 文書 化 の た め 《K 使 用 され る ゼロ また は 1 つ 


以上 の 文字 あら を る スト リン グ で , で 始ま り ネ で 終り , プロ 
グラ ム 内 の 区 切り と を る も の 。 


調節 可能 な エク ステ ント ( adjustable extent): 関連 する 


変数 の 世代 ど と (異な る 値 を と る と と の で きる (配列 の ) 限界 , 
( スト リン グ の ) 長 さ , また は (エリ ア の ) 大 きる 。 調節 可能 を 限 
界 , 長 さ , お よび 大 き さ は , 式 ま た は 星 印 ( また は , 基底 付 変数 
関し て は , RBFPR ォ プシ ョ ン ) を 使用 し て 指定 する 。 各 世代 ど 
と に , 個々 に , と れ ら の 値 が 計算 され る 。 静 的 変数 に 対し て は , 調 
節 可 能 を な エク ステ ント を 使用 する こと は で き な い 。 


デー タ ( data ) : 処理 に 適 し た 形 で 情報 えた いし 値 を 表現 し た も 


の 。 


デー タ 形 式 項目 ( data format item) : 編集 指示 転送 に ちな 
いて , 流れ の 中 の デー タ 項 目 の 表 現に C つ いて 記述 する の 人 使用 され 
る 指定 。 


デー タ 項 目 ( data item): 1 単位 の デー タ 。 要素 と 同義 。 


デー タ 指 示 転 送 ( data-directed transmission ): スト 


リー ム メ 方 式 転送 の 1 つの タイ ブ 。 デー タ は , 各々 コン マ で 区 切ら れ 
た 1 つ 以 上 の 項目 か ら な り , セミ コロ ン で 終っ て いる 1 つの グル ー 
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プ と し て 転送 され る 。 各々 の 項目 は 次 の 形 を し て いる 。 


名 前 は , 修飾 され て いて も ゃ 添字 付 で あっ て も よい し , ある い は その 
両方 で も よい 。 


デー タ 指 定 ( data specification ) : スト リー ム 式 デー タ 


転送 スチ テー トメ ント の 中 の 転送 の モー ド (DATA , LIST, また は 
EDIT ) を 指定 する 部 分 で あり , 1 つ 以 上 の デー タ ・ リ スト , お 
よび , 編集 指示 転送 の 場合 に は 1 つ 以 上 の 形式 リス ト , を 含む 。 


デー タ 集 合体 ( data aggregate ) : 全体 と し て も , 個々 も 


参照 する と と の で きる 2 つつ 以上 の デー タ 項 目 の 論 理 的 を 集 り 。 配列 
また は 構造 。 


デー タ ・ セ モット ( data set ) : 当該 プ ブログ ラム の 外部 (て あり , 


当該 プロ グラ ム C お いて ファ イル 名 を 参照 する と と に よっ て アプ アクセ 
ス す る と と の で きる デー タ の 集 り 。 


デー タ 転 送 ( data transmission ): デー タ ・ セ ッ ト か ら プ 


ログ ラム へ ある い は プロ グラ ム か ら デ ー タ ・ セ ッ ト へ デー タ を 移す と と 。 


デー タ の 流れ (data stream ): 文字 形式 の デー タ 要 素 の 連続 


し た 流れ と し て , スト リー ム 式 転送 に よっ て デー タ ・ セ ッ ト と の 間 
で 転送 され て いる デー タ 。 


デー タ 文 字 セ モッ ト ( data character set ): 使用 し て いる 


コン ピュ ー タ ー に よっ て 認定 され る 表現 を も つ す べ て の 文字 。 


デー タ ・ リ スト (data 1ist): 入力 の 場合 は デー タ 項 目 を 割 


り 当 て る べき 記憶 場所 を 表わし , 出力 の 場合 は 取得 すべ き 値 を 表 わ 
す コ ンマ で 区 切ら れ た いく つか の 式 ま た は 繰返し 指定 を 括弧 で 囲ん 
だ リス トーー ス トリ ー ム 方 式 入出 力 指 定 で 使用 され る 。 


同期 的 ( synchronous ): ある ブロ グラ ム を 反 次 的 実行 する 


の 制御 の 流れ を 1 つ だ けり 使用 する と と 。 


ある プ ブロック KK 含ま れ て 
いる すべ て の テキ スト か ら 他 の ブロッ ク K 含 まれ て いる テキ スト を 除い た 
残り の テキ スト 。 したがって, 内 部 ブロ ョ ッ ク の テキ スト は (その 入口 名 を 
除け ば ), と の ブロ ッ ク を 含ん で いる プ ブロッ ク の 内 部 (ある わけ で は な い 。 
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内 部 名 ( interna1 name ) : 


名 前 ( name ) : 


配列 式 ( array expression) : 


内 部 プロ シー ジャ ー(interna] procedure ): ある プ ブロッ 


ク の 中 人 含ま れ て いる プロ シー ジャ ー。 


内 部 プロ ッ ク ( internal block ) : 他 の ブロ ッ ク の 中 含ま 


れ て いる ブロ ッ ク 。 


その 名 前 の 宣言 が 行 を われ て い 
る ブロ ッ ク の 外 で は 知ら れ て い を ゆい 名 前 。 


流れ ( stream ) : デー タ の 流れ を 参照 の と と 。 


キー ワー ド に は な を ならない 文 脈 に ある 識別 名 。 


ナル ・ ス トリ ング (nu11 string ): 長 さ が ゼロ の スト リン グ 


・ デ ー タ 項目 。 


ナル ・ ロ ケー ター 値 (null 1ocator yalne)・ 内 部 配 居 装 


置 内 の どの 記憶 場所 も 識別 する と と の で き な い 特殊 を ロケ ー タ ー 値 。 
と の 値 は ,。 ロケ ー タ ー 変 数 が 現在 デー タ の どの 世代 も 識別 し て いな 
いと と を 積極 的 に 示す た め の も の で ある 。 


入出 力 ( input プ output ): 補助 記憶 装置 と 主 記憶 装置 の 間 で 


の デー タ の 移動 。 


ネス ティ ング (nesting ) : 
1. ある ブロ ッ ク を 他 の プ ブロック の 中 置く と と 。 


2. ある グル ー プ を 他 の グル ー プ の 中 人 置く と と 。 


3 IF ステ ー ト メン ト を THEN 文 人 節 ま た は EL SE 文節 の 中 
(て 思 く と と 。 


4. 関数 参照 を 関数 参照 の 引数 と する こと 。 


5. FORMAT ス テー トメ ント の 形式 リス ト の 中 遠隔 形式 項目 
を 置く と と 。 


6 ある ペラ メー ター 記述 子 の リス ト を 他 の バラ メー ター 放 述 子 の 
リス ト の 中 人 思 く こと 。 


7 1 つ 以 上 の 共通 属性 を 因数 化し て 括弧 で 囲ん だ 名 前 の リス ト 
の 中 で , ある 属性 を 指定 する こと と 。 


配列 ( array ): すべ て 同じ 属性 を る つい くつ か の デー タ 有 要素 を 


集め て 並べ , と の 集 り 全体 に ある 名 前 を 与え を た も の 。 配列 は , 次 元 
属性 に ょ っ て 指定 され る 次 元 を も ち , その 個々 の 要素 は 添字 に よっ 
て 参照 され る 。 配列 は , また , 同じ 構造 を いく つか 集め て 並べ た $ 
の で あっ て も よい 。 


式 を 評価 し た 結果 が 配列 値 
に を る 式 。 
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配列 の 構造 ( structure of arrays)・ 


バディ ング ( padding ) : 


次 元 属性 を も つも 
の と し て 個々 の メン バー 名 を 宣言 する と と て ょ より 指定 され て いる 配 
列 を 含ん で いる 構造 。 
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と も 1 つの 次 元 ( し か し , すべ て の 元 で は を い ) の 範囲 た よっ て 
表わさ れる 諸 要 素 。 配列 参照 に な いて 添字 の か わり (ん 星 印 を 指定 す 
る と , その 次 元 の 範囲 全体 を 参照 する こと て な る 。 


パッ ク 1 0 進数 ( packed decimal )′: シス テム 36 0 お 


ける 固定 小数 点 1 0 進 デ ー タ 項目 の 内 部 表現 。 


ある スト リン グ を 所 要 の 長 さ 拡 張 
する た め C, その スト リン グ の 右側 (< 連結 され る 1 つ 以 上 の 文字 な 
いし ピッ ト 。 文字 スト リン グ の 場合 は ,。 プラ ンク が 補 わ れ , ビッ ト 
・ ス トリ ング の 場合 に は ゼロ が 補 わ れる 。 


バラ メー ター( parameter ) : プロ シー ジャ ー の 中 で , と の プ 


ロジ シ ー ジ ャ ー 人 渡さ れ た 引数 を 参照 する の KC 使用 され る 名 前 。 


バラ メー ター 放 述 子 ( parameter descriptor ): ENTRY 


属性 の 指定 の 中 で , ある 1 つの パラ メー ター 対し て 指定 され て い 


る 一 組 の 属性 。 


パラ メー ター 記述 子 リ スト (parameter descriptor 1ist) : 


ある 1 つの BNTRY 属 性 の 指定 の 中 に ある すべ て の バラ メー ター 
記述 子 を 内 容 と する リス ト 。 


パラ メー ター・ リ スト (parameter 1ist ): PROCEDURE 


ステ ー ト メン ト の キー ワー ド PROCEDURE ま た は ENTRY ス 
テー トメ ント の キー ワー ド BENTRY の 後 (て ある, 1 つ 以 上 の バラ 
メー ター を カン マ で 区 切り 括弧 で 明 ん だ リス ト 。 と の リス ト は , 呼 
出し の と き 渡 され る 引数 リス ト 人 対応 し て いる 。 


範囲 ( 省略 時 指定 の )(range(of a default specification) ) ・ 


DEFAUL 和 T ス テー トメ ント の 省略 時 指定 で 指定 され て いる 属性 が 
適用 され る 一 組 の 識別 名 , 定数 , な よび または, パラ メー ター 記 
述 子 。 


反復 因数 (iteration factor ) : 次 の 事項 を 指定 す る た め 


の 式 。 


1 1INITTIAL 属 性 の 指定 で は , 配列 内 の , 与え られ た 定数 で 
初期 値 化 すべ き 連 続 し て いる 要素 の 数 。 


2. 形式 リス ト で は , 与え られ た 形式 項目 を いし 形式 項目 の リス 
ト を 繰り 返し 続け て 使用 すべ き 回 数 。 


反復 DO グル ー プ (iterative do-group)・ 制御 変数 ぉ ょ 


び プ また は WHILE オォ プシ ョ ン を 指定 し て いる DO ステ ー ト メン 
ト を も つ DO グ ルー プ ズブ 。 


に 癌 の 


比較 演算 子 ( comparison operators ): 比較 式 の 中 で 使用 
され る 挿入 演算 子 。 こ と これ は 次 の よう を も の が ある 。~^ い ぐ (小さ く を 
い ), ぐ ( 小 さい ), < ベニ ( 小さ いか 等 し い ) , ( ) ( 等 し く を い ), 
ーー ( 等 し い ), > (大 きい か 等 し い ), (大 きい ), 一 > 

( 大 きく ない ) 。 


非 活用 状態 ( deaectivated ): プリ プロ セッ サー 変数 また は プ 
リプ ブ プロセッサ ー 入 口 名 が , その 値 【C よっ て 原始 ブ プロ グラ ム ・ テ キス 
ト の 中 の と れ 人 対応 する 識別 名 を 置き 換 を る と と が で き な い 状態 を 
いら 。 


ビク チャ ー 指 定 (picture specification ): 10 進 ビク 
チャ ー・ テ ー タ お よび 文字 スト リン グ ・ ビ クチ ャ ー・ デ ー タ の 構成 
お よび 特性 を 各 文 字 ど と (記述 し た も の 。 


ビク チャ ー 指 定 用 の 文字 (picture specification character)・ 
ビ ピクチャー 指定 で 使用 する こと と が で きる 文字 。 1 0 進 ビ クチ ャ ー・ 
デー タ お よび 文字 スト リン グ ・ ピ ビク チャー・ デ ー タ を 参照 の こと 。 
村 制 御 記憶 域 の 割 振り ( controlled storage allocation) : 

被 制 御 変数 の た め の 記 憶 域 の 割 振り 。 


被 制 御 バ パラ メー ター( controlled parameter )・ 
DBCLARE ス テー トメ ント の 中 で CONTROLLED 属 性 が 指定 
され て いる バラ メー ター。 と の バラ メー ター と 結び 付け る と と の で 
きる 引数 は CONTROLLED 属 性 を も つも の だ け で ある 。 


被 制御 変数 ( controlled variable ) : ALLOCATE お ぉ お 
よび FREE ス テー トメ ント よっ て 割 振り と 解放 が 行 を われ る 変 
数 。 こ の 変数 に 関し て は , その 現在 の 世代 に し か アク セス する と と 
が で き な い 。 


ピッ ト (bit ) : 2 進 桁 ( 0 また は 1 )。 


ビ ピット ・ ス トリ ング (bit string ) : ゼロ また は 1 つつ 以上 の 
ビ ピット か ら を な る スト リン グ 。 


ビット ・ ス トリ ング 演算 子 (bit-string operators): 論 
理 演算 子 つ コ ( not ), を (and), お よび | (or)。 


被 定義 項目 ( defined item): 基底 項目 と 呼ば れる 他 の 変数 
と 割 り 振 られ て いる 記憶 域 の 一 部 また は すべ て を 表わす よう 宣言 さ 
れ て いる 変数 。 


非同期 操作 ( assynchronous operation ) : 入出 力 操作 と 
スネ ステー トメント の 実行 と を 並行 させ る と と 。 
標準 省略 時 属性 ( standard default) : 択 一 属性 また は ォ 


プシ ョ ン が 指定 され て を おら ず , 該当 する DEFAULT ス テー トメ ン 
ト も な い 場 合 に と られ る 属性 ま た は オプ ショ ン 。 


ファ イル 定数 (file constant ) : 


ファ イル 変数 (file variable ) : 


避 次 入口 点 ( secondary entry point ) ・ 


標準 ラ ァ イル ( standard file ) ・ GET ま た は PUT ス テ 
ー ト メン ト の 中 (CEFILE ま た は STRING オ プシ ョ ン が 指定 され 
て い を ない 場合 C に プロ セッ サー が 選定 する ファ イメ ァ 。 標準 入力 ファ イ 
ル は SYS IN で あり , 標準 出力 ファ イル は SYSPRINT で ある 。 


ファ イル (file ) : ブロ グラ ム の 中 で デー タ ・ セ ッ ト を 表わす 
名 称 的 表現 。 フ ァイル は , 開か れる た び C, ある 1 つの デー タ ・ セ 
ッ ト と 結び 付け られ る 。 


ファ イル 属性 (file attribute )・ 
る 属性 。 


ファ イル の 性 質 を 記述 す 


ファ イル 式 (file expression): 式 の 値 を 計算 し た 結果 が 


ファ イル 名 に を る 式 。 


ファ イル 対し て 宣言 さ 
れ て お ぉ おり, と の ファ イル が 開か れる と き K 完 全 を 一 組 の ファ イル 属 
性 が 存在 し て いる 名 前 。 


ファ イル 定数 を 割り 当て 
る と と の で きる 変数 。 と の 変数 は FI LE, VARIABLE 両 属性 
を も つも の で を けれ ば を ら な を ない 。 ファ イル 変数 C 対 し て は , FILE 
以外 の ファ イル 属性 を 指定 する と と は で き な い 。 

ファ イル 名 (file name ) : ファ イル 対し て 宣言 され ん て いる 


名 前 。 


フィ ー ル ド ( デー タ の 流れ の ) (fiel1d(in the data stream )) 
デー タ の 流れ の 中 で , 1 つの デー タ 形 式 項目 また は スペ ー ス 形式 項 
目 に よって, 幅 が 文字 数 単位 で 定義 され て いる 部 分 。 


フィ ー ル ド (ピクチャ ー 指 定 の ) (field(of a picture 
Specification)) : 文字 スト リン グ ・ ピ クチ ャ ー 指 定 , ま 
た は 数 字 ビ ピク チャ ー 指 定 で は 固定 小数 点数 に つい て 記述 し て いる 部 
分 ( と れ が 1 つの 数 字 ビ クチ ャ ー 指 定 全体 で ある と と も ある )。 


付加 的 属性 ( additive attributes ) : 省略 時 属性 が 定め 
られ て ぉ お ら ず , し か も る, 必要 を 場合 に は , つね に, 指定 され て いる 
属性 の リス ト 人 追加 する か 暗示 し を けれ ば ならない 属性 ( 言い 換え 
れ ば , と れ ら の 属性 が 必要 を 場合 に は , と れ ら を 一 組 の 属性 (追加 
し を けれ ば な ら な い )。 


複合 ステ ー ト メン ト ( compound statement ) : 他 の ステ ー 
トメ ント を 含ん で いる ステ ー ト メン ト 。 複合 ステ ー ト メン ト は IF 
と ON だ け で ある 。 


ENTRY ス テ 
ー ト メン ト の ラベ ル ・ リ スト の 中 に ある いずれ か の 名 前 に よっ て 議 
別 さ れる スロ 点 。 
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複素 数 デー タ (complex data ) : 各々 の 項目 が 実 部 と 虚 部 か 
ら 構成 され て いる 算術 デー タ 。 


含ま れ て いる テキ スト (contained text ): (ネス ト さ れ た 
プロ シー ジャ ー る 含め て ) ブ プロシージャー の 中 に ある すべ て の テキ 
スト か ら , その 入口 名 と PROCEDURE ス テー トメ ント の 条件 接 
頭 語 と を 除い た 部 分 。 開始 ブロ ョ ッ ク の 中 に ある すべ て の テキ スト か 
ら , その ブロ ッ ク の 先頭 に ある BEG TIN ステ ー ト メン ト の ラベ ル 
と 条件 接頭 語 と を 除い た 部 分 。 内 部 プ ブロック は , 外部 プロ シー ジャ 
ー《 含 まれ て いる 。 


符号 ・ 通 貨 記号 文字 (sign and currency symbol characters) : 
ビク チャ ー 指 定 用 娘 字 s, 十 , 一 , $。 次 の ょ うら な 方 法 で こと これら の 
文字 を 使用 する と と が で きる 。 


1. 固定 文字 と し て 使用 する 。 と の 場合 , 1 つの ビ ピクチャー 指定 で 
は とこ とこ れ ら の 文字 を 1 回 し か 指定 する こと と が で きず , と れ ら の 文 
字 は , 対応 する デー タ 項 目 の 指 定 さ れ て いる 位 思 に 現われ る 。 


2. 浮動 文字 と し て 使用 する 。 と の 場合 , こ とれ ら の 文字 は (ピク 
チャ ー 指 定 の 中 の スト リン グ と し て ) 2 回 以上 指定 され る 。 
し か し , 対応 する デー タ 項 目 の 中 で は , その デー タ 項 目 の 有 
効 数 字 部 分 の 直ぐ 左側 (C 1 回 現われ ん る だ け で ある ( 現われ な 
い 場 合 も ある )。 


浮動 小数 点 定数 ( floating-point constant ) : 算術 定数 
を 参照 の こと 。 


浮動 文字 ( drifting-characters ) : 符号 ・ 通 貨 記号 文字 
を 参照 の と と 。 


部 分 的 (と 修飾 され た 名 前 ( partially-qualified name ) : 
不 完全 を 形 と 修飾 され た 名 前 。 す を わ ち , 参照 し よう と し て いる 構 
造 の メン バー の 名 前 , お よび , 構造 の 組立 て の 上 か ら 見 て この メン 
バー の 上 部 KC 連 を る 名 前 を 1 つ 以 上 (しかし, すべ て で は な い ) 含 
ん で いる , 修飾 され た 名 前 。 


不明 確 を 参照 (ambiguous reference ) : 参照 の 時 点 に ゎぉ 
いて 知ら れ て いる 名 前 を 唯一 無 二 の も の と し て 識別 する の 充分 を 
だ けり 修 飾 さ れ て いな を い ゆい 参照 。 


プリ プロ セッ サー(preprocessor): 原始 プロ グラ ム の 中 に 
ある プリ プロ セッ サー・ ス テー トメ ント を 調べ る た め の ブ ログ ラム 。 
と の ステ ー ト メン ト が 見 付か る と , と れ が 実行 され , その 結果 , 原 
始 ブ ログ ラム が 変更 され る 。 


プリ プロ セッ サー・ ス テー トメ ント (preprocessor statement) : 
原始 プア ログ ラム の 中 に あり , 原始 プア ログ ラム を どの よう 変更 すべ 
きか を 指定 する 特殊 を ステ ー ト メン ト 。 と の ステ ー ト メン ト は , プ 
リプ ロ セ ッ サ ー と 出会っ た と き , 実行 され る 。 


ブロ グラ ム ( program ) : 1 つ 以 上 の 外部 プロ ンー ジャ ー か ら 
構成 され た 1 つの 集 り で , と の 内 の いずれ か の PROCEDURE 


ステ ー ト メン ト C は OPTIONS(MAIN) オプ ショ ン が を なけれ 
ば ならない 。 
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文脈 宜 言 ( contextual declaration ) : 


プロ グラ ュ 制 御 デ ー タ ( program control data ) : PI ン T 
プロ グラ ム の 実行 て 影響 を 与え を る た め ( て と の プロ グラ ム の 中 で 使用 
され る デー タ 。 ブログ ラメ ュ 制御 デー タ (て は , 入口 ,。 タス ク , ファ イ 
ル , ラベ ル , 事象 , ポイ ンタ ー, オフ セッ ト , エリ ア の 各 タ イプ が 
ある 。 


プロ シー ジャ ー(procedure )・ PROCEDURE ス テー トメ 


ント 始ま りや PND ステ ー ト メン ト で 終る ステ ー ト メン ト の 集 り で 


あり , ブロ グラ ム の 一 部 を 成 し , 名 前 の 有効 範 胃 を 区 切り , 所 属す 
る いずれ か 1 つの 入口 名 を 参照 する と と に よっ て 活用 化 さ れる 。 


プロ シー ジャ ー 参 照 (procedure reference ) 入口 定数 ある 
い は 入口 変数 , ある い は 後に 1 つ 以 上 の 引数 リス ト を つけ た 組 込 
関数 名 (引数 リス ト を し も ゃ 可 ) 。 プロシージャー 参照 は , C ALL 
ステ ー ト メン ト を いし C ALL し オプ ショ ン の 中 か , 関数 参 数 と し て 
現われ る 。 


プロ セッ サー( processor ) : 原始 プア プログ ラム ・ テ キス ト ( 恐 
らく , プリ プロ セッ サー に よる 処理 の 済ん だ テキ スト ) の 実行 の 準 
備 を する た め の ブ ログ ラム 。 


プ ブロッ ク (block) : 開始 ブロ ッ ク ま た は プロ シー ジャ ー・ デ プロ 


ッ ク 。 


ブロ ッ ク 先 導 ス テー トメ ント (block heading statement): 
1 ブロ ッ ク の ステ ー ト メン ト の 先頭 に 置か ん る PROCEDURE ス 
テー トメ ント また は BEGTIN ス テー トメ ント 。 


プロ ロー グ (prologue ): ブロ ッ ク の 活用 化 を する と き に 自動 
的 < 行 を われ る 操作 。 


明示 的 人 宣言 さ 
れ て いたい 議 別名 が , と の 識別 名 と 特定 の 層 性 と の 結び 付き を 可能 
(て する よら な 文脈 に 現われ る こと と 。 


分 離 符号 (separator ) : 区 切り 符号 を 参照 の と と 。 


閉止 (ファ イル の ) (closing(of a file) ): 


変換 (conversion ) : 


徐 数 (yariable )・ 


ファ イル を 
デー タ ・ モ セッ ト か ら 切 り 離 す と と 。 


与え られ た 一 組 の 属性 に 合致 する よら 
(C, 値 の 表現 を ある 形式 か ら 他 の 形式 に 移し 替え る と と 。 


編集 指示 転送 ( edit-directed transmission ) : スト リ 


ー ュ 式 転送 の 1 つの タイ ブ で , 文字 の 連続 し て いる 流れ と し て デー 
タ が 現われ , 関連 すか る デー タ ・ リ スト K《 必 要 を 編集 様式 を 指定 する 
形式 リス ト が 必要 で ある も の 。 


デー タ を 参照 する の 使用 され , 値 を 割り 
当て る と と が で き , 名 前 が 与え られ て いる も ゃ の 。 変数 の 属性 は 不変 
で ある が , 時 点 が 異な た れ ば 異な る 値 を 参照 する と と が で き る 。 ど の 
よう な デー タ ・ タ イプ 関し て も , 変数 は 要素 変数 , 配列 変数 , 構 
造 変数 の 3 つ 類 別 さ れる 。 変数 は , 添字 付き で も 修飾 され て いて 
も よい し , その 両方 で あっ て も よい 。 また, ロケ クー ター で 修飾 され 
て いて も よい 。 


PP 


電 衝 科 半数 (p69O6ecfesieble 


多重 宣言 (multiple declaration ) 


文字 セッ ト ( character set ) : 


要素 家 雪 (element Yarimble): 


POINTER 属 
性 を も る つ ロ ケー ター 変数 。 こ の 変数 の 値 は 主 記憶 域内 の 絶対 アド レ 
スズ を 表わす 。 


見 か け 引 数 ( dummy argument ): 名 前 (に よっ て 渡 す と と の 
で き ない 引数 の 値 を 保管 する た め に 自動 的 に 作成 され る 一 時 記憶 域 。 


明示 宣言 (explicit declaration ) DECLARE ス 


テー トメ ント の 中 KC 議 別名 が 現われ る と と , ラベ ル 接 頭 語 と し て 識別 


名 が 現われ る と と , また は パラ メー ター・ リ スト の 中 KK 識別 名 が 現 
われ る と と 。 


モー ド (算術 デー タ の ) ( mode(of arithmetie data7/: 


算術 デー タ の 特性 の 1 つ 。 実数 モー ド と 複素 数 モー ド の 2 つが ある 。 


同じ レプ ブロック の 内 
部 に ある 同じ 識別 名 ( 異 た る 修飾 の ない ) 関す る 2 つ 以 上 の 宣言 , 
また は , 同じ ブログ ラム の 中 に ある 同じ 識別 名 ( 異 を る 属性 を 指定 
し て いる ) 関す る 2 つ 以 上 の 外部 宣言 。 


目標 変数 ( target variable ): 値 が 割り 当て られ る 変数 。 
文字 ( character ): 文字 セッ ト の 1 つの 要素 。 


文字 スト リン グ ( character string ) : ゼロ また は 1 以 


上 の 文字 か ら を なる スト リン グ 。 


文字 スト リン グ ・ ピ クチ ャ ー・ デ ー タ ( character-String 


picture data ): 少 を なく と も 1 つの A ま た は 又 ビ クチ ャ ー 指 


定 文字 を 必ず 含む ピクチャー 指定 に よっ て 記述 され る デー タク 。 


定義 され た 文字 集合 体 。 
( 言語 文字 セッ ト お よび デー タ 文 字 セ ッ ト を 参照 の と と 。 ) 


問題 デー タ ( problem data ): PL プ I ブ ログ ラム て よっ て 


処理 され る スト リン グ ・ デ ー タ な いし 人 算術 デー タ 。 


有効 を 割 振り ( significant allocation) : エリ ブ 内 の 
未 解放 の 割 振り , な よび エリ ア の 先頭 と と の 先頭 か ら 最 も 離れ て い 
る 未 解 放 割 振り の 終り と の 間 に あ る , 解放 され て いる すべ て の 割 振 
り 。 後 《C 同 じ 大 き さ の 割 振り が 同じ 位置 で 行 を われ た 場合 に は , 最 
初 の 割 振り は 有効 で を く を な る 。 


有効 範囲 ( 条件 接頭 語 の ) (scope(of sa condition prefix)): 
ある プロ グラ ム の 中 で , ある 条件 接頭 語 が 適用 され る 部 分 。 


有効 範囲 ( 宣言 の ) (scope(of a declaration)): ある 


プロ グラ ム の 中 で ある 特定 の 宣言 が ある 特定 の 名 前 の 属性 指定 と し 
て 効力 を 有 し て いる 部 分 。 


有効 範囲 ( 名 前 の ) ( scope(of a name)) : ある ブロ グラ 
ム の 中 で ある 特定 の 名 前 の 意味 が 変わ ら を ゆい 部 分 。 


要素 ( element ) : 1 項目 の デー タ 。 い くつ か の デー タ 項 目 を 
集め た も の ( たとえば, 配列 ) と 対比 され る 。 スカラー 項目 。 


要素 式 ( slement expressions ): 式 の 値 を 計算 し た 結果 


が 要素 値 に を る よう な 式 。 


ある 1 つの 要素 を 表わし 


呼 軸 し (ea11 ) ・ 


呼出 し ( invocation ) : 


呼出 し 点 ( point of invocation ) ・ 


て いる 名 前 。 スカ ラー 変数 。 


呼び 出さ れ を た プロ シー ジャ ー(inyvoked procedure)・ い ず 


れ か 1 つの 入口 点 か ら 活 用 化 さ れ た プロ シー ジャ ーo 


CALL ス テー トメ ント また は CALL オ プシ 
ョ ン ( て よる サブルーチン の 呼出 し 。 

プロ シー ジャ ー の 活用 化 。 
呼び 出さ れる プロジ 
ーー ジャー へ の プロ シー ジャ ー 参 照 が 呼出 し ブロ ッ ク の 中 に あら われ 
た 地点 。 


呼出 レプ ロッ ク ( invoking block): プロシージャー を 活用 


化す る た め の ス テー トメ ント を 含ん で いる ブロ ッ ク 。 


呼び 出す ( ea1l1l ) : CALL ス テー トメ ント また は CALL オ 


プシ ョ ン C エ よっ て サブ プ ブル ー チ ン を 呼び 出す と と 。 


呼び 出す (inyoke): プロ シー ジャ ー を その いずれ か 1 つの 人 


品 点 か ら 活 用 化す る こと 。 


ラベ ル ( label ): PROCEDURE , ENTRY 両 ス テー トメ ント 以 
外 の ステ ー ト メン ト を 識別 する の て 使 用 され る 名 前 。 ステ ー ト メン ト ・ ラ ベル o 


ラベ ル 定 数 ( labe1 constant): PROCEDURE, ENTRY 


両 ス テー トメ ント 以外 の ステ ー ト メン ト の 接頭 語 と し て 使用 され て 
いる ( 添字 の つか な い ) 名 前 。 


ラベ ル 接 頭 語 ( 1abel prefix ): ステ ー ト メン ト の 接頭 語 と 
し て 使用 され て いる ラベ ル 。 


ラベ ル 変 数 ( 1abel variable): LABE 葉 属性 を も つも の 
と し て 宣言 され て な ぉ なり, し た が っ て , 値 と し て ラベ ル ァ 定 数 を と る こと 
と の で きる 変数 。 


ラベ ル ・ リ スト (ステート メン ト の ) ( label list(of a statement)): 
ある 1 つの ステ ー ト メン ト に つい て いる すべ て の ラベ で ベル 接頭 語 。 


ラベ ル ・ リ スト ( ラベ ル 変 数 の 宣言 の ) ( 1abel 1ist(of a labe1 
yariable declaration) ) : キー ワー ド LABEL の 直ぐ 後に あ 
る , 1 つ 以 上 の ステ ー ト メン ト ・ ラ ベル 定数 を 括弧 で 囲ん だ リス ト で , 
と と で 宣言 され て いる 変数 が と る 値 の 範囲 を 指定 する た め の も の 。 
リス ト 内 の 名 前 は コン マ で 区 切ら れ て いる 。 ラベ ル 配 列 に 対し て 指 
定 さ れ て いる 場合 は , と の リス ト は , と の 配列 の 個々 の 要素 が リス 
ト 内 の 任意 の 値 を と り 得 る と と を 表わす 。 


リス ト 析 示 転 送 (1ist-directed transmission): スト リー ム 式 
転送 の 1 つの タイ ブ で , 流れ の 中 の デー タ が ブラ ンク を いし コン マ で 
区 切ら れ た 定数 と し て 現われ , 自動 的 に 形式 指定 が 与え られ る も の 。 


レコ ー ド (record): レコ ー ド 式 入出 力 操作 に お ける 転送 の 論理 単位 。 


レベ ル ん 番号 ( 1eve1 number): DECLARE を いし ALLOCATE 
ステ ー ト メン ト の 中 て ある , 構造 の 階層 に お ける 名 前 の 位置 を 指定 す 
る た め の 無 符号 の 1 0 進 整 数 定数 。 レベ ル 番 号 は と の 番号 が 適用 さ 
れる 名 前 の 直前 に あり , レベ ル ん 番号 と と の 名 前 と は 名 前 の 区 切り 符 
号 に ょ っ て 区 切ら れる 。 ENTRY 属 性 の 指定 の パラ メー ター 記 述 
子 に な いて は , レベ ル 番 号 は 名 前 を 伴 を わ を い 。 
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レベ ル 1 の 変数 ( 1eve1-one variable): 大 構造 名 。 構 千 
含ま れ て いな を い 添 字 の 付 み を い 変 数 。 


連結 (concatenation) : 指定 され て いる 順序 (C 2 つの スト 
リン グ を 結び 付け , 2 つの スト リン グ の 長 さ の 和 C 等 し い 長 さ を も 
つ 1 つ の スト リン グ す る 操作 。 演 算 子 | | に ょ っ て と の 操作 を 指 
定 す る 。 


連続 参照 ( connected reference ) : 連続 し て いる 記憶 域 
へ の 参照 。 プ ログ ラム の 実行 以前 に , と の 記憶 域 が 連続 し て いる と 
と が 明白 で を けれ ば な ら な い 。 


連続 し て い を い 記 憶 域 ( non-connected storage ) : ある 
1 つの 名 前 C よ っ て 参照 する こと の で きる 関連 する いく つか の デー 
タ 項 目 を 記憶 し て いる が , と の 名 前 に よっ て 参照 され を い 他 の デー 
クタ 項目 (て よ っ て 分 断 さ れ て いる ょ うな, 記憶 域内 の 散在 し て いる 場 
所 。 構 造 の 配列 の 中 の 添字 付 で を い 基 本 項目 名 に ょ っ て 参照 され て 
いる 記憶 域 や , 配列 の 断面 を 参照 し て いる 添字 付 の 名 前 ( 任意 の 要 
素 式 の 左側 C 星 印 の ある 添字 リスト を も つ ) (て よっ て 参照 され る 記 
憶 域 を た ど が と の 例 で ある 。 


連続 し て いる 記憶 域 ( connected storage ): 1 つの 名 前 C 
よっ て 参照 する こと と の で きる , 途切れ る と と な く 線 型 《K つ な が っ て 
いる 諸 項 目 の 主 記憶 域 。 


ロケ グー ター 修飾 ( 1ocator-qualification): 基底 付 変数 
へ の 参照 に な いて , と と で 参照 され る 基底 付 変数 の 世代 を 指定 する 
た め に 基底 付 変 数 の 左側 (C 矢 印 で つなが れ た ロケ クー ター 変数 また は 
関数 参照 , また は , ロケ ー タ ー 変 数 と 基底 付 参照 と の 暗示 的 を 連結 。 


ログ ケー ター 変数 (1ocator variable) : 主 記憶 域 C な ける 
ある 変数 また は 緩衝 域 の 位置 を 識別 する た め の 値 を も つ 変 数 。 


論理 演算 子 ( 1ogical operators ): ビ ピット ・ ス トリ ング 演 
算 子 ,。 つ ( not ) ,&( and ) , | (or )。 


論理 レベ ル ( 構造 の メン バー の ) ( 1ogical 1evel(of a 
Structure member)) : すべ て の レベ ル ん 番号 を 逐次 並べ た 
と き , す を わ ち , 隣接 する レベ ル 番 号 の 差 が 1 に な る よう すべ て の 
レベ ル 番 号 を 並べ た と き の , レベ ル 番 号 の 示す 深 さ 。 


割 概 り (allocation ) : 
1 ある 変数 の た め K 主 記憶 域 を 確保 する と と 。 
2. 割り 振ら れ て いる 変数 の 1 つの 世代 。 


割り 振ら れ て いる 変数 (allocated variable): 主 記憶 
域 と 結び つけ られ て お り , その 主 記憶 域 が 未だ 解放 さん て いな じい 変数 


_ 割 込み (interrupt): 解禁 状態 に ある ON 条件 が 引き 起 され 
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る か, ある い は 警告 の 結果 と し て ( 恐らく は 一 時 的 C ) プ ログ ラム 
の 制御 の 流れ を 変え る と と 。 


割当 て (assignment): 変数 C 値 を 与え る た め の 操 作 。 


DO グル ー プ (do-group): DO ステ ー ト メン ト で 始ま り , 対 


応 す る END ス テー トメ ント (よっ て 終る 一 連 の ステ ー ト メン ト 。 
制御 の た め に 使用 され る 。 


DO ルー プ (do-1oop) : 反復 DO グル ー ブ を 参照 の と と 。 


ON 条件 ( on-condition): PL プン エプロ グラ ム の 中 で , プ 


ログ ラム 割込み を 引き 起す 可能 性 の ある 事柄 が 起 と る と と 。 ON 条 
件 は , 予期 で き を い ェ ラー の 検出 で ある と と も あり , 予期 で きる が 
いつ 起こ と る か 分 ら を い 事 柄 の 検出 で ある と と も ある 。 


REFER 式 (REFER expression ) : キー ワー ド 
REFER の 直前 に ある 式 で , REFER ォ プシ ョ ン を も つつ 基底 付 
変数 が ALLOCATE な いし LOCATE ス テー トメ ント に よっ 
て 割り 振ら れる と き C 最 初 の 限界 , 長 さ ふ 。 また は 大 き さ が と の 式 か 
ら と られ る 。 


REFER の 目的 語 ( REFER object) : REFEER ォ プシ 


ョ ン の 中 に ある , 基底 付 構造 の ある メン バー の 現在 の 限界 , 長 さ , 
また は 大 き さ を 指定 する た め の 添 字 の つい て いな い 要 素 変数 。 こ とれ 
は , と の 構造 の メン バー で な を けれ ば を ら ず , また REFER オ プシ 
ョ ン で 宣言 され て いる メン バー の 前 に を けれ ば な ら な い 。 

2 進 法 ( binary): 2 を 基数 と する 記 数 法 。 

1 0 進数 字 桁 文 字 ( decimal digit character ): 9 と い 
うら ビク チャ ー 指 定 用 文字 。 
1 0 進 法 ( decimal) : 10 を 基数 と する 記 数 法 。 

10 進 ビク チャ ー・ デ ー タ ( decimal picture data): 次 
の タイ プ の ビク チャ ー 指 定 用 文字 を 含む ビク チャ ー 指 定 用 文字 に エ 
っ て 指定 され る 算術 ビク チャ ー・ デ ー タ 。 


ー ユ 
* 


1 0 進数 字 桁 廊 字 。 
2. 仮想 小数 点 ビ ピクチャー 文 字 。 


る で ぞ ら 消去 文字 。 
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算術 組込み 関数 の 296 
配列 取扱 い 組込み 関数 の 297 
数 学 組 込み 関数 の 
スト リン グ 取 扱い 組 込 信 関 数 の 
イン ター フェ ー ズ スズ 
COBOL 241 
FORTRAN 2 4 2 
イン ・ ラ イン 操作 。 214 
デー タ 変 換 2 1 4 
ビク チャ ー・ タ イプ 1 2 1 4 
ビク チャ ー・ タ イプ 2 216 
ピク チャ ー・ タ イプ 3 216 
スト リン グ 取 扱い 216 


上 重ね 守 孔 符号 263, 180 


296 


英字 の 小文字 また は 邦 字 , 構文 表記 法 に お ける 247 


邦文 索 引 
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エク ステ ント 8 8 式 8 9 


エク ステ ント 変数 22, 89 
限界 と て グ 8 オフ セッ ト か ら ポ イン ター へ の 変換 _ 89 
被 制 御 バ パラ メー ター の 限界 と ~ 105 オプ ショ ン 
バラ メー ター の 限界 と て 10 5 REFER 8 5 
エビ ロー グ 6 3 ARG 235 
ェ ラ ヌー 回復 220 ASCII 138, 160 
エリ ア ・ サ イズ ASSOCIATE 148 
記憶 域内 の 8 8 BLKSTZE 136, 151 
エリ アプ の サイ ズ 2 2 BUFFERS の ZS 上 当 
被 制御 パラ メー ター 105 COBOL 2.325。 2 の 8 プ 
省略 時 解釈 8 8 COPY の 
単純 バラ メー ター 105 DESCRIPTORS 7 3 
遠隔 形式 項目 132, 268 EVENT 1 4 4 
演算 ( また は 操作 ) 159 EXTENTNUMBER 15 4 
算術 224, 34 FILE 120, 142 
配列 と 配列 の 4 0 FORTRAN 237, 235 
配列 と 要素 の 4 0 FROM 1 4 3 
配列 と 構造 の 4 1 FUNCTION 1 1 4 
ビク ドー ズ ト ドリ ング ak.3534 HIGHINDEXX 1 5 4 
組込み 関数 。 34 IGNORE 1453 
て の 組合 せ 3 6 INDEXMULT1IPLE 1 5 4 
比較 35 INTER 235 
コン ズバ イル 時 。 5 INTO 人 ド 本 肖 
連結 3 6 KEY 1 4 3 
式 まき KEYFROM 1 4 4 
イン ・ ラ イン 2 1 4 KEYLENGTH 158 
挿入 。 s2 KEYLOC 158 
入力 176 KEYTO 144 
論理 224 LEAVE の 7 54 
出力 17 6 LINE 1 2 1 
接頭 32 磁気 テー ブ の 取扱 い 137, 154 
構造 と 要素 の 。 42 MEDIUM 113 
構造 と 構造 の 42 NOLABEL 138, 154 
演算 子 NOMAP 950 (の 3 
算術 8 NOMAPIN 237, 235 
比較 8 NOMAPOUT 2 の.5 の の 
て の 優先 順位 3 7 NOTAPEMK 138, 154 
スト リン グ 8 PROCEDURE プ ENTRY ス テー トメ ント の 
演算 式 3 2 転送 ステ ー ト メン ト の 1 る 10。 1-4 2 
挿入 演算 。 32 OFLTRACKS(n) 1 5 4 
接頭 演算 。 32 ORDER 206 
演算 子 の 優先 順位 し 2 PAGE 12 1 
PASSWORD 153 
オー バー ン レー 定義 RANGE ん る 3 
スト リン グ 3 4 7 レ ュ コード 形 式 も あき 4。 1.5 0 
置換 え 165, 167 RECSIZE 135, 151 
再 走査 と て 196 REORDER 207, 206 
オフ セッ ト RETURNS 9 8 
緩衝 域 | 967 SCALARVARYING 158 
デー タ 2 の SET 1 43 
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SKIP 12 1 

STRING 120 

UNLOAD 138, 154 

VERIFY 139, 154 
オフ セッ ト ・ デ ー タ 


変換 33, 89 
オペ ラン ド 
関数 参照 3 8 


また は 加 式 3 1 
オペ レー ティ ング ・ シ ジ シス テム 
と ジョ ブ 制 御 3 の "を の 0 
機能 6 
オジ ・ ユ ニッ ト 
動 的 に 受け つが れる 1 8 7 
ファ イル ・ バ パラ メー ター と ファ イル 変数 
(と 対す る 187 
ナル 187 
ON 条件 と ~ の 5 : グ 32.8 


カ 行 


カー ド 容 擬 コー ド 
4 8 一 文字 セッ ト 250 
6 0 一 文字 セッ ト 24 9 
回 帰 的 プロ シー ジャ ー 221, 61 
介在 添字 27 
開始 プア ロック 5 5 
て と プロ シー ジャ ー・ ブ ロッ ク 1 1 
終了 5 9 
外部 _ 56 
ブロ ッ ク グ 5 6 
ブ プロシージャー 5 6 
テキ スト 201 
外部 構造 。 メ ン バ ー 名 の 有効 範囲 7 0 
外部 構造 の メン バー 名 
て の 有効 範囲 7 0 
外部 テキ スト の 組込み 20 1 
外部 名 9 
制約 ググ 6 お 
て の 有効 箇 時 6 8 
解放 
暗示 的 を 8 0 
返さ れる 値 199, 9?7 
各種 演算 の 組合 せ 3 6 
各種 条件 に 対す る 標準 シス テム 処置 "185, 
拡張 2 進化 1 0 進 コ ー ド (EBCDIC) 
周 合 順序 2 
照合 順序 , (EBCDIC) 7 
4 8 一 文字 セッ ト 250 
6 0 一 文字 セッ ト 249 
加算 165, 167 


加算 記号 +) 7 


貸方 (CR ) ビク チャ ー 文 字 
数 字 ピ クチ ャ ー 指 定 に な ける 用 法 2 6 4 
貸方 記号 , 借方 記号 , 上 重ね 塞 則 符号 263 


CR ピク チャ ー 文 字 
D B ビク チャ ー 廊 字 
IT ビ クチ ャ ー 文 字 
R ビ ピクチャー 文字 
T ビ ピクチャー 文字 
括弧 () 7 
活用 化 ( ブロ ッ ク の ) 


第 1 ブ プロシージャー 
呼出 し 側 ブ ロッ ク 

呼出 し 地点 5 8 
主要 入口 点 _ 58 
プロ シー ジャ ー 参 照 
避 次 入口 点 5 8 


264 
264 
264 
26 4 
26 4 


5 7 


5 9 
5 8 


5 7 


活用 状態 に ある プロ シー ジャ ー の 


再 活用 化 (回 帰 ) 


可変 長 レ コー ド 1 3 5, 


6 1 
150 


カラ ム ・ バ イナ リー(COLBIN) 1 4 9 
借方 ( DB ) ビク チャ ー 文 字 
数 字 ピ クチ ャ ー 指 定 C お ける 用 法 2 64 


緩衝 域 


割 振り 9cXse ESS の 


オフ セッ ト 137 
関数 1。 ダサ る 6 

ADDR 組込み 8 

組込み この 割 振り 


2 


8 1 


て と 擬似 変数 228 


算術 組込み 295, 296 

配 烈 取扱 い 組 込み 29?7, 296 
非同期 式 入 出力 組 込 296 
返さ れる 値 の 属性 9 7 

プー ル 組 込み 3 5 

組込み 9 9 

条件 取扱 い 組込み 296 

凌 千 134, 148 

EMPTY 組込み 9 0 

サブ ルー チン と ぐ の 出口 点 9 4 
FORTRAN ライ ブラ リー 100 
関数 参照 ?6 

GO TO ステ ー ト メン ト 9 7 
数 学 組込み 2 の な 、。 タプ 

ナル 組込み 8 7 

組込み ー を 用 いる 演算 3 4 

オプ ショ ン 1 1 4 

参 照 9?6 


参照 オペ ベラ ンド 38 
RETURN ステ ー ト メン ト 97 
記憶 域 制 御 組 込み _ 296 


邦文 案 引 
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ST REAM 入 出力 組込み 296 

スト リン グ 組 込み 1 8 2 

スト リン グ 取 扱い 組込み 295, 2926 
サブ ルー チン と 9 3 


関数 と 条件 コー ド 
条件 組込み 1910 

カン マ (, ) 7 

キー 
内 蔵 さ れ た 162 
原始 165 

キー 163, 161 
て の 分 類 157 
条件 コー ド 318 
変換 "166 


長 さ オプ ショ ン ( KEYLENGTH ) 158 
位置 オプ ショ ン (KEYLOC ) 158 
オブ ショ ン 1 4 3 

記録 され た 162, 166 

原始 16 2 


キー ワー ド 


の リス ト ( プル ファ ベッ ト 須 ) 251 


キー ワー ド ・ ス テー トメ ント 9?, 10 
キー ワー ド , 予約 され た 6 5 
キー ワー ド の 省略 形 。 251 


呈 山 ! 


憶 城 


< の 割 振 り 4, 6 1 
自動 78 

基底 付 81 

連続 24 

制御 "77 

制御 条件 323 
制御 ステ ー ト メン ト 49 
被 制御 7 8 

非 連続 24 

静 的 77 

共通 域 の 使用 人: 克 / 


記憶 域 制 御 ス テー トメ ント 4 9 


ALLOCATE お よび FREE ス テー トメ ント 


記憶 域 の 制御 77 


自動 記憶 域 7 8 
基底 付記 憶 域 8 1 
組込み 関数 296 
被 制御 記憶 域 7 8 
ステ ー ト メン ト 4 9 
静 的 記憶 域 グン 7 


機械 か ら の 独立 3 
記号 


複合 249, 250 


記号 名 1 3 
擬似 変数 298, 38 
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4 9 


組込み 関数 と て 295 
COMPLETION 304 
COMPLEX 305 
DATE 305 
IMAG 307 
ONCHAR 309 
ONSOURCE 311 
REAL 312 
STATUS 3 13 
STRING 313 
SUBSTR 314 
TI ME 3 1 4 

UNS PEC 315 


関数 と て 2 28 
記述 子 リ スト 
パラ メー ター (1 
記述 ステ ー ト メン ト 4 5 
基数 1 4 
基数 , 算術 
標準 省略 時 解釈 71 
基底 付記 憶 域 81 
ADDR 組込み 関数 82 
基底 付 変数 に 対す る ALLOCATE 


ステ ー ト メン ト 8 6 
ェ リ ア の 割当 て ? 0 


ェ エリ アプ 88 
基底 付 変数 と 入出 力 83 
基底 付 変数 に 対す る F REE 


ステ ー ト メン ト 8 6 

ェ リ ア の 入出 力 9 1 

リス ト 処 理 86 

ロケ ー タ ー 修 和 飾 8 1 

基底 付 変数 の 複数 世代 8 6 

複数 ケー ター 修飾 9 1 

NULL 組込み 関数 8 7 

ポイ ンタ ー 変 数 8 2 

自己 定義 デー タ ( REFER オプ ショ ン ) 8 5 

リス ト の タイ プ 88 
基底 付 変数 83 

位置 指定 モー ド 8 3 

LOCATE ス テー トメ ント 8 4 

SET を 伴う READ ス テー トメ ント 8 4 
基底 変数 

DETF INED 属 性 (お ける 3 4 4 
機能 

言語 間 の 連絡 233 

数 字 の 18 0 

オペ レー ティ ング ・ シ ステ ム の 6 
基本 項目 名 2 5 
迫 問 符 ?) 7 
前 原始 リス ティ ング 195 


行 ( デー タ の ) 1 1 9 


境界 

整数 倍 の 28 
境界 合せ 

属性 2 


レコ ー ド の 415 
境界 合せ され を な い ビ ッ ト ・ ス トリ ング 1 4 1 
共通 

式 の 排除 208 

式 205 

記憶 域 237 
虚数 定数 
功 捨 て 1 4 

ビッ ト ・ ス トリ ング 2 0 

文字 スト リン グ 1 9 
記録 され た キー 166, 162 


組込み 関数 

FORTRAN ラ イブ ラリ ー 関 数 100 
組込み 関数 9?9 

ADDR 82 

集合 体 を 引数 と する 29?7 

割 振り 8 1 

と 擬似 変数 295 

算術 295, 296 

配列 取扱 い の の 2 1 の 8 

非同期 式 入出 力 296 


プー ル 代 数 3 5 
ン の 分 類 295 
条件 取扱 い 296 


て における 9 り の 変換 296 
EMPTY 9 0 
数 学 29?7, 295 
と の ナル 引数 298 
て を 用 いる 演算 。 34 
記憶 域 制 御 296 
STREAM 入 出力 _ 294 
スト リン グ 18 2 
スト リン グ 取 扱い 296, 295 
組込み サブ プルー チン 100 
繰返し 因数 1 9 
繰返し 指定 2 


グル ー プ 
と ブロック 1 1 
DO 2210 


計算 関係 の 組込み 関数 の 分 類 295 
計算 ステ ー ト メン ト 47 
形式 

省略 時 の 136, 152 

一 般 。 122 


形式 


リス ト 指示 入力 1 2 4 

リス ト 指示 出力 125 

リス ト 129 

PL プ I ス テー トメ ント の 7 
オプ ショ ン 134, 150 
レコ ー ド 1 3 る 。 13 き 7 
ゾー ン 付 1 0 進数 1 8 
化 ( リス ティ ング の ) 

制御 ステ ー ト メン ト 203 


形式 項目 


て の リス ト (アプ ルフ ラテ ァ ベ ッ ト 順 ) 268 
COLUMN 2e9 
制御 267 

デー タ 26 7 
編集 指示 267 

て の 式 。 132 
LINE の の 
PAGE 27 2 
印刷 ファ イル 1 32 
遠隔 268 
SKIP 273 


形式 項目 の リス ト ( アル ファ ベッ ト 順 ) 268 


限界 


寺 序 
コロ ロロ 


寺 計 
日 ロ 


A 形 式 項目 268 

B 形 式 項目 268 

C 形 式 項目 269 

COLUMN 形 式 項目 269 

形式 項目 2 

F 形式 項目 27 1 

L 1 NE 形式 項目 27 2 

P 形 式 項 目 ググ 2 

PAGE 形 式 項目 の の 

ER 形式 項目 2753 

SKIP 形 式 項目 27 う 3 

藤 形 式 項目 レ 和 に 1 

と 範 囲 2 3 

間 の 環境 238 

PL プ 1 天 境 の 設定 2 あお 

GO TO ステ ー ト メン ト 240 
割込み 処理 240 
FORTRAN ル ー チ ン て よる 入出 力 の 制約 
FORTRAN お よび COBOL 上 ルー チン の 終了 
間 の 連絡 機能 233 


呼出 し 235, 237 


減算 
原始 


CO BOL ま た は FORTRAN ル ー テ チン 
へ の 引数 の 受渡 し 234 
PL ププ ロジ シー ジャ ー へ の 
引数 の 受渡 し 236 
共通 域 の 使用 237 
記号 (7 


邦 文 索 引 435 


238 
2 4 1 


リス ティ ング 195 A RE A 条 件 3 1 9 


原始 ブロ グラ ム と 一 般 的 な 統語 規則 221 文字 セッ ト と その EBCDIC を ら び カー ド 孔 。 249 
原 フ ィ ー ル ド ・ 目 標 フ ィ ー ル ドド 変換 規則 。 277 CHECK 条 件 320 
条件 318 
光学 式 マ ー ク 読取 ( OMR ) 1 49 条件 組込み 関数 19?0 
交換 (COBOL ) CONDITION 条 件 320 
デー タク 156 CONVERSION 条 件 32 0 
交換 コー ド 110 ENDFILE 条 件 319 
更新 ENDPAGE 条 件 319 
順次 16 1 ERROR 条 件 318, 321 
構造 24 FINISH 条 件 318 
< の 配列 。 26 FIXEDOVERFELOW 条 件 319 
基本 的 を プロ グラ ム の 1 0 情報 交換 110 
被 制御 8 1 KEY 条件 318 
て の 配列 の 断面 参照 "27 NAME 条 件 318 
式 。 31, 4 1 OVERFLOW 条 件 3 19 
挿入 演算 子 と て 4 1 RECORD 条 件 318 
レベ ル 2 5 S 1 ZE 条件 319 
大 ~ 2.5 STRINGRANGE 条 件 319 
マッ プ 作 成 "403 STRINGS1ZE 条 件 3 1 9 
ホー 2 5 SUBSCRIPTRANGE 条件 32 0 
接頭 演算 子 と ー 41 TRANSMIT 条 件 318 
プロ グラ ム 3 UNDERFLOW 条 件 319 
修飾 され た 名 前 。 226 UNDEFINEDFEILE 条 件 319 
変数 22 ZERODIVIDE 条 件 319 
構造 式 4 1 構文 表記 法 247 
挿入 演算 式 と 構造 41 記法 定数 。 247 
接頭 演算 式 と 構造 41 表記 法 変数 。 247 
構造 と 構造 の 演算 。 42 項目 
構造 と 要素 の 演算 。 42 A 形 式 。 268 
構造 の 配列 26 B 形 式 268 
構造 の 配列 C 形 式 の 6 
断面 参照 2 7 文字 スト リン グ ・ ビ クチ ャ ー の 7 
介在 添字 27 COLUMN 形 式 269 
添字 付 の 修飾 され た 名 前 。 26 制御 形式 129, 131, 267 
構造 の マッ プ 作 成 403 デー タ 形 式 の る ア 
UNALIGNED 属 性 の 効果 404 E 形 式 27 0 
< の 例 406 編集 指示 の 形式 267 
レベ ル 番 号 403 形式 項目 の 中 の 式 る 2 
論理 レベ ル 403 F 形式 2 デ 1 
一 対 の マッ プ 作 成 (と 関す る 規則 404 LINE 形 式 。 272 
対 を 作る 順序 に 関す る 規則 403 数 字 ピ クチ ャ ー 257 
構造 変数 22 P 形 式 。 272 
コ ュー ディ ング ( 最適 化 コ ン バ イ ラー の 原始 PAGE 形 式 2 が 2 
プロ グラ ム の ) 208 R 形 式 グ ブ る 
別名 を もつ 変数 208 遠隔 形式 132, 268 
共通 式 の 排除 208 SKIP 形 式 ク プ る 
その 他 の 最適 化 機能 。 210 形式 273 
余分 を た 式 の 排除 210 固定 小数 点 デ ー タ 
不変 の 式 の 移動 2 2 進数 255 
だ 1 0 進数 1 4 


固定 長 レ ヌード 135, 150 
ラロ ジン に ) / 
コン バイ ラー 

最適 化 セ メン バイ ラー の た め の 

原始 アロ グラ ム の コー ディ ング 208 

コン バイ ル 時 の ステ ー ト メン ト 3926 

(プリ プロ セッ サー・ ス テー トメ ント も 見 + ) 
コン バイ ル 時 の 操作 5 
コン バイ レー ショ ン 

て の 条件 _ 323 

て の 速度 の 向上 210 


サ 行 


再 活用 化 一 活用 状態 の 
プロ シー ジャ ー の (回 帰 ) 6 1 
サイ ズ 属 性 365 
再 走査 と 置換 え 196 
最適 化 の. 本 。 用 1 0 
最適 化 コ マンバ パイ ラー 対す る 
原始 プア ログ ラム の コー ディ ング 208 
共通 式 の 205 
デー オメ 穫 理 の ( 計 ・/ 
余分 た な 式 の 排除 208 
式 の 単純 化 208 
入出 力 操作 の 153 
ORDER ぉ よび REORDER オ プシ ョ ン 206 
不変 の 式 ま た は ステ ー ト メン ト の 移動 206 
索引 付 編成 1 6 1 
デー タ ・ セ ッ ト の 作成 1 6 2 
直接 アク セス 1 6 3 
キー 16 1 
順次 アク セス 才 妥 
セッ ト 1 42 
ササ プルー チン 9 5 
と 関数 9?3 
組込み 関数 100 
END ス テー トメ ント 9 5 
GO TO ステ ー ト メン ト 9 5 
参照 95 
RETURN ステ ー ト メン ト ? 5 
STOP ステ ー ト メン ト 9 5 
サブ ルー チン と 関数 9 3 
組込み 関数 ?9 
組込み サブ プ ル ー チ ン 100 
て の 入口 点 9 4 
ENTRY ステ ー ト メン ト 9 4 
ー の 出口 点 94 
関数 9 6 
総称 入口 名 と 参照 9?8 
PROCEDURE ステ ー ト メン ト 9 4 


引数 と パラ メー ター の 関係 申 邊 問 
RETURNS 属 性 と RETURNS オ プション 9 4 


サ プ ブルー チン 9 5 
ENTRY 属 性 の 用 法 
算術 224 
組込み 関数 295, 2 
変換 "32 
デー タ 1 3, 7 1 
演算 。 224 
演算 34 
演算 子 8 
算術 演算 295。 34 
組込み 関数 を 用 いる 演算 
算術 六 算 の 結果 34 
算術 演算 の 結果 3 4 
算術 デー タ 人 E あ 。 デ 
基数 1 4 


2 進 固定 小数 点 デ ー タ 
2 進 浮動 小数 点 デ ー タ 


複素 数 1 


7 


複素 数 算術 デー タ 1 7 
1 0 進 固定 小数 点 デ ー タ 
1 0 進 浮動 小数 点 デ ー タ 


モー ド 1 4 

数 字 デ ー タ 1 7 

精度 1 4 

< の 精度 。 72 

スケ ー ル 1 4 
参照 

関数 9 6 

総称 入口 名 と 一 2 8 

オペ ラン ド 3 8 

グロ ジ ー ジ ャ ー 5 7 

ーー デジ 9 5 
式 4 

配列 31。 39 

共通 308, 205 

要素 3 1 

値 の 計算 277 

ファ イル 1 1 1 


形式 項目 の 中 の 1 3 2 


て の 表記 
演算 3 1, 
て の 演算 
ボ ポイン ター 
人 分 を 2 
スカ ラー 
単純 化 2 
構造 3 1, 
添字 と し て の 


1 05 
3 2 
3 3 
8 2 
1 0 
3 1 
08 
4 1 
2 4 


9 4 


2 6 


3 4 


1 5 
1 6 


1 4 
1 6 
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オフ セッ ト 8 9 
< の 用 ゆい 方 3 1 
プリ プロ セッ サー 198 
磁気 テー ブ の 取扱 い オ ブ プション を 7。 5.4 
LEAVE オブ プ ション 137, 154 
NOLABEL オブ ショ ン 138, 154 
NOTAPEMK オプ ショ ン 宙 き 8 1 呈 :4 
UNLOAD オブ プ ション 138,。 154 
式 と デー タ 変 換 3 1 
配列 式 31。 39 
日 標 フ ィ ー ル ド の 属性 3 9 


デー タ 変 換 3 2 
要素 式 3 1 
例外 条件 43 
式 の 演算 。 33 


関数 参照 オペ ベラ ンド 38 
オペ ラン ド ま た は 副 式 3 1 
演算 式 3 1 

スカ ラー 式 3 1 

構造 式 31, 41 


式 の 用 ゆい 方 3 1 
識別 名 9 
次 元 

配列 2 3 


引き 継が れる 2 7 
次 元 属 性 23, 348 
自己 定義 デジ データ ( REFER オ プシ ョ ン ) 8 5 
目的 85 
事象 デー タ の の 
事象 変数 145 
指数 演算 記号 (** ) 7 
指数 指定 文字 265 
E ビ ピクチャー 文字 265 
KK ピク チャ ー 文 字 2 6 5 
シス テ メ 機 能 6 
シス テム の 処置 に 関す る 条件 323 


実行 
と の 速 度 の 向上 2 1 1 
実数 定数 プ 
指定 
属性 7 3 
文字 スト リン グ ・ ビ ピク チャ ー 18 0 


デー タ 1 2 1 

デー ク 指 が デー タク 125 
編集 指示 デー タ 128 
省略 時 属性 の 因数 化 74 
リス ト 指示 デー タ 1 2 4 


数 字 (4 

ビ ピクチャー 8/ 

数 字 の ピク チャ ー 文 字 ' 9 ヶ * 17 8 
繰返し 1 2 2 
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10 進 小数 点 259 
数 字 259 
指数 265 
自動 記憶 域 78 
自動 変数 
< の 回 帰 に 対す る 影響 7 8 
自動 変数 の 回 帰 
て の 影響 7 8 
斜線 () 7 
集合 体 
引数 と し て の 297 
デー タ た ルル サッ こ の 妥 : ア 
終止 符 ・) 7 
修飾 
明示 的 を 9 1 
暗示 的 を 9 2 
ログ ケー ター 8 1 
複数 の ロケ ー タ ー 9 1 
修 侵さ れ た 名 前 2 6 
終了 
開始 ブロ ッ ク 5 9 
プ ブロック の 5 2 
FORTRAN と COBOL し ルー チン の 
プロ グラ ム 6 0 
出力 
デー タ 指 示 119 
ー と 対す る デー タ 指 示 の デー タ 指定 
編集 指示 120 
ファ イル 13 6 
形式 ド み 5 
六 力 と を 5 
リス ト 指 示 119 
ェ エリア の 9 1 
操作 1 7 6 
プリ プロ セッ サー の 入力 と て 195 
スト リー ム 式 #。 学 
主 プ ブ プロシージャー 5 9 
手法 
プロ グラ ミン グ 2 10 
主要 入口 点 9 
状況 値 トド: 委 
上 下関 係 ( 名 前 の ) 5 
条件 
CHECK 189 
< の 分 類 3.279 
コー ド (オン ・ コ ー ド ) 318 
コン バイ レー ショ ン の 323 
条件 コー ド 3 20 
CONVERSION 4 3 


例外 


4 ぅ 


24 1 


127 


入出 力 323 
て の リ スト 323 
接頭 語 10, 185 
プロ グラ ム ・ チ ェ ッ クア ッ ウト 323 
プロ グラ マー が 名 付け る 323 
S 1 ZE 4 3 
記憶 域 の 制御 あの 
STRINGRANGE 190, 43 
SUBSCRIPTRANGE 190 
シス テム ュ の 処置 に 関す る 323 
条件 組込み 関数 と 条件 コー ド 190 
条件 ユー ド (ON コー ド ) 318 
AREA 319 
CHECK 320 
CONDITION 3 2 0 
CONVERSION 320 
ENDFTILE 319 
ENDPAGE 319 
PERROR 318, 321 
FINISH 318 
FIXEDOVERFLOW 319 
KEY 3 18 
NAME 318 
OVERFLOW に 全 。 
RECORD 318 
S 1ZE 319 
STRINGRANGE 319 
STRINGS1ZE 319 
SUBSCRIPTRANGE 3 2 0 
TRANSMIT 3 18 
UNDEFINEDEFILE 3 2 
UNDERFELOW 319 
ZERODIVIDE 319 
条件 接頭 語 を 用 いる デバ ベッ ギ ング 1 0 
条件 取扱 い 組込み 関数 296 
条件 の 禁止 185 
条件 の リス ト 323 
条件 の 分 類 3253 
計算 関係 の 条件 323 
入出 力 条 件 323 
プロ グラ マー が 名 付け る 条件 323 
記憶 域 制 御 C 関 する 条件 323 
プロ グラ ム ・ チ ェ ッ クア プッ ウゥ ト 条 件 _ 323 
シス テム の 処置 に 関す る 条件 323 


小 構造 2 5 
乗算 記号 (* ) 7 
小数 点 ・) 7 
小数 部 1 6 


情報 交換 コー ド 1 10 
EBCDIC 1 1 0 
情報 交換 用 米国 標準 コー ド (ASCII ) 1 10 


ASCII 110 
省略 時 解 央 373 

想定 3 

レコ ー ド 形式 136, 152 

標準 て の 復元 74 

て の 規則 139, 160 

ステ ー ト メン ト 7 2 
初期 値 化 220, 223 
除算 記号 () 7 
処置 の 設定 18 5 
処置 の 指定 

ON ステ ー ト メン ト C お ける 
ジョ ブ 制 御 
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オペ レー ティ ング ・ シ ジス テム 221, 220 


ジョ ブ 制 御 ス テー トメ ント 
ASSGN 114。 115 
DLBL ( 法 |/ 
EXTENT 1 5 4 
TLBL 1 17 

処理 1 4 5 
リス ト 8 6 
位置 指定 モー ド 1 4 7 
移動 モー ド 1 4 5 


ベイ ッ タチ 
複数 。 212 
に 
数 


て 女 字 ピク チャ ー 項 目 が.5 

で 文字 デー タ 入 沈 

て 文字 指定 7 ブフ 
数 学 関数 の 正確 度 2 ツア 
数 学 組込み 関数 29?7, 2975 
数 字 

2 進 7 

1 0 進 7 

^ 指 定 文 字 259 
数 字 指 定 文字 と 1 0 進 小数 点 指定 文字 

V ビ ピクチャー 文字 259 

9 ビ ピクチャー 文字 259 
数 字 か ら コ ー ド 化 算術 形式 へ の 変換 
数 字 か ら ピ ビッ ト へ の 変換 289 
数 字 か ら 文 字 へ の 変換 288 
スカ ラー 式 3 1 
スケ グール 1 4 
スケ ー ル 因数 266 

F ビ ピク チャ ー 文 字 。 266 
スタ ッ カ ー 

選択 ( STACKER ) 1510 
スタ ッ カ ー 選 択 

STACKER オプ ショ ン 1510 


259 


279 
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スタ ッ カ ー 選 択 ( STACKER ) 134, 150 
ステ ー ジ 
プロ セッ サー 195 
スネ ステー トメント 176,。 367, 389 
% 割 当て 。 397 
喝 ナ ル 400 
ALLOCATE 367, 49 
割当 て 23. の 6 ササ 。 47 
BEGIN 371, 48 
CALL 37 2 
< の 分 類 4 5 
の クラ ス 4 5 
DEFAULT 373, 45, 7 2 
DELAY 37 6 
DISPLAY また 75。 の 
DO 377,。50 
END 379, 49, 25 
ENTRY 380, 48, 2 4 
FORMAT 3 8 1 
CLOSE 7 当 
複合 10 
制御 49 
デー タ 転 送 120, 141 
DECLARE 4 5 
DELETE 142, 376 
記述 4 5 
例外 制御 52 
GO TO 240, 383, 49, 95, 97 
入出 力 4 6 
キー ワー ド 1 0 
リス ティ ング 制御 必 の 5。 分 せる 3。 4 性 れ 、 5 る 
LOCATE 2 き 8 4。 4 
反復 し たい DO 5 
ナル 10, 385 
FREBE 381, 49 
GET 3 8 2 
IF 383, 49 
プリ ブロ セッ サーRETURN 40 1 
PROCEDURE 387, 48, 94 
PUT 389 
RETURN 392, 95, ?7 
STOP 394, 52, ?5 
WAIT 39 4 
ON 186, 385, 52 
OPEN 116, 386 
接頭 語 10 
プリ プロ セッ サー 195, 202, 396, 53 
プロ グラ ム 編 成 4 8 
READ 142, 390 
レコ ー ド 転送 4 6 
REVE RT 18.8, 322, 52 
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REWR 1I TE 142, 393 
SIGNAL 189, 394, 52 
単純 1 0 
記憶 域 制 御 "49 
スト リー ム 転 送 4 6 
WRITE 142, 325 
ステ ー ト メン ト の 分 類 45 
ステ ー ト メン ト の クラ ス 4 5 
制御 ステ ー ト メン ト 4 9 
デー タ 移 動 と 計算 ステ ー ト メン ト 4 7 
記述 ステ ー ト メント 4 5 
例外 制御 ステ ー ト メン ト 5 2 
入出 力 ス テー トメ ント 4 6 
リス ティ ング 制御 ステ ー ト メント 5 3 
プリ プロ セッ サー・ ス テー トメ ント 5 3 
プロ グラ ム 編 成 ス テー トメ ント 4 8 
記憶 域 制 御 ス テー トメ ント 4 9 
スト リー ム 
STREAM 組 込み 関数 296 
て 内 の デー タ 指示 デー タ 125 
入力 1 2 0 
て 内 の リス ト 指示 デー タ 1 2 4 
出力 人 人 の: 
出力 印刷 分 
転送 ステ チー トメ ント 4 6 
スト リー ム 式 転送 109 
DATA オプション 125 
EDIT オプ ブ プション 128 
LIST オプ ショ ン 1 2 4 
スト リン グ 人: 
境界 合せ され を な い ビ ピッ ト 1 4 1 
スト リン グ 


ピット 3 6 

組込み 関数 18 2 
26。 る 0 

デー タ 8。 2 
取扱 い 216 

演算 子 8 
オー バー レー 定義 347 
擬似 変数 313 


スト リン グ ・ オ プシ ョ ン 1 20 
デー タ の 幼 集 17 6 
GET ステ ー ト メン ト の 383 
PUT ステ ー ト メン ト の 389 
スト リン グ ・ デ ー タ 18 
て の 長 さ の 変更 17 5 
ピッ ト ・ ス トリ ング ・ デ ー タ 2 10 
文字 スト リン グ ・ デ ー タ 1 9 
繰返し 因数 1 9 
スネ ストリング ・ デ ー タ の 長 さ の 変更 | アア 5 
スト リン グ 取 扱い 組込み 関数 296, 295 


正規 化 さ れ た 1 6 進数 の 消 動 小数 1 6 
制御 
形式 項目 1 の 9。 1 る 1。 2 み 67 
プロ グラ ム 221 
ステ ー ト メン ト 4 9 
記憶 域 の 7 7 
御 御 コ ー ド (CTL3620 プ CTLASA ) 
制御 ステ ー ト メン ト 4 9 
CALL, RETURN, ぉ な よび END 
ステ ー ト メン ト 5 1 
DO ステ ー ト メン ト 5 0 
例外 5 
GO TO ステ ー ト メン ト 4 9 
IF ステ ー ト メン ト 4 9 
入出 力 4 7 
上 炎 デ ポ ジグ 203, 401 
非 反 復 DO ステ ー ト メン ト 5 1 
STOP ステ ー ト メン ト 5 2 
記憶 域 4 9 
制御 変数 ( DO ステ ー ト メン ト の ) 5 0 
正常 な プロ グラ ム の 終了 6 1 
整数 ( 倍 の ) 境界 28 
静 的 
割 振り 6 1 
記憶 域 77 
精度 1 4 
算術 デー タ た 
精度 属 任 343 
正 符 号 人 は) 7 
接頭 演算 子 
て と 配列 4 0 
て と 構造 4 1 
接頭 語 
条件 10, 185 
ラベ ル 1 0 
演算 3 2 
スネ ステー トメ ント 1 0 
セミ コロ ン 《⑮) 7 
ゼロ 
先行 14 
末尾 の 1 4 
ゼロ 消去 文字 259 
* ビ ピクチャー 文字 260 
Y ビ ピクチャー 文字 260 
ビク チャ ー 文 字 2e0 
ゼロ の 値 る 6 1 全 1 
宣 


忠 


属性 の の 。 タゲ 


文脈 6 6 
明示 6 5 
暗示 6 7 


15 6 


レコ ー ド ・ フ ァイル の 168 
宣言 の 例 6 7 
塞 孔 制御 オプ ショ ン 1.5.26 
先行 ゼロ ( 算術 デー タ の ) 1 4 
選択 

総称 98 
選択 (STACKER ) 

スタ ッ カ ー 134, 150 


走査 
プリ プロ セッ サー 195 
総称 選択 9 8 
装置 
機能 ( FUNCTION ) 134, 1 48 
て か ら の 独立 性 全容 4 
タイ プ (MED 1I UM ) 2 衝 。 当 8 
装置 か ら の 独立 性 1 1 4 
装置 に 結び つけ られ る ファ イル ( IBM 
3525 カ ー ド 究 孔 装置 ) 167 


装置 名 , 記号 1 1 3 
挿入 演算 。 32 
挿入 演算 子 
< と 配列 40 
< と 構造 41 
挿入 文字 261 
グ 挿 入 文 字 。 261 
, 挿入 文字 261 
B 挿 入 文字 261 
伏字 
と と し て の 式 2 4 
介在 2 フ 


添字 付き の 修飾 され た 名 前 2 6 

ゾー ン 付 1 0 進数 形式 18 

属性 3 さる 
付加 的 用 
ALTIGNED 28 
ALTIGNED と UNALIGNED 339 
境界 合せ 4 
択 一 的 弥 1 
AREA 339 
AUTOMATIC 3 4 0 
BACKWARDS 上 小尾 オ 4 
BASED 3 4 1 
BINARY と DECTIMAL 3 4 1 
BIT と CHARACTER 3 4 2 
BUFFERED 1.1.2 
BUFFERED と UNBUFFEERED 3 4 2 
BUILTIN 3 4 3 
CHARACTER 34 3 
COMPLEX と REAL 343 
CONDITION 343 
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CONNEC TED 343 

CONTROLLED 3 4 4 

DECIMAL 3 4 4 

宣言 と て クウ 0。 グッ 2 

DEFINED 27, 34 4 

次 元 2.3。 3 4.8 

次 元 属 性 348 

D I RECT 激 2 謙 

DIRECT と SEQUENTIAL 3 る 48 

ENVIRONMENT 公 み 5.5 1 

ENVIRONMENT, レ ュ ー ド 方 式 
の 転送 の 場合 1 4 8 

ENVIRONMENT, スト リー ム 方 式 
の 転送 の 場合 133 

EVENT 351 

外部 _ 68 

EXTERNAL と INTERNAL 3 53 

ファ イル 1 1 1。 353 

FIXED と FLOAT 3 5 4 

FLOAT る 35: 導 

GENERIC 3 5 4 

INITIAL 29, 355 

INPUT, OUTPUT, UPDATE 357 

INTERNAL 358, 68 

IRREDUC 1 BLE と REDUCIBLE 358 

i SUB 定 義 34 6 

LABEL る : お :8 

長 さ 02 

LIKE 27, 359 

返さ れる 値 の が -Z 

目標 の 3 9 

OFESET と POINTER 3 6 10 

OPTIONS 360 

OUTPUT き :@ 2 

バラ メー ター 10 5, 362 

PICTURE 36 2 

POINTER 3 643 

POSITION 363 

精度 363 

PRINT 112, 364 

て の 適用 の 過程 

REAL 3 6 4 

RECORD 1 1 1 

RECORD と STREAM 364 

REDUCIBLE 3 6 4 

RETURNS 364, 977 

RETURNS オ プシ ョ ン 9 8 

バラ メー ター 記述 子 の リス ト 関す る 規則 3 49 

SEQUENTIAL 1 142。 265 

単純 定義 345 

サイ ズ 365 


サイ ズ 属 性 _ 365 
指定 73 
STATIC 365 
STRPAM 111, 365 
スト リン グ ・ オ ー バ ベー レー 定義 347 
UNALIGNED 28, 365 
UNBUFFERED 條 告 全う な 5 
UPDATE 365 
VARIABLE 365 
VARYING 366 

属性 の 適用 の 過程 が 3 


タ 行 
大 括弧 ( 〕 
構文 法 の 定義 に な ける 2 47 
大 構造 2 5 
代数 比較 35 
比較 35 
タイ プ 
引数 の 106 
変換 の 92 
デー タ の の 2 
リス ト の 8 8 
REGIONAL 編 成 の 163 
パラ メー ター の 106 


タイ プ ブ (MED1IUM ) 

装置 の 134。 148 
タイ プ の 変換 3 2 
択 一 属性 1 1 1 


BUFFERED ぉ よび UNBUFFERED 属 性 
INPUT, OUTPUT ぉ と よび UPDA TE 属性 


SEQUENT IAL ぉ よび DIRECT 属 性 
STREAM お ぉ お ょ び RECORD 属 性 早生 


タグ 位置 (PRINT フ ァイル の ) 時 
ダブ プル ワー ド 28 
単 一 引 用 符 り 7 
単価 記号 @⑯) 7 
単純 化 
款 208 
単純 スイ ッ チ 2 
単純 ステ ー ト メン ト 1 0 
単純 ステ ー ト メン ト と 複合 ステ チー トメ ント 
割当 て ステ ー ト メン ト 1 0 
条件 接頭 語 1 0 
キー ワー ド ・ ス テー トメ ント 1 0 


ラベ ル 挨 頭 語 _ 10 
ナル ・ ス テー トメ ント 1 0 
ステ ー ト メン ト 接頭 語 1 0 
単純 定義 345 
単純 パラ メー ター の 限界 , 長 さ 。 お よび サイ ズ 


1 0 


1 1 2 
1 1 1 
1 12 
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断面 参照 
配列 の 。 24 
構造 の 配列 の 。 27 
構造 の 2 7 


チェ ッ ク ア ウト , プロ グラ ょ ム の 185 
(プロ グラ ム ・ チ ェ ッ ク ブ ウト も みよ ょ ) 


中 括弧 { ) 

構文 表記 法 に な ける 一 - の 定義 2 4 7 
注釈 9 
注釈 の 区 切り 9 
直接 アク セス 

REG IONAL (3) 編成 な 7 
直接 アク セス 


装置 の 用 法 1 54 

索引 付 編 成 163 

REGTIONAL(①⑪ 編 成 1 6 4 
直接 アク セス 装置 の 用 法 1 5 4 
直接 アク セス 装置 の 用 法 


EXTENTNUMBER オ ブ プション 1 5 4 


HIGHINDEX オ プシ ョ ン 1 5 4 


INDEXMULTIPLE オ プション 15 4 


OFLTRACKS(n) オ ブ プション 1 5 4 
VERIFEY オ プシ ョ ン 15 4 


対 を 作る 順序 
と 関す る 規則 403 

追跡 , 活用 状態 に ある ブロ ッ ク の , (SNAP 
オブ ショ ン ) 38 6 

対 の 作成 "403 

通貨 記号 2.@.1 

通貨 記号 (⑬) 7 


定義 
iSUB 346 
単純 345 
スト リン グ ・ オ ー バ ベー レー 3 4 7 
定数 1 3 
入口 5 8 
ファ イル 1 1 10 
虚数 1 7 
ラベ ル 2 1 
て の 表 記 247 
実数 1 7 
デー タ 
集 全体 0 ン / 
ェ エリア みみ 
算術 "13, 71 


2 進 固定 小数 点 1 5 
2 進 浮動 小数 点 1 6 
ビッ ト ・ ス トリ ング 2 0 


文字 スト リン グ 1 9 


て の 集まり 4 
比較 3 5 
複素 数 算術 お 


と の 変換 214, 32 
1 0 進 固定 小数 点 1 4 
1 0 進 浮動 小数 点 1 6 


要素 1 3 

入口 2 1 

事象 の グ 

ファ イル 2 1 

形式 項目 267 

変換 (COBOL ) 15 6 
ラベ ル 2 1 

リス ト 9 1.2 124 
ログ ケー ター 2 2 


マッ プ 作 成 403 


ェ マップ 作成 , 言語 間 の 連絡 お ける 236, 


数 字 2 
編成 "22 
算術 の 精度 が 2 
問題 13, 234 
問題 , この 省略 時 解釈 7 
ブロ グラ 制御 21, 234 
ブロ グラ ム 制 御 , この 省略 時 解釈 7 2 
デー タ ・ セ ッ ト 109 
指定 1 2 1 
スト リン グ 18, 7 2 
転送 スチ テート メン ト 0 キオ 
タイ プ あれ 3。 みぎ 4 
デー タ 移 動 と 計算 ステ ー ト メン ト 4 7 
割当 て ステ ー ト メン ト 4 7 
デー タ 管 理 の 最適 化 157 
デー タ 形 式 項目 267 
デー タ 交 換 (COBOL ) 156 
デー タ 指示 転送 Ni グ 
入力 1 19 
出力 119 
デー タ 指示 の デー タ 
スト リー ム 内 の 125 
指定 125 
指定 ( 出力 の 場合 ) 1 クー メ 
指定 ( 入力 の 場合 ) 1 26 
デー タ 指定 4 
デー タ 指 示 125 
編集 指示 128 
リス ト 指 示 1 2 4 
デー タ 指 定 
デー タ ・ リ スト 21 
デー タ ・ セ ッ ト 109 
ASCIi 138, 159 


234 
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デー 


ブロ ッ ク 109 
CONSECUTTIVE 他 き 六 

て の 作成 166, 162 

REG IONAL⑪⑬ の 作成 1 6 4 
情報 交換 コー ド 入 涼 湯 

て の 編成 方 法 きた 人 深 
レコ ー ド 109 

ボリューム 109 

VSAM 158 

タタ ・ セ ッ ト の 作成 166, 162 


デー タ 転 送 ス テー トメ ント か の 馬 、 1 


デー 


デー 
デー 


デー 


デー 


デー 


デー 


デー タ ・ リ スト 人 間 
DELETE ス テー トメ ント 1 4 2 
LOCATEB ス テー トメ ント 1 4 2 
READ ス テー トメ ント 1 4 2 
REWR I TE ステ ー ト メン ト 1 4 2 
スト リー ム 式 入力 1 20 

スト リー ム 式 出力 和み: 

スト リー ム 式 出力 印刷 人 昌 
WRITE ステ ー ト メン ト 1 4 2 

タ の 対応 

COBOL-PL ブ 1 2 4 1 
FORTRAN-PL バ 1 2 43 

タ の タイ ブ と デー タ 記 述 る 

タ の 変換 と 式 の 値 の 計算 。 277 
変換 規則 の 使用 例 278 

算術 演算 の た め の 諸 表 291 

比較 演算 の た め の 諸表 。 293 


タ の 編集 17 5 
タ の 編成 方 赤 クウ 
配列 変数 の 光 

配 外 の 肖 の 

構造 の 配列 2 6 
要素 変数 22 
構造 変数 。 22 
構造 24 


タ 変換 の 27 小 。 212 

て と 式 の 値 の 計算 の 2 な か ツ 

割当 て し 

し に 人 | 

配列 区 に な ける 4.1 

ロケ ー タ ー・ デ ー タ の 変換 3 3 
演算 式 ジグ 

問題 デー タ の 変換 3 2 

原 フ ィ ー ル ド と 目標 フィ ー ル ド 7 
組込み 関数 の 使用 3 3 

タ ・ マ ッ プ の 作成 403 

言語 間 の 連絡 (お ける 236, 234 
レコ ー ド の 境界 合せ 年 5 

構造 の マッ プ の 作成 403 


ーー ルス トド 119, 120, 121 
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一 般 形 式 年 み 
入力 に な ける k 全 2 
出力 に C お ける ウフ 
繰返し 指定 12 2 


統語 規則 ( 関 の 2 

デー タ ・ リ スト 要素 の 転送 123 
デー タ 胡 素 1 3 

配列 と 一 7 2 

定数 1 3 


デー タ の 編成 方 法 ウツ 
デー タ の タイ プ 1 3 
その 他 の 属性 4 


問題 デー タ 1 る 
記号 名 1 3 
変数 1 3 

テキ スト 
含ま れ て いる 6 5 
内 部 6 5 


予備 処理 ずみ の 195 
出口 点 ( サ プ ル ー チ ン と 関数 の ) 9 4 
点 
呼出 し て 5 8 
主要 入口 ン 5 8 
副 次 入口 5 8 
点 (***) 248 
転送 
デー タ 指示 119 
編集 指示 120 
リス ト 指 示 119 
デー タ ・ リ スト の 要素 の 1.2 3 
レコ ー ド 式 109 
スト リー スム 式 109 
転送 され る デー タ 1 4 1 
デー タ 集 合体 1 4 1 


境界 合せ され て い を い ビ ッ ト ・ ス トリ ング 


長 さ の 変わ る スト リン グ と エリ アブ 変数 
転送 スチ テー トメント 
デー タ 122- 全 14 1 
ー の オプ ショ ン る 14.2 
レコ ー ド 4 6 
スト リー ム 4 6 
デバ ッ ギ ング の 補助 手段 
CHECK 条 件 189 
CONDITION 条 件 189 
STRINGRANGE 条 件 19 0 
STRINGS1IZE 条 件 190 


SUBSCRIPTRANGE 条件 1 すず :B 


等 号 ) 7 
統語 規則 ト が の 
動 的 を 割 振り 6 1 


動 的 に 受け つが れる オン ・ ユ ニッ ト 1 87 
特殊 文字 7 
特殊 文字 の 組合 せ 7 
独立 性 
装置 か ら の 1 1 4 
機械 か ら の 3 
取扱 い 
ピッ ト ・ ス トリ ング の 18 1 
割込み の 2 4 0 
オプ ショ ン 2 人 5 
スト リン グ の 216 
取出 し 167, 165 


'。 和 守 
内 蔵 さ れ た キー 16 2 
内 部 名 

< の 有効 範囲 6 8 


内 部 テキ スト 6 5 
内 部 プロ ッ ク と 外部 ブロ ッ ク 5 6 


外部 プロ シー ジャ ー 5 6 
内 部 プロ シー ジャ ー 5 6 
複数 閉止 5 6 


ネス ト さ れ た ブロ ッ ク 5 6 
END ス テー トメ ント の 用 法 5 6 
長 さ 
デー タ 指 示 出 力 フ ィ ー ル ド の 128 
レ ュ ー ド の , (レコ ー ド 式 転送 ) 152 
レコ ュー ド の , (スト リー ム > 式 入力 ) 996 
レコ ュー ド の , (スト リー ム 式 出力 ) 9 下 く 人 0/ 
長 さ 指 定 
ビッ ト ・ ス トリ ング 2 0 
CHARACTER 属 性 1 9 
文字 スト リン グ 1 9 
長 さ 属性 359 
長 さ の 変わ る ス トリ ング ・ オ プシ ョ ン 
(SCALARVARYING ) 158 
長 さ の 変わ る スト リン グ と エリ プア 変数 1 4 1 
流れ の 単位 の 9 
名 前 
NAME 条 件 コー ド 3 18 
総称 入口 9 8 
修飾 され た 2 6 
< の 認定 6 5 
BY NAMEC よ る 構造 割当 て 4 2 
添字 付 の 修飾 され た 2 6 
記号 名 1 3 
名 前 の 認定 65 
省略 時 の 属性 の 適用 7 
文脈 宣言 66 
DEFAULT ス テー トメ ント 7 2 


宣言 の 例 67 

明示 宣言 65 

暗示 宜 言 67 

内 部 な よび 外部 属性 6 8 
複数 宣言 と 不明 確 を 参照 7 0 


引数 298 

組込み 関数 87 

オン ・ ユ ニッ ト 187 

ステ ー ト メン ト 10, 385 
ナル ・ ピ ビット ・ ス トリ ング 2 0 
ナル 文字 スト リン グ 1 9 


て 含ま れる 6 5 
入出 力 2.2.8 
FORTRAN ル ー チ ン よ る 238 
基底 付 変数 と 8 3 
条件 "323 
制御 ステ ー ト メン ト 4 7 
ェ ラ ー 回 復 220 
機能 。 219 
操作 153 
ステ ー ト メン ト 4 6 
入出 力 条件 323 
入出 力 ス テー トメ ント 4 6 
DISPLAY ス テー トメ ント 4 7 
入出 力 制御 スコ テー トメ ント 4 7 
レコ ー ド 転送 ステ ー ト メン ト 4 6 
スト リー ム 転 送 ス テー トメ ント 4 6 
入力 
と 出力 5 
ェ リ ア の < て と 出力 9 1 
デー タ 指 示 肝 
デー タ 指 示 の デー タ 指 定 ( 入力 の 場合 ) 126 
編集 指示 1 2 0 
ファ イル 136 


形式 1 2 4 
リス ト 指示 1 19 
操作 名 光導 


スト リー ム 120 
縫い 合わ され た リス ト 8 6 
ネス 下さ れ た デブ ロッ ク 5 6 
ハ 行 

バー セン ト 記 号 (%) 7 


ハー フワ ー ド 2 8 
ハー フワ ー ド の 2 人 准 数 1 5 


邦 文案 引 
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排除 
共通 式 の 208 
余分 た 式 の 208 
バイ ト 位 置 の 番号 づけ 2 8 
ズバ イト (記憶 域 の 単位 と し て の ) 2 8 


配列 2 2 
お よび デー タ 有 要素 7 2 
限界 と 範 因 2 3 
連続 記憶 域 "24 
断面 参照 2 4 
次 元 属性 2 3 
式 3 1 


添字 と し て の 式 2 4 
挿入 演算 子 と ー 4 0 
非 連 続 記憶 域 2 4 
構造 の ー 2 6 
接頭 演算 子 と て 4 0 
添字 。 23 
変数 。 22 
配列 臣 3 9 
て (て な ける デー タ 変 換 "41 
挿入 演算 子 と 配列 40 
接頭 演算 子 と 配列 40 
配列 と 構造 の 演算 。 41 
配列 と 配列 の 演算 。 40 
配列 と 要素 の 演算 。 40 
配列 取扱 い 組 込み 関数 297, 296 
バッ ク 1 0 進数 1 5 
バディ ング 
ビッ ト ・ ス トリ ング 2 1 
文字 スネ ストリング 久 
パラ メー ター 
て の 割 振 り 1 0 4 
属性 105, 342 
限界 と 範囲 105 
記述 子 リ スト 月 。 る 3 すず 
プリ プロ セッ サー 関数 199 
リス ト 237 
て 対す る ブロ グラ マー 定義 の 省略 時 解釈 74 
引数 と て の 関係 1 0 1 
タイ プ ブ 106 
バラ メー ター 属性 3 6 2 


番号 
レベ ル 403 
記号 佐 ) 。 7 
反復 226 
一 般 的 を エラ ー 226 
反復 (DO ステ ー ト メン ト C お な ける ) 5 0 
反復 因数 


形式 リス ト の 129 
INITIAL 属 性 3 0 
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反復 し を た い DO ス テー トメ ント 5 1 


比較 
代数 的 を 3 5 
ピッ ト の 3 5 
文字 の 3.5 
演算 35 
演算 子 8 


ブロ グラ ム 制 御 デ ー タ の 3 5 
ー の た め の 諸 表 29253 
比較 演算 子 8 
ビク チャ ー 指 定 ) 陸 4/ 
文字 スト リン グ ・ ピ ビ ピクチャー 指定 18 0 
文字 257 
導入 ピク チャ ー 交 字 B.,/ 179 
数 字 指定 ドア 
上 重ね 窪 也 符号 指定 文字 T 1I R 18 0 
ビク チャ ー 文 生 8 1Z9 


ビグ チャ ー 文 字 '9' (数 字 指定 の ) 1 78 


ビク チャ ー 文 字 V 7 の 
ビ ピクチャー 文字 用 お よび * 178 
符号 指定 ( 数 字 指定 の ) 180 


ビ ピクチャー 文 字 
S 。 179 
* 。 178 


"2? | (数 字 指定 ) 178 
A ビ ピクチャー 文字 4 
文字 スト リン グ ・ デ ー タ 対す る 2.5.2 
数 字 デ ー タ 対す る 258 
数 字 ビ ピク チャ ー で の 使用 180, 263 
V 179 
区 ビク チャ ー 文 字 57 
Z 178 
ビク チャ ー 文 字 , 数 字 デ ー タ の た め の 258 
貸方 記号 , 借方 記号 , 上 重ね 符 孔 符号 263 
数 字 指定 文字 と 1 0 進 小数 点 指定 文字 259 
指数 指定 文字 265 
挿 入 文字 。 2641 
スケ ー ル 因数 266 
符号 ・ 通 貨 記号 261 
ゼロ 消去 文字 2.5.7 
補 制 御 記憶 域 7 8 
て 対す る ALLOCATE ス テー トメ ント 7 9 
ALLOCATTION 組 込み 関数 81 
被 制御 構造 8 1 
て と 対す る FRE 選 ステ ー ト メン ト 8 0 
て の 複数 世代 _ 80 
梓 制 御 バ パラメータ ー の 限界 と 範囲 1 0 5 
被 制御 変数 の 複数 世代 
星 印 表記 8 0 
ビッ ト 


比較 3 5 


スト リン グ 3 6 
ピット ( 記憶 域 の 単位 と し て の / 2 8 
ビッ ト か ら コ ー ド 化 算術 形式 へ の 変換 "279 
ビッ ト か ら 数 字 へ の 変換 286 
ビッ ト か ら 文 字 へ の 変換 "288 
ビッ ト ・ ス トリ ング 3 6 
ビッ ト ・ ス トリ ング 

デー タ 2 0 

< の 取扱 い 1 8 1 

演算 8, 3 4 

境界 合せ し を い 1 4 1 
ビッ ト の 比較 3 5 
被 定義 デー タ 項 目 2 
被 定義 変数 344 
非同期 式 入出 力 1 4 4 
非同期 入出 力 組込み 関数 296 


表記 
星 印 105, 80 
定数 2 4 7 
式 征 : 介 : 員 
構文 法 2 4 7 
変数 247 
表現 
10 進 数 119 
標準 省略 時 解釈 
て の 適用 当 
復元 74 


標準 省略 時 解 羽 の 復元 74 

標準 ラフ ァイル 1 18 
SYSIN 1 1 8 
SYSPRINT 1 18 

ビリ オォ ド (.) 7 

非 連 続 記憶 域 "24 


フ テ ァイル 
付加 的 属性 1 1 2 
択 一 的 属性 1 すず 1 
と デー タ ・ セ ッ ト の 結び つけ 株 当 <@ 


属性 1 1 1 

て の 閉鎖 隊 | 上 

定数 110 

デー タ 2 1 

宣言 159 

bo (| 

入力 1 3 6 
PRINT 以 外 の 137 
オン ・ ユ ニッ ト 1 8 7 
開放 115 

オプ ショ ン 1 4 2 
出力 136 


PRINT 1- る アッ 13 ジ 


標準 お 85。 年 


変数 1 1 0 


ファ イル と デー タ ・ セ ッ ト の 結び つけ 11 6 


ファ イル の 開閉 1 15 


ファ イル と デー タ ・ セ キット の 結び つけ 1 1 6 


CLOSE ス テー トメ ン 


ト 1 17 


ファ イル 宣言 1 59 
暗示 的 を 開放 1 1 6 


OPEN ステ ー ト メン ト 
ファ イル 名 1 1 0 
プー ル 代 数 演算 3 5 
付加 的 属性 皇 入 2 

BACKWARDS 属 性 

装置 か ら の 独立 性 


116 


1 1 2 
1 1 4 


ENVIRONMENT 属 性 1 1 2 


FUNCTION ォ ブシ ジ 
KEYED 属 性 1 1 
MEDIUM オ ォ オプ ブ ション 
PRINT 属 性 1 1 


ョ ン 1 1 4 
2 

1 1 3 
2 


複合 記号 249, 250 
複合 ステ ー ト メン ト 10 


虹 次 入口 点 5 8 
式 る. 
複数 
割当 て 4 7 
閉止 5 6 
宣言 7 0 
割込み な の 22 
ロケ グー ター 修飾 9 
スイ ッ チ 2 の 
複数 世代 ' 
基底 付 変 数 の 8 6 
被 制御 変数 の 8 0 
複数 の 割込み の の 2 
複素 数 か ら 実 数 へ の 変換 
複素 数 形式 項目 269 
複素 数 算術 デー タ 7 
符号 ・ 通 貨 記号 26 1 
キビ ピク チャ ー 文 字 
$ ビ ピクチャー 文字 
ー ビ ク チャ ー 文 字 
S ビク チャ ー 文 字 
符号 の 指定 ( 数 字 ) 
物理 レコ ロー ド 109 
不定 長 レ コー ド 1 3 5, 
告 動 小数 点 デ ー タ 
2 進数 1 6 
1 0 進数 1 6 
浮動 ピクチャー 文字 2 
負 符号 7 
不変 の 式 209, 20 


1 


279 


263 
263 
263 
263 
180 


15 1 


6 
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不変 の 式 ま た は ステ ー ト メン ト の 移動 206 
不明 確 を 参照 
複数 宜 言 70 
グ の ラジ シン グ 攻 学 の 
ブラ ンチ 
条件 付 ( IF ステ ー ト メン ト を みよ + ) 
無 条 件 (GO TO ステ ー ト メン ト を み + ) 
プリ プロ セッ サー 
DO グル ー プ 201 
式 198 
プロシージャー 198 
RETURN ス テー トメ ント 4 0 1 
走査 195 
ステ ー ト メン ト 
変数 197 
プリ プロ セッ サー 関数 
て の 引数 と パラ メー ター 199 
< の 例 199 
プリ プロ セッ サー・ ス テー トメ ント 
%% 割 当て ステ ー ト メン ト 397 
%%DO  s98 
%END  s?9 
%%GO TO 399 
%IF 399 
INCLUDE 399 
%% ナ ル ・ ス テー トメ ント 400 
プリ プロ セッ サーRETURN ス テー トメ ント 
プリ プロ セッ サー の 走査 195 
再 走査 と 置換 え 196 
プリ プロ セッ サー の 入力 と 出力 195 
前 原始 リス ティ ング 195 
プリ プロ セッ サー の 走査 195 
原始 リス ティ ング 195 


2 0 2, 


プリ プロ セッ サー・ ブ プロ シー ジャ ー 198 
プリ プロ セッ サー 関数 の 引 数 
パラ メー ター 199 


て の 呼出 し 198 
プリ プロ セッ サー 変数 197 
プリ プロ セッ サーRETURN ス テー トメ ント 
ブロ グラ マー が 名 付け る 条件 _ 3253 
ブロ グラ マー 定義 の 省略 時 解釈 7 4 
プロ グラ ミン グ の 手法 2 10 

その 他 の ヒン ト 220 

コン パイ レー ショ ン の 速度 の 向上 210 

実行 速度 の 向上 d 

イン ・ ラ イン 操作 2 1 4 

入出 力 機能 の 用 法 用 受 

記憶 域 の 用 法 216 
グロ グラム 

制御 24 

制御 デー タ 角 生 輝き 。4 
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195, 202, 396, 


5 3 


3 9 6, 


5.3 


40 1 


4 0 1 


制御 デー タ の 比較 3 5 
制御 デー タ , 省略 時 解釈 た 交 


要素 7 
て の 編成 5 5 
編成 ステ ー ト メン ト 4 8 
構造 3 
終了 6 0 
デブ ログ ラッ ュ 制 御 ググ 、1 
デー タ の,4 
デー タ の 比較 3 5 
デー タ , 省略 時 解釈 し の 
回 帰 的 プロ ンー ジャ ー バダ f 


ブロ グラ ム 制 御 デ ー タ の 1。 > の 8c4 
エリ ア ・ デ ー タ が 
て の 省略 時 解釈 7 2 
入口 デー タ ジー 


事象 デー タ 2 2 
ファ イル ・ デ ー タ 2 1 
ラベ ル ・ デ ー タ 2 1 


ログ ケー ター・ デ ー タ 2 2 
プ ブログ ラム ・ チ ェ ッ クア ッ ト 条 件 _ 323 
プ ブログ ラム の 基本 的 を 構造 1 0 
グル ー プ と プ ブロッ ク 1 1 
単純 ステ ー ト メン ト と 
複合 ステ ー ト メン ト 1 0 
ブロ グラ ム の 構成 5.5 
ブロ ッ ク の 活用 化 5 7 
ブロック 大 っ ) 
プロ ロー グ と エピ ロー グ 6 2 
活用 状態 に ある プロ シー ジャ ー の 再 活用 化 
記憶 域 の 割 振り 6 1 
ブロ ッ ク の 終了 5 9 
ブロ グラ ム の 最適 化 205 
効率 2110 
ブロ グラ ム ュ 編 成 ス テー トメ ント 4 8 
BEGIN ス テー トメ ント 4 8 
END ス テー トメ ント 4 9 
NTRY ス テー トメ ント 48 
PROCEDURE ス テー トメ ント 4 8 
ブロ グラ ム 有 要素 り / 
基本 的 を プロ グラ ム の 構造 1 0 
娘 字 モッ ト 7 
プロ ジー ジャ ー 
プ ブロッ ク 5:5 


外部 5 6 

初期 5 9 

内 部 5 6 

主 59 

プリ プロ セッ サー 198 
回 帰 的 。 221 

参照 5 7 


6 1 


Ne 


ステ ー ト メン ト 48, 9 4 
終了 _ es0 
グロ シー ジャ ー プ ステ チー トメント 
ーー の オブ プ ション 223 
プロ セッ サー・ ス テー ジ 195 
フル ワー ド の 2 進数 1 5 
プ ブロッ ク 109, 55 
ー の 活用 化 5 7 
開始 プロ ッ ク 5 5 
開始 アロ ッ ク と プロシージャー 
外部 5 6 
内 部 5 6 
< の 呼出 し 5 8 
ネス ト さ れ た 5 6 


接頭 語 フ ィ ー ル ド 138, 160 


プロ シー ジャ ー 5 5 
サイ ズ 信 が 。 36 1.5 2 
ンー の 終了 5 9 


ブロ ッ ク 化 レコ ー ド 11 0 


プロ ッ ク ・ サ イズ , スト リー ム 方 式 転送 の 


プロ ッ ク ・ サ イズ , レコ ー ド 方 式 転送 の 
プロ ッ ク ・ サ イズ , PRINT フ ァイル 
ブロ ッ ク の 呼出 し 58 
プロ ロー グ と エピ ロー グ 6 2 

エピ ロー グ 6 3 

プロ ロー グ 6 2 


分 割 文字 (7 
文節 
ELSE 38 3 
THEN 383 
文脈 
宣言 66 
文脈 宣言 66 
の 有効 範囲 66 
分 類 


米国 規格 (ANS ) 
印刷 156 
閉止 ( ファ イル の ) 115 
変換 
算術 3 2 
条件 4 3 
条件 ユー ド 320 
デー タ 2.1.4。 32 
ロケ ー タ ー 8 9 
ロケ グー ター・ デ ー タ 3 3 
引数 の 296 


1 


規則 。 277 
タイ プ 3 2 
編集 指示 転送 1 2 0 
入力 1 2 0 
出力 1 2 0 


編集 指示 の 形式 項目 以 G26。 区 


形式 項目 の リス ト ( アル ファ ベッ ト 順 ) 268 


制御 形式 項目 267 
デー タ 形 式 項目 267 
遠隔 形式 項目 268 
cei 1 値 の 表 275 
編集 指示 の デー タ 指 定 _ 128 
制御 形式 項目 生み の 。 73 
形式 項目 内 の 式 8:2 
形式 リス ト の の 
遠隔 形式 項目 1 3 2 
編集 文字 1 8 
変数 1 3 
直 デ 8 8 
配列 22 
基底 付 81 
見 か け (iSUB ) の 
要素 みみ 
入口 5 8 
ファ イル 110 
表記 。 247 
オフ セッ ト 22, 89 
ポイ ンタ ー の の お の 
プリ プロ セッ サー 197 
ポイ ンタ ー て の セッ ト 8 2 
構造 22 
編成 
CONSECUTIVE 1 6 1 
デー タ の グ :2 
デー タ ・ セ ッ ト 137, 152 
索引 付 1 6 1 
プロ グラ ム 5 5 
REG IONAL 1 63 
REGIONAL) 1 6 4 
REGIONAL⑬) 165 
ステ ー ト メン ト 4 8 


ポイ ンタ ー 

式 8 2 

変数 22, 82 
ポイ ンタ ー 変 数 の セッ ト 8 2 
星 印 な *) 7 


星 印 表 記 105, 810 
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末尾 の ゼロ , 算術 デー タ の 1 4 


デー タ 。 403 
デー タ , 言語 間 の 連絡 に お ける 


一 対 の 4 0 4 

構造 403 
見 か け 

引数 10 1 


レコ ー ド 164 
見 か け 引 数 (iSUB) 27 


明示 宣言 65 
明示 的 を 修飾 "9?1 


モー ド 1 4 
位置 指定 147, 83 
移動 14 5, 83 
処理 1 4 5 

モー ド の 変換 279 

目的 85 

目標 
ーー の 属性 _ 39 

目標 変数 , 割当 て ステ ー ト メン ト の 

文字 
十 ビク チャ ー 文 字 263 
$ ビ ピクチャー 文字 263 
* ォ 。 ピクチャー 文字 260 


挿入 文字 。 261 
> 挿入 文字 。 261 
挿入 次 字 た 


A ピ ビク チャー 文字 2 5 7 
B 挿 入 文字 261 
BITT と 文字 。 342 

CR ビク チャ ー 文 字 。 264 
DB ビク チャ ー 文 字 。 264 
ビク チャ ー 文 字 265 
ピクチャー 文字 2 6 6 
IT ビク チャ ー 廊 字 264 
挿入 文字 。 261 

人 KK ビク チャ ー 文 字 。 265 
ビ ピクチャー 文 字 。 179 
RR ビ ピクチャー 文字 。 264 
S ビ ピクチャー 文字 。 263 
セッ ト 7 


特殊 7 
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2 3 4, 


3692 


236 


スト リン グ 3 6 

T ビ ピクチャー 文字 。 264 

V ビ クチ ャ ー 文 字 259 

玉 ビ クチ ャ ー 文 字 の お: ブ 7 

Y ビ ピクチャ ー 文 字 260 

の ピク チャー 文字 260 

ゼロ 消去 娘 字 259 
文字 か ら コ ュー ド 化 算術 形式 へ の 変換 
文字 か ら 数 字 へ の 変換 285 
文字 か ら ビ ッ ト へ の 変換 290 
女 字 指定 

数 字 指 定 り 肝 24 
文字 スト リン グ 

デー タ 1 9 

ピク チャ ー 指 定 1 8 0 

ピク チャ ー 項 目 の 5 
文字 セッ ト | 2 の 


問題 デー タ 


ヤ 


と と その EBCDIC を な ら び カー ド 容 也 コー ド 


文字 セッ ト の 使用 法 
4 8 一 文字 セッ ト 
6 0 一 文字 セッ ト 
文字 デー タ 


数 字 


1 7 


1 3, 


算術 デー タ 


変換 


て の 省略 時 解釈 


3 2 


< の 一 般 規則 


スト リン グ ・ デ ー タ 


ンー 


生 


矢印 2 ) 8 


有効 数 字 
有効 得 囲 
条件 接頭 語 


要素 


文脈 宣言 


杏 


1 6 


2 3 
1 3 


7 
1 2 


185 
6 6 


8 


7, 250 


7, 249 


4 


1 
6 
1 8 


DEFAULT ス テー トメ ント の 
明示 宣言 の 

外部 名 の 6 
内 部 名 の 6 
外部 構造 の メン バー 名 の 7 0 
ON ステー トメ ント の 


6 6 
8 
8 


配列 玉 よ び デ ー タ 


デー タ 


式 


1 3 
3 1 


プロ グラ ム 


変数 


2 2 


7 


18 7 


7 2 


279 


7 4 


に 


容量 レコ ュー ド 1 6 


5, 1 64 


予備 処理 ずみ の テキ スト 1 計 / 人 い 


呼出 し 235, 2 


AR オプション 


3 7 
235 


COBOL オ プシ ョ ン 235, 237 
FORTRAN オ プシ ジ ション 237, 235 
TNTER オ プシ ョ ン の: る 5 

NOMAP ォ オプション 235, 237 
NOMAPIN ォ オォ プション だ た る 5 
NOMAPOUT オ ォ オプション 235, 237 


プリ プロ セッ サー 
パラ メー ター・ リ 
て の 地 点 5 8 


・ プ ブロ シー ジャ ー の 年 演 
スト レ 和 っ 9 


呼出 し 追跡 (SNAP オォ オプション ) 386 


祭 分 た 式 の 排除 。 2 
読取 桁 抑制 ( RCE ) 


予約 され を た キーワード 


より 小 記号 KO 7 


ょ り 大 記号 7 
ラ 行 
ライ プラ リー 関数 
FORTRAN 
ラベ ル 
定数 2 1 
デー タ の 
接頭 語 1 0 


ラベ ル 式 。 GO TO ステ ー ト メン ト C お ける 


ラベ ん 変数 
割当 で て ステー トメ 


110 
134, 139 
6 5 


100 


ント と お ける 370 


ラベ ル ・ リ スト , LABETL 宣言 た お ける 358 


> 120, 121 


237 


バラ メー ター 記述 子 開園 


リス ト 
デー タ 119 
形式 1 29 
条件 の 323 
バラ メー ター 
処理 8 6 
て の タイ プ 8 
リス ト 指 示 
デー タ 指 定 1 
入力 形式 交 
出力 形式 1 2 
転送 119 
リス ト 処 理 8 6 
リス ティ ング 


8 


2 4 
4 
5 


制御 ステ ー ト メン ト 195 


1nSsOuTCe 


原始 195 


19?5 


383 


リス ティ ング 制御 ステ ー ト メン ト 203, 401 


喝 PAGE 40 1 
鶴 SKIP 4 0 1 
例 1 2 6 
窟 土 の 6 7 
レコ ー ド ・ フ ァイル の 宣言 168 


プリ プロ セッ サー 関数 の 199 
構造 の マッ プ 作 成 の 406 
変換 規則 の 使用 の 2 78 
ォ ン 条件 の 使用 の 19 1 
例外 条件 _ 45 
CONVERSION 条 件 43 
SIZE 条 件 _ 43 
STRINGSIZE 条 件 43 
例外 制御 ステ ー ト メン ト 5 2 
ON ステ ー ト メン ト 5 2 
REVERT ス テー トメ ント 5 2 
SIGNAL ス テー トメ ント 5 2 
レ ュ ー ド 109 
境界 合せ 415 
ブロ ッ ク 化 110 
容量 164, 165 
条件 コー ド 318 
D - 形式 138, 160 
D B 形式 138。 1.60 
見 か け 1 6 4 
ファ イル 1 68 
固定 長 5 仙人 
形式 る プア 。 すき 6 
形式 の 省略 時 解釈 あめ っ 8 
形式 オプ ショ ン 湯 < あ 。、 素 50 
長 さ 1.3 る 。 137。 152 
論理 109 
物理 109 
転送 スィ テー トメント 4 6 
不定 長 bB 
可変 長 PH 
レコ ー ド 形式 オ プシ ョ ン 134, 150 
BLKS1TZE オ ブ プション 136, 151 
ブロ ッ ク サ イズ 人 れ あ 7 だ "も きぬ 、 邊 まる 
緩衝 域 オ フ セ ッ ト 137 
D 形式 きち 
DB- 形式 1 する 36.。 52。 951 
F 一 形式 る 5 も も 
F B - 形 式 135。 す 36,。 150。 151 
固定 長 レ ュー ド 135, 150 
入力 ファ イル 1 36 
最高 まき 6。 世 各 1 
負 の 値 136, 151 
PRINT 以 外 の ファ イル 137 
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出力 ファ イル 136 
PRINT フ ァイル 137 
レコ ー ド 形式 137, 136 
レ ュ コー ド 形 式 の 省略 時 解釈 13.6。 152 
レコ ュー ド の 長 さ 136, 137, 152 
RECSTZE オ プシ ョ ン 135, 151 
不定 長 レ コー ド 135, 151 
V - 形 式 135, 150 
可変 長 レ コー ド を 5。。 1 5 
V B - 形 式 全音 。 は 各 1 
ゼロ の 値 136, 151 
レコ ー ド 形式 の 省略 時 解釈 人 衝 。  5 の 
レコ ー ド 式 転送 109 


< の 要約 1 647 
レビ レベル 

論理 403 

番号 403 

ロケ グー ター 修飾 の 9 2 
連結 演算 。 36 


ビッ ト ・ ス トリ ング 3 6 
文字 スト リン グ 3 6 
連結 記号 (| |) 8 
連鎖 され た リス ト 8 6 


連続 記憶 域 2 4 
ロケ グ ケー ター 
変換 "89 
デー タ 2 2 


ロケ ー タ ー 修 飾 81 

と の レベ ル 9 2 

複数 ?1 
ロケ ー タ ー 修 飾 子 ( 一 ) 8 2 
ロケ グー ター・ デ ー タ の 2 

変換 3 3 

オフ セッ ト 変 数 2 2 

ポイ ンタ ー 変 数 2- ウ の 
論理 演算 ググ の 4 
論理 演算 子 

(ピット ・ ス トリ ング 演算 を みよ ) 
論理 レコ ー ド 109 


論理 レベ ル 403 

ワ 行 

ワー ド 28 

割 振 9 
緩衝 域 信和 。 れ お ダ 
組込み 関数 8 1 
動 的 6 1 
パラ メー ター の 1 0 4 
静 的 6 1 
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記憶 域 4, 6 1 
割 振り (バラ メー ター の ) 10 4 
星 印 表 記 1 0 5 
被 制御 パラ メー ター の 限界 と 範囲 105 
式 の 表記 105 
バラ メー ター の 属性 105 
バラ メー ター の 限界 と 男 囲 10 5 


単純 パラ メー ター の 限界 , 長 さ は ふ 。 サイ ズ 105 


割込み 
操作 5 
処理 240 
複数 の る 和 


割込み 解禁 の 条件 と 処置 の 設定 185 
CHECK 条 件 189 
条件 組込み 関数 と 条件 ユー ド 190 
CONDI TION 条 件 189 
条件 接頭 語 185 
動 的 C 受 けつ が れる オン ・ ユ ニッ ト 18 7 
ナル ・ オ ン ・ ユ ニッ ト 1 8 7 
ON ステ ー ト メン ト 186 
ラ ア イル “バラ メー ター 到 よ び フ ァイル 
変数 に 対す る オン ・ ユ ニッ ト 且 4 
REVERT ス テー トメ ント 188 
条件 接頭 語 の 有効 範囲 185 
ON ステ ー ト メン ト の 有効 奥 囲 18 7 
SIGNAL ス テー トメ ント 189 
STRINGRANGE 条件 19 0 
STRINGS1IZE 条 件 1910 
SUBSCRIPTRANGE 条件 190 
割込み 処理 240 
割当 て 3 2 
ェ リ ア 2 0 
て (て よる 編集 ギド 流 
初期 値 化 220, 223 
複数 。 47 
この 他 の 形式 1 7 6 
ステ ー ト メン ト 3 る 9。 オオ 7 
記号 計 ) 7 
割当 て に よる 編集 "175 
スト リン グ ・ デ ー タ の 長 さ の 変更 1 7 5 
割当 て の 別 の 形式 176 
ピク チャ ー 指 定 ) 


英 字 


A 形 式 項目 268 

貞 ビ ク グ チャー 文字 257 
ACOS 組 込み 関数 3 02 
ADD 組 込み 関数 302 
ADDBUFE オ ォ オプション し 生 :/ 
ADDR 組 込み 関数 302, 82 


ALIGNED 属 性 28, 339 
ALL 組 込み 関数 302 
ALLOCATE ス テー トメ ント 
基底 付 変数 の 場合 86 
被 制御 変数 の 場合 79 
IN ォ オプ ショ ン を も ゃ もつ 8 9 
ALLOC AT 1I ON 組込み 関数 
and 記 号 ( 。 7 
ANY 組 込み 関数 303 
AREA 339, 88 
IN オプ ショ ン を も つ ALLOCATE ス テー トメ ント 8 9 
ェ リ プ 変 数 88 


367, 49 


302, 81 


割当 て 9 0 

条件 コー ド 319 

デー タ の 

EMPTY 組込み 関数 9?0 

エク ステ ント 8 8 

IN オォ オプション を も つ FREE ス テー トメ ント 9 0 
入出 力 9 1 

長き 9 1 


ロケ グー ター 変換 "89 
オフ モット 式 8 9 
オフ セッ ト 変 数 8 9 
ォ ン 条件 91 
サイ ズ 2 2 
変数 88 
AREA ォ ン ・ 条 件 9?1 
AREA 条 件 323 
AREA 条 件 コー ド 319 
AREA 属 性 22, 88 
ALLOCATE ス テー トメ ント (て お ける 
-ARG オプ ショ ン 235 
ASC1I 1 (情報 交換 用 米国 標準 コー ド ) 110 
ASCII デ ー タ ・ セ モッ ト 138, 159 
ASCTTI オ プシ ョ ン 138, 160 
BUEOFE オ プシ ョ ン と ブロ ッ ク 
接頭 語 フ ィ ー ル ド 1 3 8, 
D 形式 と DB 一 形 式 レ コー ド 
省略 時 解釈 の 規則 1 3 9, 
ASIN 組込み 関数 303 
ASSEMBLER オ プシ ョ ン 36 る 1 
ASSGN ジョ ブ 制 御 ス テー トメ ント 
ASSOCIATEE オプ ショ ン 1 48 
ATAN 組 込み 関数 3 0 3 
ATAND 組 込み 関数 303 
ATANH 組 込み 関数 303 
AUTOMATIC 属 性 34 10 


3 う 67 


1610 
1 3 8, 
160 


160 


B 形 式 項 目 268 
B 挿入 文字 261 


BACKWARDS 属性 ド 和 1 き 4 1 


BASED 属 性 23240, 341 


BEGIN ステ ー ト メン ト ぶた 。 島 き 
BINARY 組 込み 関数 303 
BINARY 属 性 3 4 1 

BIT 組込み 関数 3 0 4 

BIiT 属性 3 4 2 

BLKSIZE オブ ショ ン 区 @。 波 1 


BOOL 組 込 関 数 35, 304 


BUFFERED 属性 中 2 和 る きる 
BUFFERS オプ ショ ン 本 あ 学 。 5 
BUFOFE オプ ショ ン 138, 160 
BUILTIN 属 性 343 
BY オォ オプション, D0 ス テー トメ ント の らき 4 
BY NAME オプ ショ ン 4 2 
BY NAME(C よ る 構造 の 割当 て 42 
C 形 式 項目 269 
CALL ォ オォ プション ( INI TI AL 属性 の ) 29, 66 
CALL ス テー トメ ント 372, 51 
CEIL 組 込み 関数 304 
ceil 値 
< の 静 275 
CHAR 組込み 関数 3 0 4 
CHARACTER 属 性 342, 343 
ALLOCATE ス テー トメ ント お ける 367 
CHECK 
条件 1892 
条件 コー ド 320 
CHECK 条 件 324 
COBOL 
イン ター フェ ー ス 2 4 1 
オォ オプション の 5 必 る 7 
て へ の 引数 の 受渡 し 2 3 4 
COBOL オプ ショ ン 3 6 1 


COBOL ま た は FORTRAN ルー チン へ の 
引数 の 受渡 し 2 3 4 


デー タ ・ マ ッ プ の 作成 2 34 

デー タ ・ タ イプ 234 

問題 デー タ 2 34 

ブロ グラ ッ ュ 制御 デ ー タ 2 84 
COBOLーPL ブ [デー タ の 対応 244 
COLBIN オ ォ オプション 149 
COLUMN 形 式 項目 269 
COMPLETION 

て と 状況 値 14 5 

擬似 変数 3 0 4 
COMPLET {ION 組込み 関数 145, 304 
COMPLEX 擬 似 変数 305 
COMPLE 叉 組込み 関数 304 
COMPLEX 属 性 343 
CONDIT TION 条件 189, 326 
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COND I TION 属性 343 DO グル ー ズ の の 


CONJG 組 込 関 数 305 プリ プロ セッ サー 2 0 1 
CONNECTED 属 性 343 
CONSECUTTI VE Eg 形 式 項目 2 チロ 
デー タ ・ セ ッ ト 8 EE ピク チャ ー 文 字 265 
編成 16 1 EBCDIC (拡張 2 進化 1 0 進 コ ヌード ) 1 1 0 
CONSECUTIVE デ ー タ ・ モ セット 137 ELSE 文 節 , IF ステ ー ト メン ト の 3 8 4 
CONSECUTTI VE 編 成 1 6 1 EMPTY 組込み 関数 306, 90 
SEQUENTTLAL UPDATE 1 6 1 END ス テー トメ ント 379, 49, 95 
CONTROLLED 属 性 344, 340 < の 用 法 5 6 
CONVERSION 条 件 _ 326 ENDFEILE 条 件 327 
COPY ォ オプション 生み 1 ENDEFE ITLE 条件 コー ド 319 
COS 組 込み 関数 305 ENDPAGE 条 件 132, 327 
COSD 組 込み 関数 305 ENDPAGE 条 件 コー ド 319 
COSH 組 込み 関数 305 ENTRY ス テー トメ ント 380, 48, 924 
COUNT 組 込み 関数 305 ENVI RONMENT 
CR ビク チャ ー 文 字 。 264 PL ブ 1 環境 の 設定 238 
CTLASA オ プシ ョ ン 156 言語 間 の 238 
CTL360 オ プシ ョ ン 156 ENVIRONMENT 属 性 ドキ 。 38 
ASCII デ ー タ ・ セ ッ ト 138, 159 
D - 形 式 レ コー ド 138, 135, 1610 ASSOCIATE オ プシ ョ ン 148 
DATA オ プシ ョ ン 過当 8 緩衝 域 の 割 振り き 当 。 半 全 2 
DATAFIELD 組 込 関 数 305 カラ ム ・ バ イナ リー(COLBIN) 1 4 9 
DATE 305 デー タ 変 換 (COBOL ) 156 
D B - 形 式 レ ュー ド を 88 4 き 呈 。 80。 も る デー タ 管 理 の 最適 化 に 4 
DB ピク チャ ー 文 字 。 264 デー タ ・ モ セッ ト 編 成 も る 7 ふ 09 る 
DEC IMAL 組 込み 関数 305 装置 の 機能 ( FUNCTION) 134, 148 
DEC IMAL 属 性 3 る 4。 す 4 1 装置 タイ プ (MED TUM ) 134, 148 
DECLARE ス テー トメ ント 4 5 直接 アク セス 装置 の 用 法 139, 154 
DEFAULT ス テー トメ ント 4 5, 7 2 レコ ー ド 式 転送 対す る 1 4 8 
属性 の 指定 た 9 スト リー ム 式 転送 に対する 1 3 3 
DESCRIPTORS ォ プシ ョ ン 7 3 キー の 分 類 (ME: 
省略 時 解釈 指定 の 因数 化 7 4 キー の 長 さ オプ ショ ン (KEYLENGTH ) 158 
プロ グラ マー 定義 の 省略 時 解 息 75 キー の 位置 オプ ショ ン (KEYLOC ) (< 
RANGE オ プシ ョ ン 7 3 磁気 テー ブ 取 扱い オブ ション 串 8 の >、 條 王 4 
標準 省略 時 解 羽 の 復元 74 光学 式 マ ー ク 読取 り (OMR ) 149 
て の 使用 上 の 制約 5 PASSWORD オ ォ オプ ショ ン 153 
て の 有効 範 暑 7 4 印刷 の 窪 孔 制御 (CTL3 60 プ CTLASA) 156 
DEF INED 属 性 27, 344 読取 桁 宛 制 ( RCE ) 134, 149 
DELAY ス テー トメ ント 37 6 レコ ー ド 形式 オプ ブ ション 134, 150 
DELET ス テー トメ ント 142, 376 スタ ッ カ ー 選 択 (STACKER ) ES:4。 0 
DEBSCRIPTORS ォ オォ プション 7 3 長 さ の 変わ る スト リン グ ・ オ プシ ョ ン 
D I M 組 込み 関数 3 06 (SCALARVARYING ) 1 58 
DI RECT 属性 112, 348 VSAM デ ー タ ・ セ ッ ト 1 58 
DISPLAY ス テー トメ ント ナメ 。 な 7 ERF 組込み 関数 306 
DI1VIDE 組 込み 関数 306 ERROR 条 件 85。 る る プア 
DLBL ジ ョ ブ 制 御 ス テー トメ ント 1 1 7 ERROR 条 件 コー ド 318, 32 1 
DO 37 7 BEBVENT オ ォ オプション 1 4 4 
グル ー プ のみ 0 EVENT 属 性 人 
ステ ー ト メン ト 5 0 EXP 組 込み 関数 306 
反復 し を た な たい DO ステ ー ト メン ト 5 1 EXTENT ジ ョ デブ 制御 ステ ー ト メン ト 1 5 4 
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と 


EXTENTNUMBER オ ブ プション 15 4 
EXTERNAL 属 性 2.99 


F 形式 項目 20 ル 清 人 。 の 
F ビ ピクチャー 文字 266 
FB- 形 式 135, 136, 150, 151 
FILE オプ ショ ン 委 2 。 征 兆 受 
F I LE 属性 111。 353 
FINISH 条 件 185, 328 
FINISH 条 件 コー ド 318 
F IXED 組 込み 関数 306 
FIXED 属 性 _ 354 
FIXEDOVERFLOW 条 件 328 
FIXEDOVERFLOW 条 件 コー ド 319 
FLOAT 組 込み 関数 307 
FLOAT 属 性 3 5 4 
FLOOR 組 込み 関数 307 
FORMAT ス テー トメ ント 3 8 1 
FORTRAN 

イン ター フェ ー ス 2 4 1 

ライ ブ プラ リー 関数 1 00 

オプ ショ ン 8 23 委 8 
FORTRAN オ プシ ョ ン 36 1 
FORTRAN ル ー チ ン 

COBOL ま た は へ の 引数 の 受渡 し 2 3 4 

て と よる 入出 力 の 制約 238 

て の 終了 。 241 
FORTRAN 一 PL エイ ンタ ー フ ェ ー ス 2.4:2 
FORTRAN-PL プ [の デー タ の 対応 243 
FREE ス テー トメ ント 381, 49 

基底 付 変数 に 対す る 8 6 

被 制 御 変数 に 対す る 8 0 

IN オプ ショ ン を も つ 9 10 
FROM オ ォ オプション 1 4 3 
FUNCTEION オ プシ ョ ン 1 1 4 


GENERIC 属 性 3 5 4 

GENKEY ォ オプション 5 7 

GET ス テー トメ ント 3 8 2 

GO TO ステ ー ト メン ト 383, 49 
言 請 間 の 環境 240 
関数 を 終了 させ る 9 7 
サ プ ブルー チン を 終了 させ る 9 5 


HBOUND 組 込み 関数 3 07 
HITGH 組 込み 関数 30 7 
HITGHINDEBX ォ オプ ショ ン 1 5 4 


T ビ クチ ャ ー 文 字 。 264 
IF ステ ー ト メン ト 383, 492 
IGNORE オォ オプション 1 4 3 


IMAG 擬 似 変数 307 
IMAG 組 込 関 数 307 
IN オプ ショ ン 
て を も つ ALLOCATE ス テー トメ ント 8 9 
て を も つ FREE ス テー トメ ント 9 0 
INDE 双 組込み 関数 307 
INDEXAREA ォ オプション 157 
INDEXMULT IPLE オ ォ オブ プション 1 5 4 
INITI AL 属性 355 
INPUT オ ォ オプション 


OPEN ステ ー ト メン ト の 386 
INPUT 属 性 111,。 357 
INPUT, OUTPUT, ぉ よび 

UPDATE 属 性 も 


INTER オ プシ ョ ン 235 
INTERNAL 属 性 358, 353, 68 
INTO ォ オプション 1 4 2 
TIRREDUCIBLE オ プシ ョ ン 
ENTRY ス テー トメ ント に お ける 38 1 
PROCEDURB ス テー トメ ント 低 お ける 389 
IRREDUC 1BLE 属 性 358 
i SUB 定 義 346 


人 KK ビク チャ ー 文 字 。 265 


KEY オプ ショ ン 1 4 3 
KEY 条件 328 

KEYED 属 性 112, 358 
KEYFROM オ ォ オプション 1 4 4 


KEYTO オ プシ ョ ン 1 4 4 


LABEL 属 性 21, 358 
LBOUND 組 込み 関数 308 
LEAVE オ プシ ョ ン ト 和 あの 導 混 人 4 
LENG TH 組込み 関数 に 生 1/ 
LIKE 属性 27, 359 


LINE 
形式 項目 272 
オプ ショ ン 1 21 
LINENO 組 込み 関数 308 
LINESIZE ォ プシ ョ ン 特 計 認 
OPEN ステ ー ト メン ト お ける 38 6 
一 般 的 を エラ ー 229 
LIST オプ ショ ン 1 2 4 


LOCATE ス テー トメ ント 14.2。 384。 8.4 
LOG 組 込み 関数 308 

LOG 1 0 組 込 信 関数 308 

LOG2 組 込 人 関数 308 

LOW 組 込み 関数 308 


. MAIN オ ォ オプション 


PROCEDURE ス テー トメ ント (お ける 388 


邦文 素 引 455 


MA 
ME 
MI 
MO 


MULTIPLY BUILT_IN FUNCTION 


組込み 関数 308 
DIUM ォ オプ ション 1 る 
N 組 込み 関数 308 
D 組込み 関数 309 


NAME 条件 318, 329 
NOCONVERS I ON 接頭 語 4 3 
NOLABEL オ プシ ョ ン 138, 154 
NOMAP ォ プシ ョ ン 237, 235 
NOMAPIN ォ プシ ョ ン ク み 5。 の 37 
NOMAPOUT オ ォ オプ ショ ン ら 2 る 7。、 グ る 5 


NOOPTIMIZE コ ン バ パイ ラー・ オ プシ ョ ン 
NORESCAN オ ォ オプ ショ ン ( 欠 ACTIVATE 


ステ ー ト メン ト の ) 


not 記 号 (n) / 


NO 


NOWR TI TE オプ ショ ン 
NULL 組込み 関数 


OFF SET 組 込み 関数 
OFF SET 属 性 


TAPEMK オ ォ オプション 1 3 
157 
309 
ナル 8 7 

309, 


360 


OFLTRACKS(n) オ プシ ョ ン 


OM 


ON 条件 


ON 


ONCHAR 擬 似 変数 
ONCHAR 組 込み 関数 
ONCODE 組 込み 関数 
ONCOUNT 組 込み 関数 
ONF { LE 組込み 関数 
ONKEY 組 込み 関数 
ONLOC 組 込み 関数 
ONSOURCE 擬似 変数 
ONSOURCE 組 込み 関数 
OPEN ステ ー ト メン ト 


R オ プシ ョ ン 1 4 9 
3 17 
条件 ユー ド ( ON コー ド ) 
条件 の リス ト 323 
複数 の 割込み 32 2 
AREA 
> と オン ・ 
て の 使用 例 
ステ ー ト メン ト 


< の 有効 範囲 


9 1 
ユニ テット 
19? 1 
286 
8 / 
309 
309 
3 1 0 
3 1 0 
310 
3 10 
3 1 0 
3 1 1 


22 1, 


1 1 6, 


OPTIONS オ プシ ョ ン 


OPTIONS 属 性 


ENTRY ス テー トメ ント て お ける 


の 2 


38 5, 


397 


8, 154 


8 9 


1 5 4 


9 


228 


5 2 


3 1 0 


38 6 


3810 


PROCEDURE ス テー トメ ント お ける 


360 


OU0TPUT オ ォ オプション 


OUTPUT 属 性 


456 


OPEN ステ ー ト メン ト に お ける 
111, 3 


386 


57, 362 


309 


210 


388 


or 記号 (|) 7 
ORDER オ プシ ョ ン 
OVERFLOW 条 件 329 
OVERFLOW 条 件 コー ド 


P 形 式 項目 

PAGE 
形式 項目 27 2 
オォ オプション 12 1 

PAGESIZE オ ォ オプション 


27 2 


206 


319 


中 3 グ 


OPEN ステ ー ト メン ト て お ける 


一 般 的 を エラ ー 229 
PASSWORD オ ォ プ ショ ン 
PICTURE 属性 が が 

て の 有 効 を 利用 21 1 

数 値 デ ー タ 陸 / 

制約 1 0 1 
PL/1I 

< の 基本 的 を 特徴 3 

環境 238 

プロ シー ジャ ー 236 
PL ンプ 1 環 境 の 設定 238 
PL プ I ス テー トメ ント の 形式 
PL プ I の キー ワー ド 9 
PL プ I の キー ワー ド 

の リス ト (アル ファ ベッ 
PL1 の 基本 的 を 特徴 、3 

コン バイ ル 時 の 操作 5 

デー タ の 集まり 4 


153 
3 6 2 


ト 順 ) 


デー タ の タイ ブ と デー タ の 記 述 


省略 時 解釈 3 

っ 4 

入出 力 5 

割込み 操作 5 

機械 か ら の 独立 3 

オン ンー デキ ング 

プロ グラ ム の 構造 3 

記憶 域 の 割 振り 4 
PLI ブロ グラ ム の 構造 1 


0 


251 


3 


・ シ ステ ム の 機能 。 6 


PL プ 1 ブ プロシージャー, COBOL ま た は 
FORTRAN か ら 呼 び 出 され た 


PL プ I プ ロン ー ジ ャ ー へ の 引数 の 受渡 し 


デー タ ・ マ ッ プ の 作成 
PL ブ I 
PL 
PLISA サ ブ プルー チン 
PO INTER 組 込み 関数 
POINTER 属 性 22, 
POLY 組 込み 関数 3: 生 
POSITION 属 性 363 
PRECISION 組 込み 関数 


236 


ーCOBOL し イン ター フェ ー ス 
ーFORTRAN イ インターフェース 
238 
3 1 1 
3 6 3, 


8 9 


3 1 


23 7 


1 


386 


236 


24 1 


2 42 


PRINT 
属性 も 隊 本 の 
ファ イル な 壮 あ 2 


スト リー ム ょ 式 出力 120 
PRINT 属 性 3 6 4 
PROD 組 込み 関数 3 1 1 
PROCEDURE ス テー トメ ント 387, 48, 2 4 
PUT ス テー トメ ント 17 6@。 389 


R 形 式 項目 273 
R 指定 文字 18 0 
R ビ ピク チャ ー 文 字 。 264 
RANGE オ プシ ョ ン 7 3 
RCE ォ オォ プション る 19 
READ 
ステ ー ト メン ト 1 4 2 
SET を も つ READ ス テー トメ ント 8 4 
READ ス テー トメ ント 390 
RE AL 撰 似 変数 3 1 2 
REAL 組 込み 関数 8 儲 の 


REAL 属 性 343, 364 
RECORD 条 件 3 3 0 
RECORD 属 性 第 1 


RECSIZE オ プシ ョ ン 135。 151 
RECURSIVE オ ブ プション 6 1 
RECURSIVE オ ォ オプション, PROCEDURE 

ステ ー ト メン ト ( て お ける 388 
REDUCIBLE オ ブ プション 

ENTRY ス テー トメ ント CC お ける 38 1 

PROCEDURE ス テー トメ ント (CC お ける 
REDUC I BLE 属 性 358, 364 
REREPNTRANT オ ォ オプ ション , PROCEDURE 

ステ ー ト メン ト の 388 
REFEER オ プシ ョ ン 

共通 ェ ラ ー ググ 8 

で の 目的 85 

制約 8 5 
REG IONAL 編 成 163 

装置 に 結び つけ られ る ファ イル (IBM3525 


ヵ カード 窟 装 購 ) 167 
キー 1 6 3 
REG IONAL(⑪ 編 成 1 6 4 
REG TIONAL(⑱) 編 成 1 6 5 


て の タイ プ 163 
REGIONAL 編 成 の タイ プ 1 63 


REG IONAL(1) デ ー タ ・ セ ッ ト の 作成 1 6 4 
REG IONAL(⑪ 編 成 1 6 4 

追加 1 65 

容量 レ ュ ー ド 1 6 4 


REGTIONAL(1) デ ー タ ・ モ セット の 作成 1 6 4 
直接 アク セス 16 4 


3892 


見 か け レ ュー ド 1 6 4 

置換 1 6 5 

取出 し 165 

順次 アク セス 1 6 4 
REGIONAL⑱ 編 成 165 

追加 1 6 7 

容量 レコ ー ド 165 

デー タ ・ モ セッ ト の 作成 166 

直接 アク セス 16 7 

記録 され ん た キー 166 

キー の 変換 の 軽減 166 

置換 167 

取出 し 16 7 

順次 アク セス 166 

原始 キー 1 645 
REORDER オ プシ ョ ン 207, 206 
RE PEAT 組 込 関 数 3 1 2 
RESCAN ォ オォ プション, %ACTIVATE ス テー ト 

メン ト の 397, 196 
RETURN 

プリ プロ セッ サー・ ス テー トメ ント 4 01 

ステ ー ト メン ト 95, 97 
RETURN ス テー トメ ント の (の の 5 タデ 
RETURNS 3 6 4 

属性 9 7 

オプ ショ ン 98 
REVERT ス テー トメ ント 
REWRITE ス テー トメ ント 
ROUND 組込み 関数 312 


908。 つかる 
2。 あう 


S ビ クチ ャ ー 文 字 263 
SCALARVARYING オ プシ ョ ン 8 4 
SEQUENT1IAL 

アク セス 166, 164, 162 

属性 1 1 2 

更新 1 6 1 
SEBQUENTTIAL 属 性 
SET 

オプ ショ ン 1 4 3 
SET オ ォ オプション 14 3 
S IGN 組 込 信 関数 3: 小 2 
SIGNAL ス テー トメ ント 
S 1 N 組 込み 関数 3 人 交 
S 1 ND 組 込 関 数 の 引用 
S 1 NH 組込み 関数 313 


348, 365 


189, 394,. 52 


S 12ZE 
属性 365 
プ ブロック 137, 136, 152 
条件 4 3 
条件 コー ド 319 
S 1 ZB 条 件 330, 4 3 


邦文 索 引 
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SKTP TRANSLATE 組 込み 関数 3 1 4 


形式 項目 が が (9 TRANSMIT 条 件 332 

オプ ショ ン 人 を: TRANSMIT 条 件 コー ド 318 
SNAP ォ プシ ョ ン TRUNC 組 込み 関数 9 に おる 

ON ステ ー ト メン ト の 186, 386 
SQ RT 組込み 関数 5 8 U 一 形式 レコ ュー ド 
STACKER オ プシ ョ ン 1 3 4 レコ ー ド 式 転送 151 

スタ ッ カ ー 選 択 1510 スト リー ム 式 転送 す 3 5 
STATIC 属 性 を 0。 9.65>。 7 7 UNALIGNED 属 性 28,。 339。 5365 
STATUS 擬 似 変数 313 て の 効果 404 
STATUS 組 込み 関数 313, 145 UNBUFEFERED 属 性 1 信人 2。 ぶる ちら 
STOP ス テー トメ ント 1 UNDPBFETINEDE ILE 条件 9 の 
STRE AM 属性 11 1, 364, 365 UNDEFINEDEFE ILE 条 件 コー ド 319 
STRING ォ プシ ョ ン 120 UNDERELOW 条 件 333 

GET ス テー トメ ント の 38 3 UNDERFLOW 条 件 コー ド 319 

PUT ス テー トメ ント の 389 UNLOAD オ ォ オプション あ 8> 154 
STRING オ オプション, GET お と よび UNSPEC 擬 似 変数 315 

PUT ス テー トメ ント の 17 6 UNSPEC 組 込み 関数 315 
STRING 擬 伺 変数 313 UNSYNCHRON1IZED デ ー タ , COBOL 23 4 
STRING 組 込み 関数 313 UPDATE 属 性 357, 365 
STRINGRANGE UPDATE 属 性 

条件 190 INPUT, OUTPUT, お よび 六 

条件 ユー ド 319 
STRINGRANGE 条 件 331 V- 形 式 135。 150 
STRINGSIZE ビク チャ ー 文 字 259 

条件 190, 43 VALUE オ プシ ョ ン , DEFAULT ス テー トメ ント の 3 7 4 

条件 コー ド 319 VARIABLE 属 性 365 
STRINGS1IZE 条 件 あき 1 VARYING 属 性 _ 3646 
SUBSCRIPTRANGE V B - 形 式 135, 136, 151 

条件 190 VERIFY オ プシ ョ ン (eo まっ 

条件 コー ド 320 VERIFY 組 込み 関数 315 
SUBSCRIPTRANGE 条 件 _ 331 VSAM デ ー タ ・ セ ッ ト 158 
SUBSTR 擬 似 変数 314 ファ イル ん 定 言 と 開放 159 
SUBSTR 組 込み 関数 200, 313 操作 159 
SUM 組 込み 関数 314 
SYNCHRONT ZED データ , COBOL 2 3 4 WAIT ステ ー ト メン ト 39 4 
SYSIN 118 WHEN オォ プシ ョ ン 9 8 
SYSIPT 記 号 装 置 名 1 13 WHILE オォ オプ ショ ン , DO ステ ー ト メン ト の 379?, 51 
SYSLST 記 号 装置 名 作 当 3 WRITE ステ ー ト メン ト も 4 ダ 2。 る 9 
SYSPC 是 記号 装置 名 人 1 る 
SYSPRINT 件 介 。 ま る 8 XX 形式 項目 27 

文 ビク チャ ー 文 字 グ 25. 7 

T ピ ビ ピクチャー 文字 26 4 Y ヤ ビク チャ ー 文 字 260 
TAN 組 込 信 関数 3 1 4 みみ ビグ チャ ー 交 字 2e0 
TAND 組 込み 関数 3 1 4 ZERODIVIDE 条 件 333 
TANH 組 込み 関数 314 ZERODIVIDE 条 件 コー ド 319 
TI ME 3 1 4 
TIME 組込み 関数 3 1 4 数 宇 
TITLE オ プシ ョ ン 六 / 
TLBL ジ ョ ブ 制 御 ス テー トメ ント トイ キア 1 0 進数 7 
TO オプション, DO ステ ー ト メン ト の 37 7 1 0 進数 
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固定 小数 点 デ ー タ 1 4 
表現 119 
1 0 進 小数 点 指定 文字 259 
1 0 進 浮動 小数 点 デ ー タ 1 6 
2 進数 
固定 小数 点 デ ー タ 1 5 
浮動 小数 点 デ ー タ 1 6 
4 8 一 女 字 モット 7, 250 
複合 記号 250 
6 0 一 文字 モット 7, 249 
複合 記号 249 
8 ビ ピット ・ コ ー ド 
4 8 一 文字 セッ ト 250 
6 0 一 文字 セッ ト 249 
の みみ ま ゃ 選 玩 省 。 9 の ああ 7 


・( 終止 符 , ビリ オド , また は 小数 点 ) 


* ビ ピクチャー 文字 
数 字 デ ー タ を 対象 と する 一 の 用 法 


数 字 ビ ピクチャ ー を 対象 と する て の 用 法 


・・ 3 つの 点 2 48 
ぐ (「[ よ ょ り 1 小 ] 記号 ) 7 


() 括 了 7 

十 ( 加算 演算 子 ) 7 

十 ( 正 符号 ) 7 
ボク チャ ーー 区 学 、 26 る 5 
| ( or 記号 ) 7 

| (連結 演算 子 ) 8 


ge ( [and] 記号 ) 7 

S ( 通貨 記号 ) の 

S ビク チャ ー 文 字 179, 263 
* ( 星 印 また は 乗算 記号 ) 7 

* ォ ビク チャ ー 文 字 260 

** ( 指数 演算 記号 ) 7 


し 導き ウジ ) 7 
ュ ( 「not」 記号 ) 7 


ー ( 負 符 号 ) 7 

ー ( 減算 記号 ) 7 

テ ゼ クチ ャ ー 凛 字 263 
ー テ ( 矢印 ) 8 


ー> ( ロケ グー ター 修飾 子 ) 8 2 

グ ( 除算 記号 ま た は 斜線 ) 7 

グ 挿 入 文字 。 261 

> (カン マ ) 7 

, 挿入 廊 字 261 

% (バー セン ト 記 号 ) 7 

% ACTIVATE ス テー トメ ント 
% DEACTIVATE ス テー トメ ント 


396 
2977 


% DECLARE ス テー トメ ント 397 


%% PROCEDURB ス テー トメ ント 4010 
% 割 当て ステ ー ト メン ト 397 

%DO 398 

%END 399 

%GO TO 399 

%%IF 399 

史 INCLUDE 399 

%% ナ ル ・ ス テー トメ ント 400 
%PAGE 401 

SKIP 401 

ー ( 分割 文字 ) 7 

>(「 ェ り 大 ] 記号 ) 7 

? ( 組 問 符 ) 7 

・( コ ロン) 7 

井 ( ナン バー 符号 ) 7 

⑲⑭ (単価 記号 ) 7 

「 (アポ スト ロフ ィ ま た は け は 単 一 引用 符 ) 7 
!9! 数 字 指 定 ビ ピクチャー 文字 17 8 


三 ( 割当 て 記号 また は 等 号 ) 7 
(中 失 247 
 〕} 大 括弧 2 4 7 


邦 文 索 引 459 


(fu+1 Stop, perioo, or Potnt) 7 


1cture Character 
uSe with numeric character data 261 
uSe wi1tn numer1C CharaCter Dp1CurG 


dots 248 


く ("iesS than" Sympo1) 7 


( ) parentheSeS 7 


キ 


(add ふ て 1Om OPeratOr) 7 
(p1uS Siqgn) 7 
D1C 七 UTG CharaAC も Gr 263 


+ 


| (or Symbo1) 7 
| | (concatenat1iOon OpDeratO と ) 8 


& ("and" symbo1) 7 


$ (currency Symbo1) 7 
S PtCcure charaCter 179。263 


キネ (aS も er1iSkK Or mult1ip1y Sympo1) 7 
ネ * DLC も ure CharaCter 260 
ます (GXDOTE TE ヒ 13 七 1 も Om OPDGratOr) 7 


: (SermrtCo1 ユ OT) 7 


っ ("no て " SymmWbo1) 7 


ー- (mnnuS S13m) 7 

ー (SuDt 上 raC も 1Or) OPSratOr) 7 
- P1Cture CharaCter 263 

ー> (arrOw) 8 

ー-> (1OCatOr dualtiEier) 82 


ノ (d1V1de Symbo1 or Slash) 7 
ノ / 1nS8artion character 261 


。 Coma 。 7 
。 1nSertion CharaCter 261 


(percCent SymDO1) 7 
ACTTVATE St も =tement 396 
DEACT TVATE Sta も ement 397 
DECILARE S モ ae て emen も 397 


トム 生 -、 芝 -、 生 - 、| 


179 


英文 索引 


% PROCEDURE Statement 400 
%ASS1gnmen も Statemernt 397 


%DO 398 

征 SND 399 
%GO TO 399 
%TF 399 


%TNCLUDE 399 

%Nu11 statement 900 
%PAGE 401 

%SKTP 401 


_ (break charaCter) 7 


> ("qreater than" symbo1) 7 


? (queStion mark) 7 


(colon) 7 


祝 (number S1dn) 7 


2 (commercia1 "at" siqn) 7 


* (apoStrophe or Sitng1e quoOtati on mark) 
*9? 1n numer1C CharaCt er SDeC1fiCat OnS 
Pp1Cture CharaCter 178 


(asSiqnment Symbo1 or equa1 sign》 7 


4 } bracCeSs 2047 


[ ] square Drackets 247 


A picture character 257 
A-Eormat item 268 
abbr eviationS Eor keywordSs 251 
abnorma1 proqgram termination 61 
acCCeSS 

direct。 indexed 163 

dir ec も 。 REGTONAL(1) 164 

di rect 。 REGTONAL(3) 167 

Seq uentia1 。 REGIONAL(1) 164 

Sequentia1。 indexed 162 

Seq uentia1 。 REGTONAL(3) 166 
accuracCy ofF mathematica1 名 nmCtionS 297 
ACOS bui1 モ -in EumCtion 302 


英文 索引 441 


aC 上 1Orn Spec1fica モ 1On a1phabetic 11St Of 人 Orma モ itemS (continued) 


3n ON statement 385 R-EOrmat item 273 
る C も も Vat1oOn OF D1ockS 57 SKTP forma も t tem 273 ヘー 
in1tial procedure 59 X-fOrmat ふ tem 273 
1nVokirg bl1ock 58 attering 1ength of string data 175 
Po1in モ of nvocation 58 a1ternatiye attribuates 111 
Dr1inary EmErY point 58 BUFFERED and UNBUFFERED at た tributeS 112 
PrOCeQdure referenCe 57 TNPUT。 OUTPUT。 and UPDAT 下 
SeCOmQdary enEry poirt 58 8 上 t エ ュ ユ buteS 111 
acCt1Ve DrOCedure (recur Sionn ) 」 SEO UENTTAT and DTRECT attributes 112 
reaC も tiVation of 61 STREAM and RECORD attripbuteS 111 
ADD Du11t- ュ nm FuncCtion 302 ammb1quouS YeferencCes 
ADDBUFEF_ option 157 mult も ip1e dec1arattonS 70 
addition 。 165。,167 American Nationa1 Standard (ANS) 
add1 上 1On OFEErator (+) 7 printer 156 
additiona1 hintS Amer1tcan Standard code for information 
On-COnQd1tiOonS anQd on-unitS 221 in て erchangde (ASCTT) 110 
add ュ 1 て 1Ve attriDbuteS 112 ASC エ エ 110 
BACKWARIDE attribute 112 anQ Symbo1 (&) 7 
deyice ndependence 114 ANY bui 1 上 - ュ rr function 303 
豆 NVTRONMENT attriDute 112 apoStrophe (") 7 
FUNCTTON Option 114 AREA 339,88 
KEYED at て tribute 112 ALLOCATE Statement with TN option 89 27009 
MEDTUM option 113 area Variajbtes 88 
PRTIT at と rt1bute 112 aSS1iqnment 90 
ADDR Du1 ユ 1 て - ュ 1n 人 func も tion 302,82 COnQd1it1iOnm Code 319 
3J9rG す da て G data 22 
ardumentS 297 EMPTY bui1 モ -n fanction 90 
3ata 141 ,227 eX て ten モ 88 
a1qgebra1C Comparison 35 FREE Statement with TN option 90 
Compar1 son 35 1nput and output of 91 
3a11aSed-Variab1e 208 1enqgth 91 
ALTGNED attriDbute 28。339 1OCatOor ConVverSion 89 
a1 iqnment ofEfSet expreSsSions 89 
at て tribute 217 “ offset Variables 89 2 
reCord 415 On-COndition 91 
ALL bu1 1 モ -1m Function 302 S1ize 22 
ALLOCATE Statement 367,49 Variab1es 88 
for based Variables 86 AREA attribute 224。88 
FEOr Contro11ed Variables 79 tn ALLOCATE Statement 367 
wtth TN option 89 AREA condition 323 
a11OCat ュ On AREA Conditton code 319 
buffer 137,152 AREA On-cCond ュ tion 。 91 
Du1 ユ 上 て - ュ 1n FunCt1On 81 area S1Ze 
dyYnarmncC 61 in Storage 88 
Of parameterS 104 ARG OpE1ion 。 235 Ne 
Stat1C 61 ardUumen セ も 
StOraqe 4。61 eXaTmD1G Of DreproOCeSSsor functionSs 199 
ALLOCATTON Dui 1 モー ュ 1m 人 um も Or 30 2,。 81 て returned Va1ue 199 
a11oCat1on ofF parameterS 104 SUBSTR 。 LENGTH。 and TNDEX bui1t- in 
aSter1SK mnOEat1Ox、 105 functions 200 
ContrO11ed parameter Dounds and も type 106 
eX て emtS 105 ard す ument paSSind 
eXDpreSS1On noOta も ion 105 も O COBOL routine 234 
Darameter a 人 上 tributesS 105 も O FORTRAN roOutine 234 
parame も er DOundS anQ extentS 105 も Oo Pi/ ェ エ procedure 236 
S1 mp1e PaArameter DOunQds 。 1enqths。 and ardumentS 
S1zeS 105 499reqdate 297 
a1PhaDet ふ iC 11S OF FoOrmat items 268 3nd DarameterS EOr DreGDrOCGSSO エ 
A-fOrma モ item 268 functiorS 199 
引 -fOrma 寺 1 ユ tem 268 COnVerS1ion of 296 
C-fOrma 上 1tem 269 dumrmy 101 
COLUMN format 1tem 269 entry expreSSionS a8 102 
玉 - 人 Ormat iten 270 mu11 298 
ど -EOrma も ュ ユ も em 271 ardumentS and parameterS 
LTNE foOrmat tem 272 ar1thmetiC 224 
P-EOrr ら セ itEem 272 わ u1 ユ 1 キ -1n umctionS 295。296 Cp 
PAGE fOrma 上 1 上 em 272 COnVersion 。 32 


462 


ar1thmeticC (Continued ) 
3ata 13,71 
OPGrat1On 。 224 
OpPera も 1OonS 34 
Operator 8 
arit hmetiC data 13,71 
baSe 18 
binary fixed-po っ 1n も data 15 
binary tloating-poirt data 416 
Compl ex 17 
COmp1ex ar1thmet1tC data 17 
decima1 fixed-Po1nt data 1 
dec1imal FEF1oatinmd-pOtrnE data 16 
moOde 14 
numEriC Character Qata 17 
prec1Sion 。 1 
preC1SiOn OF 72 
SCale 14 
ar ュ 1 上 hmEt1C OpDErat1onS 295,3 
OPDe エ at1OnS uS1nd Dui1 モ -1n EumCt1OnmS 3 
re Su1 て 5 OF ar1ithmet1tC OpDerat1onS 34 
array 22 
andQ data eG1ementS 72 
boundS and ex も entS 23 
COnneCted SG も Orade 24 
CrOSS- SGC も tiOnS Of 24 
431 me mnS1 Or」 3 上 モエ 1 Du モ 上 Ge 23 
ら SXD と eSS1On 31 
eXDYeSS1OnS aS SUDSCr1ptS 28 
infix OperatOrS and 0 
non- Conn ecCted Storaqe 2 
Of StructureS 26 
prefix operatorS and 140 
SuDbSCrirL 23 
Variable 22 
aryay eXDpreSS1OnS 39 
data COnVerSion 1n 41 
1infix OperatorS and arrayS 10 
PrefFix OperatorS anQd arrayS 40 
aTYaYy Of S 了 エ UC も ueGS 
CrOSS-SeC モ 3OonmS Of 27 
inter1eaVedQ SuDSCr1DtS 27 
Subscri Pted qua1iEhed name 26 
array-and-arYay OpeYationS 40 
array~-anmd-e1ement operationS 40 
Array- and- StTUC も U て G ODGra て 1OnS 41 
array~-hnand 11 rg 
Du ユ 11 モー- ュ nmn EuUnC モ 1OnS 297 
array-hand11 ng bu1 1 上 - ュ 1m 人 umnC も 1onS 297。,296 
arrayS OfE StruCtureS 26 
arrOw 《(->) 8 
ASCTT (American standard Code for 
informat ュ on interchandge) 110 
ASCr1T data SetS 138,159 
ASCrT option 138,160 
BUFOFEF Opt+Onm and D1OCK prefix 
Fie1dS 138,160 
3 -FOrma と た and QB-FOrmat records 138。160 
defau1t ruleS 139。160 
ASTN bu1 1t- ュ im EuriCt1On 303 
ASSEMBLER Op も tioOn 361 
ASSGN Job contro] Statement 115,110 
aSS1qrmment 32 
area 3930 
editind by 175 
1ni て ia11zat1on 220。223 
mu1t1D1eG 47 
other formS oE 176 


aSSigqnment (continued ) 
Statement 369。.87 
SymDOo1 (=) 7 
ASSOCIATE option 148 
aSSociatinq data SetS w ユ th fileS 116 
aSSumPt1 OrDS 
defaul モ 3 
aS も eY1SK (*) 7 
aSteriSk notation 105。80 
aSynChronouS npu も |Ou も tput 144 
aSynChronOuS npu キ ノ output bu1 1 キモ -1 nm 
functionS 296 
ATAN bui1t-in Funmctiori 303 
ATAND bu1 1 も - ュ nm uncEiorn 303 
ATANH Dui1 キ -1in FunCtion 303 
a キ た tritDbute 335 
add ュ キュ Ve 112 
ALIGNED 28 
ALITGNED and UNALTGNED 339 
a1iqgnment 217 
a1 も terna も 1Ve 111 
AREA 339 
AUTOMATTC attribute 340 
BACKWARDS 112。,341 
BASED 341 
BTNARY and DECIMAL 341 
BTT and CHARACTER 3842 
BUFFERED 112 
BUFFERED and UNEUFFERED 342 
BUTLTITN 383 
CHARACTER 343 
COMPLEX and REAL 。 343 
CORDTTTON 343 
CONNECTED 343 
CONTROLTLED 394 
DECTMAL 。 344 
dec1arationS and 220。222 
DEFTNED 27,。3194 
QimenSion 23,348 
dimenS1On a も Eribute 348 
DTRECT 112 
DTIRECT anQd SEOUENTTAL, 348 
entry 101,349 
ENVTRONMENT 112, 351 
ENVTRONMENT , for reCOrd-O ェ 1GriteQ 
tranSmtSS1ton 148 
FENV TRONMENT 。 FoOr St 上 ream-Or1 ら en も ted 
も ranSmtSS1tOon 133 
EVENT 351 
externa1 68 
EXTERNAT,。 and TNTERNAL 35 3 
Eite 111,353 
FTXED and FLOAT 354 
FLOAT 354 
GENERTIC 354 
TNITTAL。 29,355 
TNPUT。 OUTPUT,。 and UPDATE 357 
TNTERRNAL。 358。68 
TRREDUOCTBTLE and REDUCIBLE 358 
3SUB defininqg 346 
KEYED 112,358 
LABEL 358 
1enqgth 359 
LTKE 27,359 
Of re も turned valueS 97 
of tarqetS 39 
OFFSET and POINTER 360 
OPTTONS 360 


英文 素 引 443 


a モ も tr1Du モ te (cont imnued ) 
OUTPU 和 T〒 362 
parameter 105,362 


paramet@er att エ iDbute 362 

PTCTURE 362 

POINTER 363 

POSTTTON 363 

preC1SiOon 363 

PRITNT 112,.364 

DrOCeSSeGS 1n app1ication of 71 

REAL 369 

RECORD 111 

RECORD and STREAM 3648 

REDUCTBLE 364 

RETURNE 364。.97 

RETUORNS option 98 

ULeS Or Daramet@r deS Cr1pDtOr 

1tStS 349 

SEOUENTTATL 。 112,365 

S1mp1e defining 345 

S1ze 365 

S1Zz G at 上 tr1Dute 365 

SDeC1f1icCation 73 

STATTC 365 

STREAM 111 ,365 

Str1nq OVer1ay qaefFining 347 

UNALTGNED 28,365 

JNBOEFFERED 112,365 

UPDATE 365 

VARIABLE 365 

VARYTNG 366 
AUT う MATTC a 上 モエ 1 わい も ら G 
utOmat ュ C StOrage 78 
autOmat ュ 1C Variab1es 

effect Of recursion on 78 


340 


B inSer て ion character 261 
B-tOrma item 268 
BACKWARDS at 上 モエ Du て 
paSa 14 
DaSeG Var1iMDl1Ge 
1n DEFTNED attribute 344 
DaS @G。 ar て 1 ュ て hm et ュ 1C 
Standard defau1tS 71 
BASED attritbute 340,381 
baSed Storage 81 
ADDR Du11t-in function 82 
a11OCate Stat 上 ement for based 
Varia ゎ 1]eS 86 
area aSS1qrnment 90 
areaS 88 
paSed Variab1eS and 1nput/ ノ output 83 
FREE Statement for DasSed variab1es 86 
1nput ar Output of areas 91 
11S も procesSinq 86 
ToOCator qua11fication 81 
mutt ュ 1p1Le qenerationS of based 
Variab1es 86 
mult1p1G 1OcCator qua1ification 91 
NULL Dui 1 も -n 人 unCtion 87 
pointer VariableS 82 
Se1ft-def1ning data (REFER option) 85 
typeS Of 11StS 88 
DaSed Variab わ leS 83 
Locate mode 83 
LOCATE Statement 84 
READ gw ュ th SE 呈 Statement 84 


112,341 


4 64 


basic characteristics of PL/T 3 
COmp1 1e- 上 1me operattons 5 
data Co11ections 4 
data typeS and data description 3 
defau1t aSSumnptionS 3 
eXDreGSS1OrmS 4 
input and output 5 
1nterruPE aCtivities 5 
machine indepenaence 3 
Operating SysStem faci1ities 6 
DFrO9ram StrucCture 3 
S も orade allocation 4 

Dasic program Structure 10 
drOADPS and blockS 11 
Sitmple and compound statements 10 

begin b1ock 55 
and procedure Db1ock 11 
termt ma も 上 ton 59 

BEGTN Statemen モ 371,48 

bi nary 
fixed-poin モ t data 15 
floatingq-point data 16 

BTNARY at て t と 1bute 341 

BTNARY bu1i1 ヒ -1n function 303 

pinary d1q1 キ 上 (bi も) 7 

oe 
COmparison 35 
Strinq 36 

D1t aS unit of storage 28 

BTT at 上 triDute 342 

BTT Dui1t-in Function 304 

bit Comparison 35 


bi を strinq 36 


D1 モ 上 oO arithmetic conversion 279 
b わ 1 も tO cnaracter converSion 288 
Di も t 上 O numer1c charact er convers ion 
わ 1 も - St エ 1nd 
data 20 
hand1ind 181 
OpPerat1on 8,34 
una11gned 141 
blank CharaCter 7 
BLhKSTZE op も ton 136,151 
b1ock 109,55 
activation of 57 
beqdin 55 
begin b1ock and procedure 11 
externa1 56 
interna1 56 
1nVoking 58 
neSted 56 
Pref1x F1e1dS 
PrOcedure 55 
Stze 137,136。152 
term1ination of 59 
Dp1oCk Size。 PRTNT fi1es 137 
b1ock Size。 record-oriented 
も ranSr1SS1ton 152 
DLOCkK Size。 Stream-Oriented 
ranSmiSSton 136 
plocked records 110 
BOOL Dui 1t- ュ nm unction 35 
BOOL BUTLT TN FODONCTTON 30 
boo1ean operatioms 35 
poundarY 
1ntegra1 28 
jpoundSs and extentsS 23 


138, 160 


286 


breces # } 
ょ mn Syntax Qefinition 207 
br anCh 
Condttiona」 (See TFP St 上 ぁ ぉ teGment) 
uriCOnd1 て 1 Ona1 (See GO TO stat ement ) 
break Character ( ) 7 
DuEt を Gr 
altocation 137,152 
offSet 137 
BUFER ED a 上 tr1Dute 112。342 
BUFFERS option 137,152 
BUFOFF option 138,160 
Du1 ] モ - ュ mm Function 99 
ADDR 82 
9J9rGda も G arqUmmGntS 297 
al11ocation 81 
and DSEudoOvariableS 295 
ar ユ 1 て hmet1icC 295,。296 
array~-harid11nd 297。296 
aSynChrOnOuS 1npu キ モノ Outpu 上 。 296 
poolean 35 
CLaSS1F1iCation っ FE 295 
Cond1t1on-hand1inqg 296 
COnVerS1on of arqumentS 296 
EMPTY 90 
mathematica+ 297,295 
nu ardumerntS 298 
ODGYa た 1OnS uS1ind 34 
S も OraJE COmEro1 296 
STREAM . 1npu モ キノ Output 2956 
Strind 182 
Strinq-handling 296。295 
bu1 1 キ -1n fumCt1Or5S 
FORTRAN 1ipbrary functionS 100 
Du1 1 キ - ュ nm SuDroutineS 100 
BUTLTTN at も tribute 343 
BY NAME Option 42 
BY option in DO Statemen も 377 
Dye aS umi 上 CE SOraqge 28 
byteG 1OCation numperinqg 28 


C-foOrmat ふ 革 em 269 


CALL option in INITIAL attribute 29。66 


CALL StatEermment 372,51 
Cal1 ind traCe (SNAP option) 3856 
CaDaC1 て Y reCord 165,164 
Card punCh CoOQe 
8 -CDaraAC も Gr Se も 250 
60-characCter Se も 249 
CEIL Du1i 1 は t- ュ nm umCt1On 304 
CeG+14 Va1ueS 
taDb1e Of 275 
Chained 11St 86 
CHAR BUTLT TN FJNCTTON 308d 
CHARACTER 
DLCEurS 263 
Picture 263 
PLCture 260 
1rnxSer て on 261 
1nSertiOr」 261 
inSer 人 tion 179 
piCture 257 
1jaSGr モ ュ 1Orn。 261 
BTT and 342 
ご OmPar1SOT。 35 
CR pictuz=e 26 
DB piCture 264 


N えて も) 


の ツジ の 9 ゃ 


CHARACTER (continued ) 

E ptcture 265 
F picture 266 
エ ptCEure 264 
inSertion 261 
K ptCture 265 
picture 179 

R PCture 26 
S Dp1Cture 263 


SetS 7 
SpecCia1 7 
Str1tnq 36 


T piCture 264 

V pcCture 259 

X Dp1Cture 257 

Y picture 260 

2 pcCture 260 

ZeYO SUDDreSS1ton 259 
CHARACTER attribute 342。343 

tn ALLOCATE statemernt 367 
CharaC て Gr data 

nmUuINGY ユ C 17 
CharacCter SetS 7。249 

uSinq character Set 8 

with EBCDIC and card-punch codes 

48-character Set 7。250 

60-character Se も 7,2849 
CharaCt er SpectF1toat 1OnS 

numericC 177 


249 


Ch a エ aC も Gr 上 の 〇 arithmeticC comnverSion 279 


CharaC も er tO bi も COonVerSion 290 
Char エ AaC 七 G て 上 〇 UmG エ 1C CharaCE Gr 
ConVerS1on 285 
CharaC も Gr-S モ て エ 1nq 
data 19 
PL Cture SpecitficationS 180 
p1ctured item 257 
C 提 互 CK 
Cond1tion 189 
Cond1ition Code 320 
CHECK Cond ュ モ tion 324 
ChecCKOut 。 prOdram 185 
(See al1SO DrOqdram CheCKOut) 
Cl1aSSeS of StatemerntS 145 
ctaSS1tficat1On 
Key 157 
OTF Du ュ 11 モー- ュ nm FumC も tiOmnS 295 
oE Cond ュ tionS 323 
S も at も temen も 45 


ClauS GS 
ELSE 383 
THEN 383 


CIAOSE Sta も temen も t 117,372 
C1oSinmqg f11e 115 
COBOL 
interface 241 
Option 235,237 
PaSS1nd ardumentS t 〇 234 
COBOL。 - PL/ エ T data equivalentsS 21 
COBOL option 。 361 
CoOd@ 
AREA Condition 319 


Character SetS with EBCDIC and carqd- 


punch 2849 

CHECK Condition 320 

COnd ュ ition 318 

ConQdition bui1t-n functionSs 190 
CONDTTTON condition 320 
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COde (conti nued) 
CONVERE TON Cond1ition 320 
ENDFTLE condition 319 
ENDPAGE Condi た on 319 
ERROR COnd ュ て ton 318。321 
TNT5H COndi も tioOn 318 
F エ TXEDOVERFLOW condition 319 
1nfOormat1tOnm 1nterchange 110 
KEY Conhdition 318 
NAME COrd1 て On 318 
OVERFLOW condition 319 
RECORD Conmd1itiori 、318 
STZ Cond1 モ 1On 319 
STRTNGRANGE Cond ュ it1On 319 
STR INGSTZE Condition 319 
SUBSCRTPTRANGE Condition 320 
TRANSMTT conhdition 318 
UNDEFTNEDFTLE Cond ュ toOn 319 
UNDERFLON Condition 319 
ZERODTVTDE Comd1tion 319 
COd ュ nd SOUYCG DrOqdraI0S FOr OpE ュ mizind 
<Omp1Lle と て 208 
11iaSed-Variab1e 208 
COmmon exDpreSS1Oon @1imination 208 
Other Or た iimnzation featureS 210 
と edun dan 上 expreSS1On Ge11mination 。 210 
trarnSFfer Of inVvariart eXxDpreSSionS 209 
COLBTN opt1on 149 
CoO11ect1 OnS 
data 4 
Colon (s) 7 
Co1umn Dinary (COLBTN) 1849 
COLUMN Eormat item 269 
ComD1mat ュ or ofE Specia1 charaCterS 7 
COmD1 nat1OnmS OF OperationSs 36 
Comma (。) 7 
COmmentS 9 
CommeriCal "at" S1qGn (@) 7 
ご OrmmOn 
SGXDreGSS1On el11m1nation 208 
eXPpreSS1tonS 205 
StOrade 237 
COImTmOn 6 エエ OrS 
and p ュ 1t 上 fa11S 221 
COmrmon errorS and phtfa115 221 
ar ュ 1thmet1C and 1ogica1 operationS 224 
aSS1qrimentS and 1ritia1izatiOn 223 
da も a aqddregateS 227 
Gec ara も 1 OnS anQd a も tr ふ 1DuteS 222 
dO- GrOuUpS 226 
F umC モ 1OrS and DSGudOvariaD1eS 228 
1nDpu も モノ /Ou モ Du モ 。 228 
On-COmd1t1OnS an Onh-un1tS 228 
Operat ュ nd SyStem and ]oD Contro1 221 
Opt ふ OnS OF prOCedure/ ノ ent エマ 
StatemmerntS 223 
Proqdram Contro1 221 
SOurCG DFOJram and 221 
SOurCG PrOgram and denera1 Syntax 221 
St エ ュ mn3S 228 
COmDar1SOn 
Aa1qgebra1C 35 
Dit 35 
CharaCter 35 
Operat ュ onS 35 
OPErator 8 
PFOGram COntrOo1] daca 35 
tab1eS for 295 
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COImDar1S On OpSra も tor 8 
COmp11at1oOn 
Cond1tion 323 
improVing Speed of 210 
COmp1t 1e- 上 ュ ユ me OperationS 5 
COmD ュ 1 @G- モ 1me StatementS 396 
(See a1SO pYeDrOCeSSOr Sat em en て S ) 
CoOmp11 er 回 
CoOdimgd SOuTCG DOqdTamS fFOY 
Op も imizinq 208 
COMPHLETTON 
and Sta も uS Va1ueS 145 
PSeGudovariaD1e 304 
COMPLETTON Du ユキ -n Funmction 。 145,304 
COmpLex ar1thme も iC data 17 
COMPLEX a も tribute 383 
COMPLEX BUTLT TN FUONCTTON 304 
COomplex Forma た item 269 
COMPLEX pSeudovariab1e 305 
Complex 上 O rea+1 ConyerSion 279 
COmpOS1te Symbo1lS 249,250 
CoOmpound S も atemert 10 
COmD uta 七 1Oona1 Du11 キ - ふ jn FunmCt1 OnS 
ClaSsifitcatior、。 295 
COmputa も iona1 StatementS 47 
COonCatenation operationS 36 
bi も Strinq 36 
Character Strinq 36 
ConCatenat1ion Operator (1) 8 
Condit1on 
CHECK 189 
ClaSS1fication of 323 
codeSs (on-codes) 318 
Comp1i lation 323 
condition Code 320 
CONVERSTON 43 
eXxCeDp モ iona1 143 
1 npDut 上 /OutDput 323 
11S も t of 323 
prefix 10。,185 
DrOqGram-CheCKOut 323 
PrOJraImmeGr-mamed 323 
SIZE 143 
Storaqe Cortro1 323 
STRTNGRANGE 190 
STRTNGSTZE 190。43 
SUBSCRTPTRANGE 190 
SyStem acCt1On 323 
CONDIT TON at と ri1Dute 343 
COndit ュ On Du11t- ュ nm functionS and Condition 
CodeSs 190 
Condit て ton CodeS (on-codes)》) 318 
AREA Conditiom Code 319 
CHECK Condi も ion code 320 
CONDITTON condition code 320 
CONVERSTON condition code 320 
ENDFTLE Condit ュ on Code 319 
ENDPAGE Condition Code 319 
ERROR Condition Code 318,321 
FTNTSH Comdition code 318 
FTXEDOVERFTLOW cond1ition code 319 
KEY condition Code 318 
NAME Condition Code 318 
OVERFLOW condition code 319 
RECORD ConQditior、 code 318 
STZE condition code 349 
STRTNGRANGE Cond ュ ition code 319 
STRTRNGSTZE Condition code 319 


COnd1t1Om COdeS (On-COoQGeS ) 
SUBSCRIPTRANSE condition Code 320 
TRANSMIT coriditior Code 318 
UNDEFINEDEFTILE cond1tion Code 319 
UNDERFLO _ Condition Code 319 
ZERODTVTDE cond ュ ton Code 319 

CONDITTON cond1tion 189。326 

cond1ition- han dL 1nd Du1 ユ 1 も -1n 人 unCt1OnS 

CONJG bu1 1 も - ュ 』nm EuncCtion 305 

CONN EC TED a も tr1DutG 343 

COnriGCteQ SEOraqe 24 

COnS GCU て 上 ユ び G 
data Se も 5 137 
Orqgeniza も ion 161 

CONS ECUTTV 下 da も a 
SetS 137 

CON SECUTTVE data SetS 137 

COonSeGCut ive organization 161 
Sequerntia1 update 161 

COnS も am て 13 
Sntry 58 
file 110 
imao1tinary 17 
1ajbe1 21 
noOte も tiOn 247 
Yea1 17 

contanned in 65 

COnte Xtua 1 
declaration 66 

Contextua] Qecl1aration 66 
Scope of 66 


SCope Of contextua1 declaration 66 


COn 上 YO 
format itemS 129。131。267 
PrOdram 221 
StateientS 49 
Storade 77 
cont ro1 code (CTL360/CTLASA) 156 
Contro1] StatementS 49 
CALL。 RETURN,。 anQ END StatemmEnS 
DO stacemert 50 
eXCeD も 1On 52 
GO TO statement 9 
TF Statemen も t 149 
1 npDuU モ ノ Output 47 
11Stinqd 203,.401 
noOn-1 モ Srat1iVe DO StatementS 51 
STOP Statement 52 
StoraJe 9 
Contro1 Variable in DO Statemen も 50 
CONT ROLLED at も rihbute 348。.340 
Contro11ed parameter DounQdSs and 
sxtentS 105 
contro11eda Storage 78 
a1tocate Statement Or COnt ro11 ed 
VariablesS 79 
ALTLOCAT TON bui 1t 上 - ュ nn FunCEion 81 
Con も trO11ed St て YuCtUTGS 81 
FREE Statemernt for Cont ro11eQ 
variab1eS 80 
multi p1e dernerationS of Contro11ed 
variables 80 
COntro11ed StructureS 81 
COntrOo11 ea VariaD1 eS 
at11ocate Statement for 79 
Eree Statement for 80 
mu1lti pl1e generat1ornS Of 80 


(cont 1nu ed) 


っ 1 


COnVerS1On 
aY ュ thmetiC 32 
COnd1 エ tion 。 143 
conQd1ition Code 320 
data 214。.32 
1ocator 89 
1ocator data 33 
of arqgumentS 296 
OfFSe も ata 33 
prob1em data 32 
reduction OoF Key 166 
rules 277 
type 32 
CONVERSTON corndition 326 
COnVerS1iOn Of arqumentS 296 
aY1i て hmet1C bai1t-in functionS 296 
arrayY-jhand1ind bu11 上 - ュ mn EUC て 1 OnS 
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mathematicCa1] bui1 も -3n 人 umcCtionS 297 


String-hand11nd Du11t-in functiOnS 
COPY option 。 121 
COS bui1t-in funcEion 305 
COSD bui1t-n Eunction 305 
COSH Du11t-1n funcCtion 305 
COUNT bui1 モ -1n Eumnction 305 
CR picture CharaCter 264- 
Creating data Se モ 166。,162 
creatimg rEGIONAL(1) data Set 164 
Cr eGQ1i も (CR) D1CtuYG CharaC も Gr 
uSe wiEh numeriC CharaCt er D1CturG 
Cr Gd1t。 deb ユ も 。 and OVerDunChed S1qgrnS 
CR picture character 264 
DB picture Character 264 
+T picCture Character 264 
R piCture Character 264 
T ptcture Character 264 
CrOSS -S GC 1OnS 
of arrayS 24 
Of arrayS OF SErucCtureS 27 
Of StrucCtureS 27 
CTLASA option 。 156 
CTL360 option 156 
CurremCy Symbpo+t 261 
CurrenCy SymDbo1 ($) 7 


D-fEormat record 138, 135。 160 
data 
aggreqgateS 。 1d1。227 
area 22 
arithmetiC 13。71 
binary Eixed-PO3nt も 15 
bi nary E1Oat1nmd-DpOinE 16 
b ュ も -StYin 可 20 
CharaCt er-S キ 上 rinmqd 19 
CO11ectionS 4 
COmpar1Son 35 
COmDp1 ex ar1thmet1icC 17 
COnVerSiOn 。 214。32 
dec1ima1 fixed-POtn も 14 
decima1 F1oatind-PO1nt 16 
e1ementS 13 


erntry 21 
eVent 22 
file 21 


forma セ モ itemS 267 
interchange (COBOL) 156 
1abe1 21 

1iStS 119,120。121 


英文 索引 
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264 


263 
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data (continued ) 
LocatOor 22 
mapp1tn コ 103 
mapp1inq, durirmqd 1nterlandUuade 
COmmuntCat1hOn 236,238 
numeriC CharaCter 17 
Ordan1 2ZatiOnm 。 22 
Dr と C1S1On Of ai モ thme も 1C 72 
problem 13,234 
proplemw。 defaultS for 71 
PrOogram Contro1 21。238 
DrO9ram COhtYO1。 defau1 も S foOr 72 


SetS 109 

Spec1F ふ CationS 121 

String 18,72 

も YanSm1SS1On Statemen も tS 120,141 
type 3,13。234 


data ConVerSion 210。32 
anQd exDreSS1On eValuat1on 277 
aSS1dirmnen も t 32 
eXpDrESS1OnS and 31 
1n array exXDreGSS1OnmS 41 
1ocator data COnVerSion 33 
OPe ra モ 1 Onma1 GeXPpreSS1OnmS 32 
prob1 em dat& COnVerS1On 32 
SOurCeG 上 〇 tarqget ruleSs 277 
uSe of buil モ -n funCtionS 33 
data COnVSrS1On anQd exDpreSS1On 
GVa1ua た ioOn 277 
eXamp1e ofE uSe Of ConVerS1or、 ruleS 278 
も て ab] GS For a エ ュ 1 上 hmet1C Operat1onS 295 
tableS for Compar1 Son OperatiorS 295 
data edit1ind 175 
data elemerntS 13 
arrayS anQ 72 
ConStant 13 
data Orqgar1tzation 22 
data tyDpeS 13 
O も th ら Gr atEr1DbuteS 27 
problemn data 13 
program COmtro1 data 21 
SymiootiC name 13 
Variable 13 
Qdata equ1tVal entS 
COBOL。- PI/ エ 241 
FORTRAN - PL/ エ T 23 
Gatas format iterS 267 
3ata interCchanqe (COBO) 156 
ata 11Sts 119。,120,121 
deneral forma モ 122 
On 1nput 122 
On Output 。 122 
reGpe も 1 も 1VG SDGC1E1Cat1On 122 
Syntax rules 122 
上 rarSIu SS ふ 1On OF data-11S も 上 el1ementS 123 
data managemen 革 Op 上 1mitza も ion 157 
data mapphng 03 
Qur1nd 1n も erlandua9@e 
COmmuntCation 236,234 
て eoCord al1qnmen モ 上 415 
S モ ruC て ure mapp1hrio 403 
data moVemen も and computat ioma1 
StatementS 47 
aSS1qniment Sa た emernt 47 
DATA Option 125 
data Orqgan1zat1On 22 
array Variable 22 
arrayYS 22 
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data orqgan1iza て tion (continued) 
arrayS Of StruCtureSs 26 
e1ement も Variab1e 22 
S も ruCEure VartapLe 22 
S も trUuCtureS 24 
data set 109 
ASCTT 138。159 
plock 109 
CONSECUTTVE 137 
Creatinq 166,162 
Creatinqd YEGTONAL(1) 164 
1 nf Orma モ ion 1nterChanqde CodeS 110 
Orqdan1za て ion 137,152 
record 109 
Volume 109 
VSAM 158 
data Specificat1on 121 
data-directed 125 
ed1it-directed 128 
11S モ -directed 124 
data Spec1f ふ iCat OnmS 
data 11StS 121 
data 上 anSTm1SStOn Sa em en も S 
data 11S も モ 120 
DELETE Statement 142 
LOCATE Statemen も 142 
READ statement 142 
RENRTTE Statement 142 
Stream 1nput 120 
Stream Output 120 
Streamm OutDu 七 prin 120 
RTTE statement 142 
da も ta tranSm ユ tted 141 
data aqgdredateS 141 
una1iqned Di て StrinqdS 141 
Varying-Lendth StrinqS and area 
VariableS 141 
data typeS and data QeSCription 3 
data- dir ecCted data 
in Stream 125 
SpeC1fFication 125 
SpeC1f1iCat 上 ion fOr Output 127 
SpeGCi1tficCationS foOr 1nput 126 
data-direct ed ranSsmtSsion 119 
input 119 
Output 119 
DATAFTELD bu11 モ -n EunCtion 305 
DATE: 305 
DB picture Character 264 
DB-F ormat record 138。135,151,160 
deb1 モ (DB ) DC も uFG ChaAFACt@〒 
US G W ユ th YumG エ 1C CharaCt@Gr D1CtUur@G 
debuqg9g1nd ads 
CHECK ConQdition . 489 
CONDTTTION condition 189 
STRTNGRANGE Condition 190 
STRTNGSTZE CONDTTTON 190 
SUBSCRTPTRANGSE conQditton 190 
debud9g1n9 uSinmd COond1ition preEix 10 
dec1 ma1 
fixed-poirt data 14 
reDreSentation 119 
DEC1TMATL, a 上 モエ ェ ュ bntG 344。341 
DECTMAT,。 bui1 も モ - ュ nm FumnCtion 305 
decima1 ユ diqit 7 
decima1 f1Oat1nm9-DO1n モ て data 16 
decima ユ -Do1nt SDeCc1hfEier 259 


120,1141 
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dec1arat1On 
3 モモ エ iDuteS 222,220 
Cont も txtue1 66 
eXo11C ュ 上 65 
1mp1L1C ュ 1 も 67 
OF record fi1eS 168 
GecC1 ar at1On5 
と XainpleS of 67 
DECLARE Statement 5 
detaul て 373 
aSSUINDt1OnS 3 
recorQd format 136,152 
reStorind St も andard 74 
ruleS 139,.160 
S も a も ement 72 
defFau] 七 a 二 も て エ ュ Du モ GS 
app ユ ca も tion of 71 
deFau1 モ 上 Statemen も 45,72 
a モ も エ 1 Du モ te SDeGC1f1iCat1iOn 73 
DESCRTIPTORS op も ton 73 
Factored deEau1t Spec1tfication 74 
programmer-QdeFined defau1 も 75 
RANGE option 73 
reStoring Standard defau1ttS 74 
て GS も 1C モ tiOnS On uSe OfE 75 
SCOoPe of 74 
DEFTNED attriibu も te 27,。384 
defFirmed data item 27 
Qdef1ned var1ab1e 3 は 4 
dQefinnind 
1SUB 346 
Simp1e 345 
S モ tr1 nd OVerlay 347 
DELAY Statemen も 376 
DELETE Statement 1842.376 
de11miterS for CommentS 9 
deSC エ 1 pt1Ve StatemerntS 45 
deS Cr 1Dt 上 Or 1 1S も 5S 
Paramieter 102 
DESCRTIPTORS option 73 
deV1CG 
Eunction (FUNCTTON) 134。148 
imdeperidernCe 114 
tyDe (MEDTUM) 134。,148 
deV1cCe ndeperndence 114 
deViCe name。 SymRDC1L1C 113 
d8V1CS USaqe 
direcC も aCceSS 139 
41YGC も -aCCeSS 154 
deyiCe- aSSOC1ated ElteS (TBNM 3525 CarQ 
punch) 167 
d ュ 1q ュ 1 モ 
Dimary 7 
deciina1 7 
SpecCifierS 259 


digit and dec1ima ユ -DO1n 七 SDeC1EieGr5S 259 


V picture Character 259 

9 picture CharaCter 259 
DTM Du1i 1 も キ -1nm Functiorn 306 
d1menS 1On と キ 上 て て 1DutG 23,.3G8 
31 IE nS1 OS 

arYay 23 

inherited 27 
dimenS 1OnS -12-maX1mUW nUmDe エ 
direC も aCCeSS 

deVicCe uSad@e 139。154 

indexed organ1zat ふ On 163 

REGIONAL(1) organiza も tion 164 


di 了 ら Ct aCCeSS deVvice usSade 154 
d1rGC も aCCeSSY 
REGTONAL(3) organization 167 
DTRECT at も tr1bute 112。348 
di reCt-aCCeSS QGV1Ce uSaqd@G 
EXTENTNDMBER Op も ion 。 154 
HTGHTNDEX option 154 
TNDEXMOULTTPLE Opt1On 。 154 
OFLTRACKS(n) option 154 
VERTFY option 154 
di sab1ing of conditionS 185 
DTSPLAY statement 377。47 
DTVTDE BUTTLT TN UNCTTON 306 
diVide symbo1 (/) 7 
DLBL ob contro1 Statement 。 117 
DO 377 
grOoupS 220 
Statemernt 50 
St も atement non-1terat1ve 51 
do-qroup 226 
DreDrOCGSSOY 201 
dotS 。。。 248 
doubleword 28 
dr1ift1nmg piCture Character 262,264 
dummy 
erqdumerntS 101 
recordS 164 
dummy Variab1e (1iSUB) 27 
dynam1C a11Ocatiori 61 
dynamiCa11y deScCendant on-unitS 187 


E piCture CharacCter 265 

EE-Format tem 270 

EBCDIC (extenQded binary Code deci ma 

tnterchanqge Code) 110 

EDTIT option 128 

edit-directed Qdata Specification 128 
contro1 Format item 129。131 
exDreSS1ton in format item 132 
Forma モ 11StS 129 
ェ remoOte EormaE tem 132 

ed ュ モ -direCted fFOrma 七 ふ temS 267 
a1phabetic 1is 革 上 of format itemS 268 
COnt も ro1 fForma も temS 267 
data format 1temS 267 
remOte format tem 268 
tab1e ofF Cet] YalueS 275 

ed ュ i モ -dQirecCted tranSmtSS1ton 120 
inpu も 上 120 
outpu も 120 

editinq by aSSiqnment 175 
a1terinqg 1ength of Strirng data 175 
other formS ofF asSSiqnment 176 
PC も urG SpeC1F1iCat1On 177 

eQ1it1nqd CharacterS 18 

eFFic1ien も programmtnq 210 


Ge 1ement 
arrayS anQ data 72 
data 13 


expPFeSS1Orn 31 

proqgram 7 

Variable 22 
elementary name 25 
e1 im1nat1on 

Of CoOmmmon expreSs1On 208 

of redundan モ expreSS1ionS 208 
ELSE chanCe in TE Statemernt 384 


英文 索引 449 


emDedded keyS 162 
EMPTY Du ユキ =-in Eunction 306,90 
enapled Cordit1iornS and eS も tab1ished 
aCtiOon 。 185 
CHECK ConditiOn 189 
COn G ュ ヒュ On Du ユエ ユ モ - ュ nm umC も 1OnS and 
COYQdit1iOon Codes 190 
CONDITTON condition 189 
COnd ュ it1Or, DrefixeS 185 
dynam1ically deScerndant On-uni も S 187 
nu11 Onm-uYi 革 187 
ON Statement 4186 


On-um1 て S 征 Or 1]e parame て eyS and Ei1e 


Var1iableS 187 
REVERT Statemen も 188 
SCOPe ofF CoOndition prefix 185 
SCOpe Of を ON Statement 187 
STGNATL,。 Statement 189 
STRINGRANGE Condition 190 
STRTNGS TZEE Condition 190 
SUBSCRTPTRANSE condi も tion 190 
END Statemern も 379,49,95 
uSe of 56 
ENDFT エ LE Condition 327 
ENDFTHL 豆 Condit1on Code 319 
ENDPAGE COndit1On 132,327 
ENDPAGE Cond ュ も 1On Cod@e 319 
ent と て yY at て ribute 101,3849 
GntLry GeXDreGSS1OnS aS arqumentS 3102 
ParameteGr dQeSCr1ptor 1iStS 102 
entry ConStant 58 
entry data 21 
entry name 56 
aS a Darameter 107 
qeneric 98 
entrYy po1ntS OF Subrou キ 1neS and 
FunC 上 1OnS 94 
ENTRY Statemment 380。98,.94 
entry Variaple 58 
ENVT RONMENT 
eS も tab11Shind PL/T 238 
nm 上 と rlamguade 238 
ENVTRONMENT att と bute 112。351 
ASCTT Qata SetS 138。159 
ASSOCTATE Option 148 
DuFEer Aa1LOCa キ 1Om 。 137,152 
CO1umn Dinary (COLBTN) 149 
Gata 1iiterCharge (COBOL) 156 
data manaqemen 革 Op も timization 157 
data Se も Orqgan1zat1on 137,152 
deViCe funcCt1on (FUNCTTON) 134,148 
deV ユ Ce type (MEDTUM) 134。148 
dQ1r GC も aCCesS dGV1Ce uSadeG 139。154 


FE O エ reCcCrd-OYienteQ trarnSm1iSSion 148 
fFOr St エ ream-OY4ented て と YanmSmtSSton 133 


KeY ClaSS ュ Et1Cation 157 
key 1enqgth Option (KEYTLENSTH) 158 
KEY 1OCat ュ 1Om Opt1on (KEYLOC) 158 


madr で も ュ 1C tap@e hand1inq OptionS 137。159 


OPDt1Ca mark read (OMR) 149 

pASSWORD Option 153 

Dr1 nt も G ェ /punmCh Cont ro1 
(CT1360/CTLASA) 156 

reed CoOlumn eH1rmnnate (RCE) 134。189 

reCord fOrma も OptionS 134。150 

S も acCKer Se1ect (STACKER) 134,.150 

Vary1ind-1ength S も trim OpE1On 
(SCALARVARYTNG) 158 


ENVTRONME NT attribute (continued) 
VSAM data SetS 158 
Sp1toqueS 63 
equa1 S1qn (=) 7 
ERF Dui1t- ュ nm funcCtion 306 
ERFC BUTLT TN FOURNCTTON 306 
ERROR condi も tion 185,327 
ERROR CondQtt1on Code 318,321 
GrrOT YeCoOVery 220 
estab1ished action 。 185 
eS も ab1] 1S himn PL/ エ T enVironment 238 
EVENT at て ritbute 351 
eVent Qata 22 
EVENT option 166 
BGVGnt ar1aD わ 1G 145 
examp1e 126 
of Qecl1aratiorS 67 
of dQdeclaratiOonS Of record fi1es 
OF preDrOCeSSOr funCtLionS 199 
Of StrucCtur@e mapptnqg 406 
Of uS@e Of ConmVverS1on rules 278 
Of uSe Of on-ConditionS 191 
exampleSs of declaratEionS 67 
exCeption Contro1 Statements 52 
ON Statement 52 
REVERT Statement 52 
STGNAL Statement 52 
exCep も iona1 ConditionS 943 
CONVERSTON Condition 43 
SIZE cond ュ も ion 43 
STRTNGSTZE Condition 43 
eX GeCut1On 
1 も mp エ OV1rG SDpeeQ of 。 211 
eX ユ モ -DO1n モ SS OfE SubrOutineS and 
functionS 94 
EXP bui1t-in function 306 
eXxPp11C1t dec1aration 65 
eXD1 ふ 1C1 モ qua1iftCation 91 
eXPOnert SpecC1tFfierS 265 
EE p1C モ ure Character 265 
K picCture character 265 
GeXDOn Gn 上 1a 七 1Om ODGYA て OY ( 本 ) 7 
eXPDreGSS1On 6 
array 31 
COnmon 208 
elLemen も 31 
eValuat 上 iom 277 
f116eG 111 
1n format item 132 
noOtation 105 
Operation 31 
OpPGYationS 33 
potnter 82 
redundan も t 210 
SCalar 31 
Simp11fication 208 
SruCEuYG 31 
eXDrYeGSS1OnS 
and Qata ConVers1on 31 
Array 39 
aS SuPSCT1DptS 24 
COmmNOn 205 
offSe モ 89 
Operationa1 32 
PreprOCeSSor 198 
ら S ら 上 了 QUCEUTG 41 
uSe Of 31 


exPpreSS1onS anQd data conyerS3ion 31 


168 


eXPpreSS1OnS anQd data ConVerSion (conitinued) Ei1e (continued ) 


array eXDrEeSS1oOn 。 31 PRTNT 137,132 
ar エ ay eXDreGSS1OnS 39 Standard 118,133 
a も モエ ュ ユエ Du も eS OF tarqdetS 39 variaple 110 
data COnVGYS1Om 32 FTTE a モ モエ ュ 1Dute 111,353 
1 ement @exDreSS1Oon 31 fi1e name 110 
eXCEDt1 Ona1 COnQd1tionS 43 FTLE option 。 120,142 
eXDreSS1On operat1ionS 33 FTNTSH condition 185。328 
f umCt1Om reGfGrenCe OperarnidS 38 FTNTSH conQdition code 318 
Operand Or Sub-eXDFGSS1On 31 FXFED a モ Er1ibu モ te 354 
ODe ra も 1 On eXDpreSS1Om 。 31 FTXED Dui1 も -n unction 306 
SCa1 ar expreSS1ion 31 Fixed-1enqgth recordSs 135,150 
SruC も EUrG GXDreSS1On 31 ixed-Poin 革 data 
S も て エ UCtU エ て G expDrGSS1OnS 41 binary 15 
uSe Of expreSS1OnS 31 dec1ma1 18 
extenQded ゎ 1nmary Coded decima1 nt erchan de FTXEDOVERFTLOM CONDTTTON 328 
CoOde (EBCDTC ) FTXEDOVERFTIOW Condition Code 319 
CO11at1 rg SedUGmCe 7。249 FLOAT at も tY1Dbute 354 
Col1atind SeJuenCe。 (EBCDIC) 7 FLOAT Du]1 モ - ュ nm funmcCtionm 307 
48-CharacCter Se も 上 250 1 oOa モ 1in9- DO1m 七 da キト a 
60- character Set 249 binary 346 
ex て tsrt 七 88 decima1 16 
EXTENT Job contro1 Statement 154 FLOOR Du11 モ - ュ mn 人 umCtLiorm 307 
EXTENTNUMBER option 154 Elow unitS 209 
ex て en 上 8 f Ormat 
jpoundS and 23 defaultS 136,152 
Control11ed parameter DoundS and 105 genera1 122 
parameter Dbounds and 105 1 1S も -directed nput 13128 
externe1 56 11S モ -directed output 125 
pb1ock 56 1iStS 129 
PrOCeQdure 56 OoE PI/T Statemernt 7 
も XX 上 。 201 optionS 134,150 
EXTERNATL。 っ 上 モエ 1Du モ te 353 recCord 136,137 
external namme 9 zoned decima1 18 
YeGS も 1C モ て ion 222.68 F Ormat 1 上 em 
SCOPe Cf 68 a1phabetic 1iSt of 268 
ext ermna1 StrUCUTG,。 SCOD@ ら Of memD6 ら エ COLUMN 269 
na 。 70 ContrO+ 267 
data 267 
ed ュ it-directed 267 
F piCture Character 266 exDpreSS1On 1n 132 
F-ftormat item 135,150,271 LTNE 272 
FaC ュ 1 ユキ ュ 6S PAGES 272 
1 nter1aAngUuade 233 Print Fi]1eS 132 
numer1cC CharaCter 180 remote 268 
OPE rat1nmd SyS も em 6 SKIP 273 
faCCOr FORMAT Stat ら mert 381 
1 terat ュ On 30 FEOrmat モ ed 11S も nd 
repetition 19 COntrO1 StatemerntS 203 
scaling 266 FORTRARN 
FacCtored defau1 SpeC1fF1Cat1On 74 interface 2141 
Eb-{fOrimmat 上 135,136,150,151 11Dbrary FunmctionS 100 
チュ 1 馬 optiorn 。 237。235 
add1t1iVe a 上 tribu も es 112 FORTRAN - PL/T data equuVvalentS 243 
a1t eyna も 1Ve at 上 tr1buteS 111 FORTRAN - P1/T interfaCe 242 
aSSocCiating data SetS with 116 FORTRAN Option 。 361 
a も て 上 て エ 1Du モ 6 1311 FOR TRAIN roOut ュ n ら 6 
Closing 115 PaSS1ind arYqdumentS tO COBOL or 234 
ConStant 110 Te S モ エ ュ 1 で も 1OnS On 1npu モ キノ /output by 238 
data 21 も termination ofF 241 
decCLaratiOn 159 FREE Statemen も 381.49 
eXDrESS1On 。 111 for based yariaDles 86 
input 136 for contro11ed variables 80 
nOn-PRTINT 137 with IN optiorn 90 
Onー-Un1 て S 187 free1ind す 
opPenino 115 31mp11icit 80 
option 。 142 FROM Option 。 143 
Outpu も 136 fu11 StOD (。) 7 
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ful1word binary 15 

func こ tton 。 221,.96 
ADDR Du] モ -im 82 
a11OCa モ 1On Du1 ユ 1 も モ -1n 81 
and DSeuHOvariab1es 228 
ar 1 も hmet1C Du11 モ - ュ n 295,296 
array~-hanid11nd Du1]t-n 297,296 
aSynChrOnOuS 1nDu モ ノノ OutDu も Du ユキ - ュ mn 
a キ 上 了 1 DutGS Of reurned Va1ues 97 
pool ean built-in 35 
bu1t 1 モ -in 99 
CoOr dQ ュ 1 も ュ On- han d1 ind Du ユユキ -n 296 
4eV1tce 134。148 
EMPTY bui1t-in 90 
eX ユ キモ -DOointS OF SubroutineS and 94 
FORTRAN 1ibrary 100 
function reference 96 
GO TO Statement 97 
ma thGmat ュ Ca1 Du ユユキ -1n 
nu bu1] モ - ュ nm 87 
ODera も 1OnS uS1nd Du1 ユ 1 キモ -1n 34 
option 119 
refterence 96 
referenCe OperanQdS 38 
RETURN Statemen て 97 
StOragdE COrnt エ ro] Dui1t-n 296 
STREAM 1nput/ ノ outpu モ 上 but1 モ =nm 296 
S モ tr1nmJ Dui] キ 上 -1m 182 
Strinq- han d1 in Du11 キ -n 295,296 
SuDrOutireS arQ 93 

tuncCtior、 and condition codes 
ConQ1tiOn bui]t-1n 190 

FUNCTTON option 114 


295,297 


GENERTC attr1bute 354 

9Snmer1C Se1ection 98 

GENKEY Option 157 

GET Statement 382 

GO TO Statement 383,.d9 
1nterlandUuade enV1ronment 26G0 
て 〇 て rm1na1 FumCt 上 on 97 
tO term1na も ら SuDrOu セ も ne 95 

reater て than SymDbo] (>) 7 

drOUDS 
and DIOckS 11 
DO 220 


halfword 28 
ha1lfEworQ binary 15 
hand 11 nd 

D ュ モエ -Strind 181 

1 て G エ ruPE 。 210 

Op も tionS 137, 54 

Strinq 216 
HBOUND Dui1 モ =in funCtiOn 307 
hiterarChy OoF nameS 25 
HTGH Du11 モ -1n FunmC も ion 307 
月 TGHTNDEX Opti om 154 


- hODpGer SeLection 114 


T DiCture Character 264 
1dent1ifierS 9 

TF statemen モ 383,.49 

TGNORE OPC1On 143 

TMAG Du11 モ ー ュ nh 條 unCt1on 307 
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296 


TMAG pSeudovariab1e 307 
1 mad1mary COnStant 17 


1mp1 1C1 も 上 
Qdec1aration 67 
freeinqd 80 


openitrng 116 
qUual ユエ FiCa モ On 92 
TN Op 上 tion 
ALLOCATE Statement w1th 89 
FREE Statement with 90 
in-11ne OperatonS 214 
Qdata corVerSton 214 
pitcture type 1 214 
Ptcture type 2 216 
picture type 3 216 
Strinq hand1ing 216 
1nc1uSiorn of externa1 tex も 201 
tndependenC ら 
deVice 114 
machtne 3 
TNDEX Du11t-1nm function 307 
TNDEXAREA Option 157 
1ndexed organization 161 
Creatinq data Se も t 162 
direct acCcess 163 
keyS 161 
Sequertia1 access 162 
Se も t 162 
TNDEXMULTTPTLE OpEion 154 
infix operation 32 
1nfix Operat OrS 
and arrayS 40 
arnd SruCtureS 41 
3nformation interchange codes 110 
EBCDIC 110 
TNTTTAL 
attriDute 29 
procCedure 59 
TNTTTAI。 at 上 ribuate 355 
1nt モ ia1ization 220,223 
1 npu も t 
and Output 5 
anQ output ofE areas 91 
data diyected 119 
data-Qirected data SpecificationSs 


for 126 
ed1 モ -directed 120 
fi1le 136 


format 124 
11S モ も -directed 119 
operation 176 
Stream 120 
TNPUT at 上 rijbute 111。357 
TNPOT option 
in OPEN statemenE 386 
nput/ ノ Output 。 228 
FORTRAN roOutineS 238 
based variab1es and 83 
CoOnd ュ 1 も On 323 
COntrOo1 StatemenES 47 
GrYYOY reCOVery 220 
facC111 た ieS 219 
OperationS 153 
StatemerntS 46 
1npu モ ノ Ou モ pu 七 condition 323 
1 npu も モノ Output Statements 46 
DTSPLAY Statement 47 
1 Pu モノ /Ou 革 Put COnE roO1 S も at ementS 


47 


1nDUt ノ OutpU も S も ta も temencS (continued) 
て と COrQd tranSm1SS1on StatementS 46 
Stroeam ranSintSS1ion StatementS 146 
INPUT。 OUTPUT。 
and UPDATE at た tributeS 。 111 
1nSGr モ 1oOn CharacCterS 261 
ノ 1nSertiOn Character 261 
。 inSertion charac と er 261 
は 1 mnSSar て 1 Om Charac と er 261 
1nSOuTCG 11S も in 195 
ritodra ユ 上 DOurdary 28 
TNTER OPD て cion 235 
tn て GTChanmge (COBOL) 
dQata 156 
1nEerChangeG CodeS 110 
1nc GT fa で 6 
COBOL。 241 
FORTRAN 242 
1 nterlarduade enVironment 238 
eS も tab1iShinqg PL ノエ enVvironment 238 
SO 7O Statement 240 
1nterrupt hand11inq 240 
て GS 上 ユエ で Ct1OnS On 1nDu モ ノ Output by FORTRAN 
rOutineS 238 
term1nat1ion OF FORTRAN and COBOL 
rOUutineS 241 
1nt erl anduade FacC111tieS 233 
1 nVOCat1On 235,237 
paSS1nd argdumen モ S tO COBOL or FORTRAN 
rOutirie 234 
paSS1n9 ardUumnentS tO PL/ エ procedure 236 
uS1 rd COmmmmOn St 上 Orade 237 
1nt er] eaVeQ_ SuDSCr1tptS 27 
interna1 anQ excEerna1 bl1ockS 56・- 
Sx て erna1 prOCedure 56 
1 nt 上 E エ rna 1 DFOCedure 56 
mul 上 ュ 1p1G CLOSure 56 
neSted block 56 
uSG Of PND Statement 56 
TNT ERNAL Aa 二 モ Er1DutG 358,353。68 
int erna1l naw@ ら 
SCOPG of 68 
ュ 1p 上 erncl て tex 上 65 
1 jn て S エエ UD も 
ACE 1V1 て 16S 5 
nand11rng 240 
mutltiple 322 
nterrupt hand1tnqg 240 
TNTO Option 。 142 
1nVa エ 1an ト exDpYeGSS1 OnS 
1nVOCat1On 235,237 
ARG Opt1Onm 。 235 
COBOL opcion 。 235,237 
FORTRAN option 。 237,235 
TNTER Option 235 
NOMAP OpPtiOn 。 235,237 
NOMAPTN Opt ュ on 。 237,235 
NOMAPOUT option 235, 237 
OE DreGDrOCGSSOr pFOCedureS 198 
ParareGteG エ て 11S 七 237 
point of 58 
ュ invokirg Dlock 58 
TRREDUCTBLE a モ triDute 358 
TRREDUCT BLE Opti on 
in ENTRY Statement 381 
1n PROCEDURE Statement 389 
1SUB defEFining 386 


209, 206 


ュ モ em 
A ム -format 268 
B-fFormat 268 
C-fOrmat 269 
CharaCter-Strind piCtured 257 
COLUMN format 269 
COn て trO1 format 129,131 。267 
data format 267 
豆 - 和 Orma モ 270 
ed1i モ -direcCted format 267 
exDprGSS1On in fFOrmat 132 
F-fOrmat 。 271 
LTNE format 272 
mumG て 1C CharaCter pictured 257 
P- forma セ も 272 
PAGE FEOrmat 272 
R- 和 fOrmat 273 
remoO モ e foOrmat 132。268 
SKTP format 273 
メーFoOrmat 273 
tterat1ion 。 226 
COgMmOn eroOYS 226 
1 上 Grat 上 1Om FaC 上 O エ て 
in format 11S も モ 129 
TNTTTAT, a キ tribunte 30 
1 も Grat ュ On nm DO Statement 50 


ob cort ro1 
Operatinq _SyStem andQd 
JOD Cont ro1 St も at ement 
ASSGN 114。115 


221 ,220 


DLBL 。 117 
EXTENT 154 
TLBL 。 117 


K Dicture Character 265 
key 163,161 
ClaSS+ 和 fiCa も 1on 157 
ConQd1t 上 1Om CoOde 318 
COnVerS1Oon 166 
1enqth opt 上 ion (KEYLENGTH) 158 
1oOCat1On Op も 1Oon (KEYLOC) 158 
OpPE1On 。 143 
recCorQded 162,166 
SOurCG 162 
KEY condition 328 
KEY Option 143 
KEYED a モ モエ 1Du モ G 112。358 
KEYFROM option 144 
k eyS 
emlbedded 162 
SOUYCG 165 
KEYTO option 148 
KGywOrQ aDbreGVia も 1OnS 251 
keyworQd statemen た 9。10 
K eyYwOrd,。 reGSGrVed 65 
keywOrQS 
alphabe も ic 11St of 251 


1abe1 
conStan も 21 
data 21 
Prefix 10 
LABEFL. at 上 tr1ibpunte 21。358 
1abe1 expreSS1On 1n GO "TO Staterne nt 
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1abe1 11S も t in LABEL declaration 358 
1aDpe1 Variab1e 
in aSSi qnmen も モ Statemen も モ 370 
1 ュ amdua9e Keyword 9 
1 anduade KeywordQdS 
alphabet1tcC 11S も of 251 
LBO NND bui1t-in Eunction 308 
1eading zerOS 1n arithme も iC data 114 
LEAVE option 137,154 
1s nd も モ h 
OF data-dir ecCted Outpu モ 上 Fie1dS 128 
と て GCOrQ 。 reCOrd-Ort en ed 
て ranSm1SS1On 152 
reCOrQ 。 Stream-Ortented 1nput 136 
て GCOrd。 Str eam-O て 1eGn も ed OU も Du モ 137 
1ength atEribute 359 
LENGTH BUTLT TN FUONCTTON 307 
1sngth SpecC1E1Cat1 On 
pit-Strinq 20 
CHARACT ER at モエ 1bu モ Ge 19 
character String 19 
1esS than SymDoo1 (<) 7 
eve1 
1ogica1 403 
numper 03 
oE 1ocator qua1ificatiom 92 
11prary FunCt1oOnS 
FORTRAN 100 
LTKE: 
a キ 上 エエ 1Du モ te 27 
LTKE at 上 ribute 27,359 
L1 NE 
Forma も 1 て em 272 
option 121 
1ins of data 119 
LT NENO BUTLT TN FUNCTTIONR 308 
LTNESTZE option 132 
COmmon GrrOYS 229 
in OPEN Statement 386 
11 S モ 
data 119,120,121 
EOrmat 129 
of ConQditionS 323 
Darameter 237 
parameter QdeSCor1ptor 102 
proceSSing 86 
typeS of 88 
11 St of Cordit1oOriS 323 
ct aSS1 邊 で Ca も 1On Of COond1i モ onS 323 
C Ommp1 1a1 On COnmd1t ュ On 323 
1nput ノ Output Cond1ition 323 
PrOdgram-CheGCkKOut Cond1t1Onm 323 
PrOqgrammer-named Condition 323 
StoradeG COnm モ ro1 CoOndition 323 
SyStem aC も ion Cond1t1on 323 
LIST optior 124 
11S 上 prOCeSSinqd 86 
11 S も -di reCted 
data SpeC1iEF1cation 124 
tnput Eormmat 124 
Outpu も t foOrma も 125 
も ranSirn SS1Or、 119 
11St ュ nd 
COntrO1 S も tatemernt 195 
1nSOourCe 195 
SOurCe 195 
11S1nd COntrO1 StatementS 203,.401 
%PAGE 401 
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1i sting contro] statementS (continued) 
%SKTP 80O1 

1OCat@ 
mode 147。83 

LOCATE Statemert 142。384。84 


1OCa も OY 
COnyerS1tor 89 
da も ta ,. 22 


1ocator data 22 

COnVerS1On 33 

offSet ariab1e 22 

Pointer Variab1e 22 
1ocator qua11EiCat 上 Or 81 

1evels of 92 

mu1 モ 1p1e 91 
1ocator qua11ifier 《(->) 82 
LOG bui 1 上 -n Function 308 
1oqica1 1eve] 403 
1ogtica1 Operation 224 
1Od1Ca1 ODGYA も OrS 

(see Di 上 -S モ エ 1md OPDGratOrS ) 
1oqgica1 record 109 
LOG10 bu1i1t-n Eunction 308 
TIOG 2 bui1t-in Fumnction 308 
LOW bui 1] 上 - ュ mn funmction 308 
1owerCaSeG 1etterS 1n Syntax 247 


machine independencCe 3 
magnetic tape hand1ing opt1onS 137,154 
LEAVE opEion 137,。154 
ROLABEL option 138,154 
NOTAPEMK option 138,154 
ONLOAD option 。 138,154 
MATN OrEion 
in PROCEDURE Statement 388 
mairn prOCedure 59 
ma]Or StrUuC モ uFe 25 
mantiSsSa 16 
mapp1nd 
data 403 
Qata 。 duYinmd 1nter1aAndJUAq9G 
ConrWmntCation 234。236 
One pair 404 
S も ruCture 403 
ma も thema も iCa1 Du11 も -1n EumC も 1OonS 297,295 
MAX bui1t-1nm Function 308 
MEDTUM option 113 
TNG INDGY ameS Of externa1 SuCur GS 
Scope of 70 
MTN Du1i1t-1n Function 308 
mmnOr StYUuUCtureG 25 
unuS Sign (-) 7 
MOD bui1t-in Function 309 
mode 1 
1ocate 147。83 
mOVe 145,.83 
prOCeSSinqdd 145 
moOde COnVerSior 。 279 
mOVG moOde 145,83 
mu 1 モ 上 1p1e 
aSStqnmen も 147 
CLOSure 56 
declarationS 70 
1nterruPtS 322 
1ocator qua11ification 91 
Sw ユ tcCheS 212 


Ne ボ 


mu1t1D1e generat1 Or 

of Dased VariableS 86 

Of contro11ed Variables 80 
multiple gernerationS ofF contro11ed 

Var1aD16eS 

aS も er1SK noOtation 80 
mult1p1e interruptS 322 
mu1E1D1G OperYat1ionS On CardS 118 
mu ユ lt ュ 1 p11 Ca 上 1 On OPDeratOr (キネ ) 7 
MULTITPLY BOTLT TN FUNCTTON 309 
muU1t1Dp1Y SymDO1 《(*) 7 


name. 
COnd1it ュ On Code 318 
deneriC entry 98 
quaihfied 26 
ェ recCogn ュ it1iom of 65 
SS 上 了 UCtUYG aSS1dnment BY 142 
SubSCr1Dted qua1ified 26 
SymIDO11C 13 
NAME COnd1tiOrn 318,329 
neSted block 56 
NOCONVERSTON prefix 43 
NOLABEI, Op も ion 138,154 
NOMAP opti on 。 237,235 
NOMAPTN option 235,237 
NOMAPOUT Option 237。,235 
nOn- COnneGCted Storaq@e 24 
TnOn- ュ も Grat1Ve DO statements 51 
non-PRTNT file 137 
NOOPTTMTZE Compt1er Option 210 
NORESCAN OpD も た ion 1mn 兄 ACTTVATE 
StateIWenc 397 


NOR ESCAN OPTTON TN 久 ACTTVATE Statemen も t 196 


riOria 1 DrOoJram termtnmation 61 


noOrma11zed hexadecima] EE1oat1ind-DpO1nt 


noOt SymDOol (っ ) 7 
NOTAPEMK Opt1iOn 138,154 
nOtat て 1Onh 
3aSter1iSK 105,80 
COnS も an 。 247 
eXPreSS1or、 105 
SYncaX 247 
VariaDle 247 
NOWRTTE opti or 157 
nuU1 ユ 1 
argUurnentS 298 
Du1 ユ 1 上 -1n FunC も 1On 87 
On-uYi 革 上 187 
Sta て emen も t 10,385 
nu Dit-S や rinqd 20 
NULT。 Du ュ ユエ モー- ュ 1n unCtiorn 309 
nu ユ ll 57 
nu11 cnaraCcter Strin 19 


nUme エ 
eVe1 41403 
S1dn (#) 7 
mume エ 1C 


ChATaAC て 6 da キ ta 17 

CharaCter 1Cured ふも tem 257 

CharaCter SpeCctEicationS 177 
nUmG エ 1 ユ 1C CharaC も Gr 上 〇 ar ュ iDhmetiC 
COnVerS1On 279 


TnUuUmGY も 1C CharaC も Ge て 上 O Di1 COnVerSion 289 


nure て エ C CharYaC も 6 て 上 上 〇 CharaCt er 
COn ロ びび GTS1On 。 288 


ob]ject 85 
offSet 
buffer 137 
data 22 
expreGSS1OnS 89 
Variable 22,89 
OFFSET a モ 上 そ 1bute 360 
OFFSET Du11 キ -in Function 309, 89 
OffSe data 
COnVerS1on 33。89 
OFFSet て O 〇 pointer ConversSion 89 
OFLTRACKS(n) option 154 
OMR option 1149 
ON Stat ら ment 186,385,。52 
SCOpe of 187 
On-COnQd1tion 。 317 
anQd on-un1itS 221。228 
AREA 91 
ConQd1tion codes (on-codes) 318 
examp1le ofF use of 191. 
1is も of conditionSs 323 
mul モ ip]1e interruptS 322 
Onー-un ユ 
dynamicCa11y deScendant 187 
For fi]e parameters and fi1e 
VariableS 187 
nu11 187 
On-Cond1tionS and 221,228 
ONCHAR Du ふ 1t- ュ nm Functiorn 309 
ONCHAR pSeudovariab1e 309 
ONCODE bui1t-inm function 310 
ONCOUNT Dui1 キ -n unction 310 
ORNF エ LE bu11 モ 上 -n function 310 
ONKEY BUTLT TIN FUNCTTON 310 
ONLOC bu1i1 キ - ュ nm function 。 310 
ONSOURCE bu11 モ -in functionm 310 
ONSOURCE pSeudovariab1e 311 
OPEN Statement 116。386 
openinq and cl1osinqg Eiles 14115 
aSSOC1atinq da も ta SetS With fi1es 
CLOSE S も tatement 117 
file declaration 159 
1mp11C1t Openinqg 116 
OPEN Statement 上 116 
OpPe rand 
funmction refFerence 38 
Or SuD-GXxDpreSS1On 。 31 
Opera も 13nd SyStem 
and ]ob cortro1 221, 220 
facC11 ュ tieS 6 
Operat1ton 。 159 
ar ュ ユ も hme セ iC 224。34 
aray-aAmQd-array 40 
array-and-element 40 
エエ ayーamd-S も 上 TuCEurG 141 
bit-Strinqd 8,34 
Dui 1 上 - ュ nm funcCtionS 34 
Combirna も tionS of 36 
COmDar1Son 35 
COmD1 ユ 1e-t ュ me 5 
ConCatenationm 36 
eXDFeSS1on 31 ,33 
1n-11mne 214 
1nfix 32 
input 176 
1ogica1 224 
Output 上 。 176 
PFeE3x 32 
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Operat1On (contin ued) 
S て ruCture-arnd-e1ement 42 
S も と uC も urG-anQd-S も FuCtuFG 42 
OPD ra モ ュ 1 Onma 1 GxDrGSS1OriS 32 
1nmEiX OpDGYe も tioh 32 
pref1X OPeYat1on 32 
ODGra 革 〇 と 
ar1 て he て 1C 8 
COmpar1Son 8 
PriOrity of 37 
St モエ ュ nd 8 
Opti Ca1 mmarkK read (OMR) 149 
Optimization 205,210 
Cod1i nd SOurCG DrOJramS EoOr Op て miz1nd 
Compiler 208 
COmmmOn expYeSS1OnS 205 
data Tmanademmernt 157 
e11mination oF redundan モ 
eXxDpreSS1onS 208 
expreSS1Oon S1mp11f1iCa も ion 208 
OE 1nDput/Out て DUE OperationS 153 
order anQd reorder optionS 206 
モエ anSFer OF invar1ant exDreSS1OnS OY 
StatementS 206 


OPD て t ふ 1 On 
(REFER 85 
ARG 235 


ASCrr 138,160 
ASSOCTATE 148 
BLKSTZE 136。151 
BUFfERS 137。152 
COBOL 235。 237 
copy 121 
DESCRTPTORS 73 
PVENT 184 
EXTENTN'MBER 154 
FTLE 120。142 
FORTRAN 237,235 
FROM 143 
FUNCTTON 114 
HITGHTNDEX 154 
TGNORE 143 
TNDEXMULTTPLE 154 


TNTER 235 
TrNTO 142 
KEY 143 


KEYEFROM 144 
KEYLENGTH 158 
KEYLOC 158 


KEYTO 186 
LEAVE 137,154 
LTNE 121 


madnet1iC モ 上 ape hand1ing 137,154 
MEDIUM 113 

NOLABEL,。 138,154 

NOMAP 235。237 

NOMAPTN 237,。235 

NOMAPOUT 235。237 

NOTAPEMK 138,159 

Of prOCeQdure ノ en も ry StatementS 223 
Of て ranSmtSS1On Statemen も tS 120。142 
OFLTRACKS (n) 154 

ORDER 206 

PAGE 121 

PASSWORD 153 

RANGE 73 

record formna も 139。.150 

RECSTZL 135。,151 
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Option 。 (Cornt 上 1nu ed) 
REORDER 207,206 
RETURNS 98 
SCATARVARYTNG 158 
SET 143 
SKIP 121 
STRTNG 120 
UNLOAD 138,154 
VERTFY 139。154 

Op て tion of tanSmtSS1On Sa 上 mn もら 

OPTTONS a セ モモ 1bute 360 

OPTTONS option 
in ENTRY statemen も 380 
1n PROCEDURE StaLement 388 

Or Symbo1 (|) 7 

order Of pa+1ring 

。 ruleSs for 403 

ORDER option 206 

Orqan1zat も ioOn 
COnSeCuttve 161 
data 22 
data set 137。152 oe の 
indexed 161 
Program 55 
reg1ona1 163 
REGIONAL(1) 164 
REGTONAL(3) 165 
StatementS 48 

Other FormS Of aSSiqgnmen て t 

Ou て Du 上 
data-directed 119 
data-QirecCted data SpeCitficat1on 

for 127 
edi モ -directed 120 0 
Eile 136 
forma も 125 
tnput and 5 
11S キ -Qirected 119 
of areaS 91 
operation 176 
PreprOCeSSOY nput and 195 
Stream 120 

OUTPOT attritbute 111, 357。 362 

OUTPOT option 
tn OPEN statement 386 

OVERFLOW condition 329 や 

OVERFLOw condition code 319 

oVerlay defininq 
S も ring 347 

ovVerpuncheQd sign 180 

QyerpunCheQd SitqnS 263 


P- forma セ も item 272 
packed dectma1 15 
padding 
bit-Strinq 20 
characCter Strina 19 


PAGE 
forma 七 1 上 em 272 
option 121 


PAGESTZE Option 132 
COmmmOn errOrS 229 
in OPEN statement 386 
pairthnd 1403 
PaYam ら も @r ペン 
a1tocation of 104 
a も モエ ュ わ u モ @ 105。362 
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